R/readIIASABioenergy.R

Defines functions readIIASABioenergy

readIIASABioenergy <- function() {
  data <- read.csv("AgMIP_1stgen_bio_Source.csv",sep=";",stringsAsFactors=FALSE)
  colnames(data) <- sub("^X([0-9]{4})","y\\1",colnames(data))
  return(as.magpie(data,spatial=1))
}
pik-piam/moinput documentation built on June 9, 2020, 12:23 p.m.