library (EcoSimR)

data= read.csv('file', sep=",", header=TRUE)
Model <- cooc_null_model(speciesData=data, algo= "sim9", metric = "c_score") 
summary(Model)
plot(Model,type = "hist")
plot(Model,type = "cooc") 
plot(Model,type = "burn_in")