This vignette explains how to fit A-Ci curves with the plantecophys
package in R. It is written to be usable for beginners in R.
After installing the package from CRAN with install.packages("plantecophys")
, load the package the usual way:
library(plantecophys)
acidata1$Rd <- NULL
In the examples below I will use two built-in datasets in the plantecophys
package. The acidata1
dataset looks like this:
knitr::kable(acidata1[,c("Ci","Photo","Tleaf","PARi")])
The easiest approach is to make your dataset look like that, including those column names. If you want to use different column names, see an example further below.
Read your data into a dataframe in R, possibly using read.csv
(comma-separated values):
mydata <- read.csv("myfile.csv")
If you have the default column names, fitting an A-Ci curve is as easy as this:
fit <- fitaci(acidata1)
The results are stored in the object fit
, which can be inspected via:
fit
The coefficients can be extracted,
coef(fit)
And a standard plot can be made:
par(mar=c(5,5,2,2), cex.lab=1.1) plot(fit)
The fitaci
function corrects the estimates of Vcmax and Jmax to a common temperature (25C) by default, but you may want to change this behaviour if you are interested in actual rates at the temperature measured (not corrected for temperature).
fit2 <- fitaci(acidata1, Tcorrect=FALSE)
Note that the correction to a common temperature depends on a number of parameters, the default values in fitaci
are not necessarily right for your application!
The fitaci
function also estimates dark respiration (Rd) in the fit, but be aware that those estimates are very imprecise. Also, a higher precision of Vcmax and Jmax can be obtained if you measure Rd independently, and use that value in the fit. To do this, add Rd to the dataframe (default column name is 'Rd'), and set the useRd=TRUE
argument, like so:
acidata2 <- acidata1 acidata2$Rd <- 2 fit3 <- fitaci(acidata2, useRd=TRUE) coef(fit3)
When your column names differ from the defaults, you have to specify all column names. It may also be useful to use a different column in some instance, for example air instead of leaf temperature (perhaps the thermocouple was broken):
fit4 <- fitaci(acidata1, varnames=c(ALEAF="Photo", Tleaf="Tair", Ci="Ci", PPFD="PARi"))
Note that the right-hand side of each pair is the name of the variable in your dataframe.
If leaf temperature is not available in the dataset, a default value of 25C is assumed, or you can pass it as an argument (see below). Likewise, for PAR (which is used to express Jmax at 'infinite' light availability), a value of 1800 is assumed.
To use different values, set Tleaf
and PPFD
(PAR) directly:
fit5 <- fitaci(acidata1, Tleaf=30, PPFD=2000)
You can also set GammaStar
, Km
directly.
It is not possible to estimate mesophyll conductance (gmeso) from A-Ci curves (contrary to what some people have claimed in the literature), but it is possible to include gmeso to arrive at chloroplastic rates of Vcmax and Jmax. This is easily done via,
fit6 <- fitaci(acidata1, gmeso=0.2)
Note: However note a section in the FAQ Vignette that is included in this package on another approach to account for gmeso.
A fairly recent addition to the package (not described in Duursma, 2015) is the estimation of triose phosphate utilization (TPU) limitation. This rate can be estimated like this,
par(mar=c(5,5,2,2), cex.lab=1.1) fit7 <- fitaci(acidata1, fitTPU=TRUE) plot(fit7)
Note: the horizontal line (Ap) is the TPU-limited rate of photosynthesis.
The TPU rate can be extracted via:
coef(fit7)
Note: In many cases this rate cannot be estimated, i.e. when the limitation is not clearly affecting photosynthesis. In that case the estimated coefficient will be NA.
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.