In pedroj/effectiveness_pckg: Effectiveness landscapes

Code for plotting the effectiveness landscape of mutualisms adding isolines of equal effectiveness values

Effectiveness landscapes are the two-dimensional representation of the possible combinations of the quantity and the quality of mutualistic services (seed dispersal, pollination) and with elevational contours representing isoclines of effectiveness. These representations can be 2D bivariate plots of multiplicative effects of any of the seed dispersal (SDE) or pollination (PE) effectiveness components.

This is a repository of the R package effect.lndscpused to produce these plots of the effectiveness landscapes.

The package plots effectiveness landscapes as described in:

Schupp, E. W., Jordano, P. and Gómez, J.M. 2010. Seed dispersal effectiveness revisited: a conceptual review. New Phytologist, 188: 333-353.

For additional details please visit the web page here. Or try my GitHub repository.

Installation:

# Installation
devtools::install_github("pedroj/effectiveness_pckg")
library(effect.lndscp)

# Example datasets.
data(prunus)
data(cecropia)

Example

These are two examples run on datasets available in the package. The second uses the function effectiveness_plot to illustrate how to use ggrepel functions to avoid the cluttering of labels in the plot when many species are included.

The function returns a ggplot2 plot object that can be later customized with additional ggplot2 options, as well as the actual plot.

#--------------------------------------------------------------------
# Based on a dataset of Prunus mahaleb frugivores.
# In this example we build the effectiveness landscape just for the 
# quantitative component, plotting its two subcomponents, visitation 
# rate and per-visit effectiveness.
#
require(effect.lndscp)
data(prunus)
effectiveness_plot(prunus$visits, prunus$eff_per_vis, 
   prunus$group, prunus$animal, 10, 
   myxlab= "No. visits/10h", 
   myylab="Effectiveness/vis (No. fruits handled)")
#--------------------------------------------------------------------

#--------------------------------------------------------------------
# Based on a dataset of Cecropia glaziovii frugivores.
# This effectiveness_plot function has repel labels activated.
data(cecropia)
effectiveness_plot(cecropia$totvis, cecropia$totbic, 
    cecropia$fam, cecropia$code, 10, 
    myxlab= "No. visits/10h", 
    myylab="Effectiveness/vis (No. fruits handled)")
#--------------------------------------------------------------------

References

Schupp, E.W., Jordano, P. & Gomez, J.M. (2017). A general framework for effectiveness concepts in mutualisms. Ecology Letters, 20, 577-590. doi: 10.1111/ele.12764
Schupp, E.W. (1993). Quantity, quality and the effectiveness of seed dispersal by animals. Vegetatio, 108, 15–29.
Schupp, E.W., Jordano, P. & Gomez, J.M. (2010). Seed dispersal effectiveness revisited: a conceptual review. New Phytologist, 188, 333–353.
Jordano, P. & Schupp, E. (2000). Seed disperser effectiveness: The quantity component and patterns of seed rain for Prunus mahaleb. Ecological Monographs, 70, 591–615.