R/nr_livestock_products_use.R

In pik-piam/nitrogen: Nitrogen Library

#' nr_livestock_products_use
#'
#' @param fulldata data to perform actions on
#'
#' @author Jan-Philipp Dietrich
nr_livestock_products_use<-function(fulldata) {
    kli <- expand.set(fulldata,"kli")
    out <- nr_use(fulldata,"nr")[,,kli]
    return(out)
}