# NOT RUN {
## Load Pathogen Compositions of P. syringae at the haplotype resolution
data(PathogenCompositionPsyringaeHaplotypes)
## Size of the first sample
sum(PathogenCompositionPsyringaeHaplotypes[1,])
## Size of the second sample
sum(PathogenCompositionPsyringaeHaplotypes[2,])
## Total number of different variants
ncol(PathogenCompositionPsyringaeHaplotypes)
## Display pathogen compositions
x=PathogenCompositionPsyringaeHaplotypes
barplot(t(x), col=rainbow(ncol(x)), main="P. syringae - Haplotypes")
# }
Run the code above in your browser using DataCamp Workspace