R/levin.R
In cyrilmi/teaching: Contains some functions
levin<-function(species,stand=TRUE){
x <- 1/(sum((species/100)^2))
if(stand==TRUE){
x<-(x-1)/(length(species)-1)
}
return(x)
}
spec<-c(10,40,0,50,0,0)
levin(spec,stand=T)
cyrilmi/teaching documentation built on May 14, 2019, 1:40 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
levin<-function(species,stand=TRUE){
x <- 1/(sum((species/100)^2))
if(stand==TRUE){
x<-(x-1)/(length(species)-1)
}
return(x)
}
spec<-c(10,40,0,50,0,0)
levin(spec,stand=T)
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.