#' Calculate Fertilizer of Phosphor
#'
#' Provides FertP data for Phosphor.No changes to the content have been done.
#'
#'
#' @return Fertilizer data for Phosphor and corresonding weights as a list of
#' two MAgPIE objects
#' @author Lavinia Baumstark
#' @seealso \code{\link{calcOutput}}, \code{\link{readIFA}},
#' \code{\link{convertIFA}}, \code{\link{readSource}}
#' @examples
#'
#' \dontrun{
#' calcOutput("FertP")
#'
#' }
#'
calcFertP <- function() {
x <- readSource("IFA",subtype="consumption")[,,"Grand Total P2O5", drop=TRUE] * 0.4364/1000
return(list(x=x,
weight=NULL,
unit="Tg P",
description="Fertilizer Phosphor (Grand total P205) from IFA"))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.