fLoadFluxnet15: Read a file in the format of Fluxnet 2015 release

View source: R/FileHandlingFormats.R

fLoadFluxnet15R Documentation

Read a file in the format of Fluxnet 2015 release

Description

Assigns default units to the columns and keeps variable name attributes as in original file.

Usage

fLoadFluxnet15(
  file_path,
  additional_columns = character(0),
  colname_NEE = "NEE",
  ...
)

Arguments

file_path

scalar string: the path to the csv file

additional_columns

character vector of columns to read in addition of standard columns of read_from_fluxnet15. Can be a character vector or a object return by cols

colname_NEE

name (scalar string) of column that reports NEE observations

...

further arguments to read_csv

Examples

  ds_fn15 <- Example_DETha98 %>%
     fConvertTimeToPosix('YDH',Year = 'Year',Day = 'DoY', Hour = 'Hour') %>%
     dplyr::mutate(
        TIMESTAMP_END = POSIXctToBerkeleyJulianDate(.data$DateTime),
        season = factor(199801)
     ) %>%
     dplyr::rename(SW_IN = .data$Rg, TA = .data$Tair, USTAR = .data$Ustar) %>%
     dplyr::select(dplyr::one_of(c(
       "TIMESTAMP_END","NEE","SW_IN","TA","VPD","USTAR","season")))
  head(ds_fn15)
  fname <- tempfile()
  readr::write_csv(ds_fn15, fname)

  # standard columns are renamed to REddyProc defaults
  ds_eproc <- fLoadFluxnet15(fname)
  head(ds_eproc)
  EProc <- sEddyProc$new("DE-Tha", ds_eproc)
  head(EProc$sExportData())

  # Additional columns can be specified, e.g. factor column season
  ds_eproc <- fLoadFluxnet15(fname,
    additional_columns = readr::cols(season = readr::col_factor()))
  head(ds_eproc)
  EProc <- sEddyProc$new("DE-Tha", ds_eproc,
    c("NEE", "Rg", "Tair", "VPD", "Ustar","season"),
    ColNamesNonNumeric = "season"
    )
  head(EProc$sExportData())

REddyProc documentation built on March 18, 2022, 5:41 p.m.