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/mrplayground documentation built on June 2, 2021, 9:25 p.m.