Plot simulated plots in arena

Description

Given a matrix of plot bounds, plots the plots in an already plotted, simulated arena.

Usage

plotPlotter(plot.bounds)

Arguments

Details

Plots plots as defined by the supplied matrix, e.g. a call to plotPlacer. An active plot with the simulated arena needs to already be open, see example.

Value

Plotted plots

References

Miller, E. T., D. R. Farine, and C. H. Trisos. 2015. Phylogenetic community structure metrics and null models: a review with new methods and software. bioRxiv 025726.

Examples

tree <- geiger::sim.bdtree(b=0.1, d=0, stop="taxa", n=50)

temp <- evolveTraits(tree)

phydistmatrix <- ape::cophenetic.phylo(temp[[1]])

#define a color for each species
cols <- colorRamps::blue2green2red(nrow(phydistmatrix))

#prep the data for the simulation
prepped <- prepSimulations(tree, arena.length=300, mean.log.individuals=2, 
length.parameter=5000, sd.parameter=50, max.distance=20, proportion.killed=0.2,
competition.iterations=3)

positions <- filteringArena(prepped)

#plot the arena. don't close the window
plot(positions$arena$X, positions$arena$Y, pch=20, cex=0.5, xlim=c(0,300), ylim=c(0,300), 
col=cols[positions$arena$individuals])

bounds <- plotPlacer(no.plots=10, arena.length=300,
plot.length=50)$plot.bounds

plotPlotter(bounds)

Results