require(graphics)
# Simulates a custom community time series using 'comTS()':
z <- comTS(nsp = 10, ny = 30, even = 0.6, mvs = 1.5, sync = "0")
# Runs the partitioning of the community coefficient of variation:
x <- partitionR(z)
# Plots the result
plot(x)
Run the code above in your browser using DataLab