Instead of introducing snps <- c(alt_alleles . . . ), break this into smaller demos. First show alt_alleles[alt_alleles=="A"] then show a few variations before stringing them in within c().

[ytakemon]

Instead of introducing snps <- c(alt_alleles . . . ), break this into smaller demos. First show alt_alleles[alt_alleles=="A"] then show a few variations before stringing them in within c().