R/convertAGEB.R

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

#' Convert AGEB data
#'
#' @md
#' @param x A [`magpie`][magclass::magclass] object returned from
#'          [`readAGEB()`].
#'
#' @return A [`magpie`][magclass::magclass] object.
#'
#' @author Falk Benke
#'
#' @export
convertAGEB <- function(x) {
  add_columns(x, addnm = setdiff(getISOlist(), "DEU"), dim = 1, fill = NA) %>% return()
}