leap.zig.both: Internal functions for generating vector plots of ecosystem...

In ctkremer/priceTools: Tools for analyzing biodiversity-ecosystem function relationships

Description

This suite of functions is accessed by leap.zig() and produces vector plots using BEF, CAFE, and Price components. leap.zig.both plots both the BEF and CAFE vectors.

Usage

leap.zig.both(tmp, xlim = NA, ylim = NA, loc.standardize = TRUE,
  error.bars = FALSE, raw.points = TRUE, vectors = TRUE,
  group.vars = NULL, legend = TRUE, old.plot = NA, add = FALSE)

leap.zig.bef(tmp, xlim = NA, ylim = NA, loc.standardize = TRUE,
  error.bars = FALSE, raw.points = TRUE, vectors = TRUE,
  group.vars = NULL, legend = TRUE, old.plot = NA, add = FALSE)

leap.zig.cafe(tmp, xlim = NA, ylim = NA, loc.standardize = TRUE,
  error.bars = FALSE, raw.points = TRUE, vectors = TRUE,
  group.vars = NULL, legend = TRUE, old.plot = NA, add = FALSE)

leap.zig.price(tmp, xlim = NA, ylim = NA, loc.standardize = TRUE,
  error.bars = FALSE, raw.points = TRUE, vectors = TRUE,
  group.vars = NULL, legend = TRUE, old.plot = NA, add = FALSE)

Arguments

tmp	Data to plot
xlim	Plot's x limits
ylim	Plot's y limits
error.bars	Plot error bars
raw.points	Plot raw data points at level of community pairs
vectors	Plot averaged vectors
legend	Show legend
old.plot	ggplot object from previous leap.zig() call
add	Add new plot to object provided in old.plot option
loc.standarize	Are these standardized vectors

Value

A ggplot object.

Functions

• leap.zig.bef: Plot vectors for BEF components

• leap.zig.cafe: Plot vectors for CAFE components

• leap.zig.price: Plot vectors for Price components

Examples

# Load data and run pairwise comparisons  of communities
cc2<-group_by(cedarcreek,NTrt,NAdd,Plot)
pp<-pairwise.price(cc2,species='Species',func='Biomass')

# Organize/format the results, and pull out a subset using NTrt=1 as the control site
pp<-group.columns(pp,gps=c('NTrt','NAdd'))
pp<-pp[pp$NTrt.x==1,]
dat1<-pp[pp$NAdd %in% c('0 27.2'),]

# Process and plot the result
tmp <- process.data.bef(dat1, group.vars=NULL, standardize=F)
leap.zig.bef(tmp, loc.standardize=F, group.vars=NULL,raw.points = F,legend = F)

ctkremer/priceTools documentation built on May 28, 2019, 7:49 p.m.