library(agricolae)
data(paracsho)
# date 22-06-05 and treatment CON = application with insecticide
specimens <- paracsho[1:10,6]
index.bio(specimens,method="Simpson.Div",level=95,Boot=200)
index.bio(specimens,method="Shannon",level=95,Boot=200)
Run the code above in your browser using DataLab