Strange `custom` behaviour when dimensions are not matched.

[ivan-krukov]

Hello!

Thank you for an excellent package.

I have stumbled on a strange behaviour while using method="custom" with an unexpected number of elements. Here is an example:

set.seed(123)
silly <- list(c("T","C","G","A", "A"))
matrix( rexp(5 * 3), nrow = 5, dimnames=silly) %>% 
ggseqlogo(seq_type='dna', method='custom')

I know this is a strange example, since the dimensions are mismatched. Should there be an input check, or perhaps a group option?

[omarwagih]

Thanks for pointing this out. Duplicate row names shouldn't be allowed. I've added an input check in the latest commit.