powered by
sample.to.species.freq(x, min.f = NULL)
x[i]
i
f
f[i]
x <- sample(1:20, 20, rep = TRUE) f <- sample.to.species.freq(x) print(x) print(f)
Run the code above in your browser using DataLab