Eric Hare, Heike Hofmann
r format(Sys.time(), '%B %d, %Y')
change just for the heck of it
R package for creating sequence logo plots
library(ggplot2)
library(gglogo)
data(sequences)
ggplot(data = ggfortify(sequences, "peptide")) +
geom_logo(aes(x=position, y=bits, group=element,
label=element, fill=interaction(Polarity, Water)),
alpha = 0.6) +
scale_fill_brewer(palette="Paired") +
theme(legend.position = "bottom")