R/labelCANSIM.r

Defines functions labelCANSIM

labelCANSIM <- function(df){
  for(i in 1:ncol(df)){
    label(df[[i]]) <- names(df[i])
    if(i > 2) names(df)[i] <- paste0("V", i-2)

    label(df[[1]]) <- "period"
    label(df[[2]]) <- "id"
  }

  return(df)
}

Try the CANSIM2R package in your browser

Any scripts or data that you put into this service are public.

CANSIM2R documentation built on May 2, 2019, 4:51 a.m.