R/nr_losses_manure_fuel.R

In pik-piam/nitrogen: Nitrogen Library

#' nr_losses_manure_fuel
#'
#' @param fulldata data to perform actions on
#'
#' @author Jan-Philipp Dietrich
nr_losses_manure_fuel<-function(fulldata){
    out<-dimSums(nr_manure(fulldata)[,,"fuel"],dim=3.1)
    return(setNames(out,"losses_manurefuel"))
}