# Loading a Panmat objects in the micropan package
data(list="Mpneumoniae.blast.panmat",package="micropan")
# Computing Rarefaction
rarefac.blast <- rarefaction(Mpneumoniae.blast.panmat,n.perm=100)
# Plotting and printing the Rarefac object
plot(rarefac.blast)
summary(rarefac.blast)
str(rarefac.blast)
Run the code above in your browser using DataLab