## Not run:
# # To run an example use the following format
# library(diveRsity)
# data(Test_data)
# Test_data[is.na(Test_data)] <- ""
#
# test_results<-inCalc(infile = Test_data, outfile = 'out', pairwise = TRUE,
# xlsx = FALSE, boots = 1000, para = TRUE)
# ## End(Not run)
Run the code above in your browser using DataLab