powered by
Function to simulate an Ornstein-Uhlenbeck evolutionary sequence data set with an optimum moving according to an unbiased random walk.
sim.OUBM( ns = 20, anc = 0, theta.0 = 1, alpha = 0.3, vstep.trait = 0.1, vstep.opt = 0.1, vp = 1, nn = rep(20, ns), tt = 0:(ns - 1) )
An evolutionary sequence (time-series) data set (a paleoTS object)
number of samples in time-series
the ancestral trait values
the ancestral value for the optimum
strength of attraction to the optimum
step variance of the trait
step variance of the optimum
phenotypic variance of each sample
vector of the number of individuals in each sample (identical sample sizes for all time-series is assumed)
vector of sample times (ages
Kjetil Lysne Voje
##Create data x<-sim.OUBM(50, theta.0 = 5, alpha = 0.6, vstep.opt = 0.5) ## plot the data plot(x)
Run the code above in your browser using DataLab