read.ghg:

Usage Arguments Examples

Usage

1

Arguments

file

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (file) 
{
    dat <- read.csv(file, skip = 3, head = F)
    nv <- ncol(dat)
    dum <- scan(file, n = 3 * ncol(dat), sep = ",", what = "")
    vars <- gsub(" ", "", dum[(nv + 1):(nv * 2)])
    units <- gsub(" ", "", dum[(nv * 2 + 1):(nv * 3)])
    colnames(dat) <- vars
    dat[dat == -9999] <- NA
    return(dat)
  }

jobonaf/reddy documentation built on May 19, 2019, 2:58 p.m.