Last data update: 2014.03.03

R: Returns the gas exchange velocity for gas of interest w/ no...
k600.2.kGASR Documentation

Returns the gas exchange velocity for gas of interest w/ no unit conversions

Description

Returns the gas exchange velocity for gas of interest w/ no unit conversions

Usage

k600.2.kGAS.base(k600,temperature,gas="O2")

k600.2.kGAS(ts.data, gas="O2")

Arguments

k600

k600 as vector array of numbers or single number

temperature

Water temperature (deg C) as vector array of numbers or single number

gas

gas for conversion, as string (e.g., 'CO2' or 'O2')

ts.data

Object of class data.frame with named columns datetime and k600 and wtr (water temp in deg C). Other columns are ignored

Value

Numeric value of gas exchange velocity for gas

Author(s)

Jordan S. Read

See Also

k.read and k.read.base for functions that calculate k600 estimates

Examples

 ## single example
kO2 <- k600.2.kGAS.base(k600=2.4,temperature=20.4,gas='O2')

## Timeseries example
#load data
data.path = system.file('extdata', package="LakeMetabolizer")
sp.data = load.all.data('sparkling', data.path)
ts.data = sp.data$data #pull out just the timeseries data


#calculate U10 and add it back onto the original 
u10 = wind.scale(ts.data)
ts.data = rmv.vars(ts.data, 'wnd', ignore.offset=TRUE) #drop old wind speed column
ts.data = merge(ts.data, u10)                          #merge new u10 into big dataset  

k600 = k.cole(ts.data)
ts.data = merge(k600, ts.data)

k.gas = k600.2.kGAS(ts.data, 'O2')

Results


R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(LakeMetabolizer)
Loading required package: rLakeAnalyzer
> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/LakeMetabolizer/k600.2.kGAS.Rd_%03d_medium.png", width=480, height=480)
> ### Name: k600.2.kGAS
> ### Title: Returns the gas exchange velocity for gas of interest w/ no unit
> ###   conversions
> ### Aliases: k600.2.kGAS k600.2.kGAS.base
> 
> ### ** Examples
> 
>  ## single example
> kO2 <- k600.2.kGAS.base(k600=2.4,temperature=20.4,gas='O2')
> 
> ## Timeseries example
> #load data
> data.path = system.file('extdata', package="LakeMetabolizer")
> sp.data = load.all.data('sparkling', data.path)
> ts.data = sp.data$data #pull out just the timeseries data
> 
> 
> #calculate U10 and add it back onto the original 
> u10 = wind.scale(ts.data)
> ts.data = rmv.vars(ts.data, 'wnd', ignore.offset=TRUE) #drop old wind speed column
> ts.data = merge(ts.data, u10)                          #merge new u10 into big dataset  
> 
> k600 = k.cole(ts.data)
> ts.data = merge(k600, ts.data)
> 
> k.gas = k600.2.kGAS(ts.data, 'O2')
> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>