geom_seed — geom_seed • ggmsa

Highlighting the seed in miRNA sequences

geom_seed(seed, star = FALSE)

Arguments

seed	a character string.Specifying the miRNA seed sequence like 'GAGGUAG'.
star	a logical value indicating whether asterisks should be disaplayed.

Value

a ggplot layer

Author

Lang Zhou

Examples

miRNA_sequences <- system.file("extdata/seedSample.fa", package="ggmsa")
ggmsa(miRNA_sequences, font = 'DroidSansMono', color = "Chemistry_NT", none_bg = TRUE) +
geom_seed(seed = "GAGGUAG", star = FALSE)
ggmsa(miRNA_sequences, font = 'DroidSansMono', color = "Chemistry_NT") +
geom_seed(seed = "GAGGUAG", star = TRUE)