defineKnots | R Documentation |
defineKnots
function determine the knots location for a ptrSet or
ptrRaw object.
There is three possibilities :
method = expiration
in the expiration periods, a knots is
placed every knotsPeriod
seconds, and 1 knots in the middle of two
expiration, one at begin and at the end
method= uniforme
, the knots are placed uniformly every
knotsPeriod
time points
give in knotsList
a list of knot, with all base name file in
name of the list element. All file must be informed. The knots location
must be contained in the time axis
defineKnots(
object,
knotsPeriod = 3,
method = c("expiration", "uniform", "manual")[1],
knotsList = NULL,
...
)
## S4 method for signature 'ptrRaw'
defineKnots(
object,
knotsPeriod = 3,
method = c("expiration", "uniform")[1],
knotsList = NULL,
timeLimit = list(NULL)
)
## S4 method for signature 'ptrSet'
defineKnots(
object,
knotsPeriod = 3,
method = c("expiration", "uniform")[1],
knotsList = NULL
)
object |
ptrSet object |
knotsPeriod |
the period in second (times scale) between two knots for the two dimensional modelization |
method |
expiration or uniform |
knotsList |
a list of knot location for each files, with all base name file in name of the list element |
... |
not used |
timeLimit |
index time of the expiration limits and background |
numeric vector of knots
a list with numeric vector of knots for each file
library(ptairData)
dirRaw <- system.file("extdata/exhaledAir", package = "ptairData")
exhaledPtrset <- createPtrSet(dir=dirRaw, setName="exhaledPtrset",
mzCalibRef = c(21.022, 60.0525), fracMaxTIC = 0.7, saveDir = NULL )
#### placed knots every 2 times points
exhaledPtrset <- defineKnots(exhaledPtrset ,knotsPeriod=2,method='uniform')
#### placed knots every 3 times points in the expiration (default)
exhaledPtrset <- defineKnots(exhaledPtrset ,knotsPeriod=3,method='expiration')
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.