mn = smry[x,"Marker"] al = str_split(smry[x,"bp"],", ")[[1]] an = paste(mn,al,sep=".") ds = data[,an] rownames(ds) = data$Genotype
r x
: r mn
dotchart(sort(colSums(ds)))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.