###data preparation####
data("Two_group")
require(ggplot2)
###analysis####
Alpha_results<- Alpha_diversity_calculator(taxobj = Two_group,taxlevel = "Base")
#Check data frame contained alpha diversity
head(Alpha_results$alphaframe,5)
#Check contained statistics and plot list
names(Alpha_results$plotlist)
#Check statistics for Shannon
Alpha_results$plotlist$Plotobj_Shannon$Statistics
#Extract plot for Shannon
Alpha_results$plotlist$Plotobj_Shannon$Barplot
Alpha_results$plotlist$Plotobj_Shannon$Boxplot
Alpha_results$plotlist$Plotobj_Shannon$Violinplot
Run the code above in your browser using DataLab