R/convertTransportSubisidies.R

In pik-piam/mrremind: MadRat REMIND Input Data Package

#' Converts transport subsidies data
#'
#' @param x MAgPIE object to be converted
#' @return A MAgPIE object containing transport subsidies per technology
#' @author Renato Rodrigues
#' @examples
#' \dontrun{
#' a <- convertTransportSubsidies(x)
#' }
#'
convertTransportSubsidies <- function(x) {
  x <- toolCountryFill(x, fill = 0, verbosity = 2) # fill countries with no data
  x[is.na(x)] <- 0

  return(x)
}