Skip to content
Snippets Groups Projects
Commit 4480fdb6 authored by wactbprot's avatar wactbprot
Browse files

+se1 doc

parent 73d3fa92
No related branches found
No related tags found
No related merge requests found
Package: vacLabTools Package: vacLabTools
Type: Package Type: Package
Title: common vaclab tools Title: common vaclab tools
Version: 0.3 Version: 0.4
Date: 2015-12-14 Date: 2016-02-23
Author: Thomas Bock Author: Thomas Bock
Maintainer: wactbprot <wactbprot@gmail.com> Maintainer: wactbprot <wactbprot@gmail.com>
Description: Package contains a collection of commonly used r functions. Description: Package contains a collection of commonly used r functions.
......
...@@ -16,6 +16,7 @@ export(getConstVal) ...@@ -16,6 +16,7 @@ export(getConstVal)
export(getConvFactor) export(getConvFactor)
export(getDefaults) export(getDefaults)
export(getFm1Doc) export(getFm1Doc)
export(getSe1Doc)
export(getSubList) export(getSubList)
export(getValVect) export(getValVect)
export(refreshAnalysis) export(refreshAnalysis)
......
...@@ -28,5 +28,6 @@ getDefaults <- function(){ ...@@ -28,5 +28,6 @@ getDefaults <- function(){
d$db$const.id <- "constants" d$db$const.id <- "constants"
d$db$ce3.id <- "std-ce3" d$db$ce3.id <- "std-ce3"
d$db$fm1.id <- "std-fm1" d$db$fm1.id <- "std-fm1"
d$db$se1.id <- "std-se1"
return(d) return(d)
} }
#' 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 )
}
% Generated by roxygen2: do not edit by hand % 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} \name{fn.2115}
\alias{fn.2115} \alias{fn.2115}
\title{The number 2115 is the table curve number.} \title{The number 2115 is the table curve number.}
......
% Generated by roxygen2: do not edit by hand % 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} \name{fn.3132}
\alias{fn.3132} \alias{fn.3132}
\title{The number 3132 is the table curve number.} \title{The number 3132 is the table curve number.}
......
% Generated by roxygen2: do not edit by hand % 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} \name{fn.4403}
\alias{fn.4403} \alias{fn.4403}
\title{The number 4403 is the table curve number.} \title{The number 4403 is the table curve number.}
......
% Generated by roxygen2: do not edit by hand % Generated by roxygen2: do not edit by hand
% Please edit documentation in R/getConvFactor.R % Please edit documentation in R/getConvFactor.r
\name{getConvFactor} \name{getConvFactor}
\alias{getConvFactor} \alias{getConvFactor}
\title{Function get a conversion factor from the database. These \title{Function get a conversion factor from the database. These
......
% 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}
File added
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment