diff --git a/vacLabTools/DESCRIPTION b/vacLabTools/DESCRIPTION index df6d52a856868dc02a943ddc5fd229214d1d92ff..d1ea4966027dcd53248b9c95f50b64733ce19627 100644 --- a/vacLabTools/DESCRIPTION +++ b/vacLabTools/DESCRIPTION @@ -1,8 +1,8 @@ Package: vacLabTools Type: Package Title: common vaclab tools -Version: 0.3 -Date: 2015-12-14 +Version: 0.4 +Date: 2016-02-23 Author: Thomas Bock Maintainer: wactbprot <wactbprot@gmail.com> Description: Package contains a collection of commonly used r functions. diff --git a/vacLabTools/NAMESPACE b/vacLabTools/NAMESPACE index b939b5318d9233d3bd75574141b766570d8cc4cf..02b7557c6dc61568aa3b7cac408f111bcb49cd4e 100644 --- a/vacLabTools/NAMESPACE +++ b/vacLabTools/NAMESPACE @@ -16,6 +16,7 @@ export(getConstVal) export(getConvFactor) export(getDefaults) export(getFm1Doc) +export(getSe1Doc) export(getSubList) export(getValVect) export(refreshAnalysis) diff --git a/vacLabTools/R/defaults.r b/vacLabTools/R/defaults.r index c2e177a7604be7536daf9bf0a2455ea444743203..cfa796fa8c9c72357b641e7e0a33f6c2b6c63f5d 100644 --- a/vacLabTools/R/defaults.r +++ b/vacLabTools/R/defaults.r @@ -28,5 +28,6 @@ getDefaults <- function(){ d$db$const.id <- "constants" d$db$ce3.id <- "std-ce3" d$db$fm1.id <- "std-fm1" + d$db$se1.id <- "std-se1" return(d) } diff --git a/vacLabTools/R/get_se1_doc.r b/vacLabTools/R/get_se1_doc.r new file mode 100644 index 0000000000000000000000000000000000000000..af48ef7352b689bca8e57d49ea3a810ca557fc16 --- /dev/null +++ b/vacLabTools/R/get_se1_doc.r @@ -0,0 +1,22 @@ +#' Returns the se1 standard document from the database by +#' means of the \code{get.defaults()} function. +#' +#' @author wactbprot +#' @export +#' @import R4CouchDB +#' @usage getSe1Doc() +#' @examples +#' \dontrun{ +#' se1doc <- getSe1Doc() +#' } +#' @return \item{doc}{the se1 standard document} +#' @keywords misc +#' + +getSe1Doc <- function(){ + d <- getDefaults() + cdb <- cdbIni() + cdb$DBName <- d$db$name + cdb$id <- d$db$se1.id + return( cdbGetDoc(cdb)$res ) +} diff --git a/vacLabTools/man/fn.2115.Rd b/vacLabTools/man/fn.2115.Rd index a6cb489306a76b5ae2b7c2a48b42738dc7d2bc8b..a456ec86086eee2ccf96f70ab078738eb2d0fb3b 100644 --- a/vacLabTools/man/fn.2115.Rd +++ b/vacLabTools/man/fn.2115.Rd @@ -1,5 +1,5 @@ % Generated by roxygen2: do not edit by hand -% Please edit documentation in R/fn.2115.R +% Please edit documentation in R/fn.2115.r \name{fn.2115} \alias{fn.2115} \title{The number 2115 is the table curve number.} diff --git a/vacLabTools/man/fn.3132.Rd b/vacLabTools/man/fn.3132.Rd index daa656a4fcfd657bdfb268111f813b4e410597a0..0bd3988ec51acaedc87098ae7fd31e1461da029f 100644 --- a/vacLabTools/man/fn.3132.Rd +++ b/vacLabTools/man/fn.3132.Rd @@ -1,5 +1,5 @@ % Generated by roxygen2: do not edit by hand -% Please edit documentation in R/fn.3132.R +% Please edit documentation in R/fn.3132.r \name{fn.3132} \alias{fn.3132} \title{The number 3132 is the table curve number.} diff --git a/vacLabTools/man/fn.4403.Rd b/vacLabTools/man/fn.4403.Rd index ae5063a8745df087da93d13334afd15c9ea56279..cf14424be549e9d27ea2904219aa6d919b03a638 100644 --- a/vacLabTools/man/fn.4403.Rd +++ b/vacLabTools/man/fn.4403.Rd @@ -1,5 +1,5 @@ % Generated by roxygen2: do not edit by hand -% Please edit documentation in R/fn.4403.R +% Please edit documentation in R/fn.4403.r \name{fn.4403} \alias{fn.4403} \title{The number 4403 is the table curve number.} diff --git a/vacLabTools/man/getConvFactor.Rd b/vacLabTools/man/getConvFactor.Rd index 85b9b44cbfeb1d7603b1a8ca2800879928ba3c87..3e98a3fd6fcee7cca894d5ec95f0ecb526db88b1 100644 --- a/vacLabTools/man/getConvFactor.Rd +++ b/vacLabTools/man/getConvFactor.Rd @@ -1,5 +1,5 @@ % Generated by roxygen2: do not edit by hand -% Please edit documentation in R/getConvFactor.R +% Please edit documentation in R/getConvFactor.r \name{getConvFactor} \alias{getConvFactor} \title{Function get a conversion factor from the database. These diff --git a/vacLabTools/man/getSe1Doc.Rd b/vacLabTools/man/getSe1Doc.Rd new file mode 100644 index 0000000000000000000000000000000000000000..9b8793bed1301024a61123d5dd5404d7cc42c6ca --- /dev/null +++ b/vacLabTools/man/getSe1Doc.Rd @@ -0,0 +1,26 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/get_se1_doc.r +\name{getSe1Doc} +\alias{getSe1Doc} +\title{Returns the se1 standard document from the database by +means of the \code{get.defaults()} function.} +\usage{ +getSe1Doc() +} +\value{ +\item{doc}{the se1 standard document} +} +\description{ +Returns the se1 standard document from the database by +means of the \code{get.defaults()} function. +} +\examples{ +\dontrun{ +se1doc <- getSe1Doc() +} +} +\author{ +wactbprot +} +\keyword{misc} + diff --git a/vacLabTools_0.4.tar.gz b/vacLabTools_0.4.tar.gz new file mode 100644 index 0000000000000000000000000000000000000000..6438d78f3f21d160f5c852ae18c250cf6cb95f47 Binary files /dev/null and b/vacLabTools_0.4.tar.gz differ