# NOT RUN {
ctryCode <- "KEN"
dt <- read.csv(getCtryNlDataFnamePath(ctryCode))
dt <- dt[,getCtryNlDataColName("201612", "sum", nlType="VIIRS")]
#returns the column "NL_201612_SUM" if it exists in the KEN data file
# }
Run the code above in your browser using DataLab