Description Usage Arguments Examples
View source: R/c_additional_functions.r
tuwrap
tuwrap compares results obtained from
fitting multiple models of time-uncertain time series.
1 |
y |
A vector of observations. |
ti.mu |
A vector of estimates/observed timings of observations. |
ti.sd |
A vector of standard deviations of timings. |
n.sim |
A number of simulations. |
... |
optional arguments: |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 | # Note: Most of models included in tuts package are computationally intensive. In the example
# below I set parameters to meet CRAN<e2><80><99>s testing requirement of maximum 5 sec per example.
# A more practical example would contain N=50 in the first line of the code and n.sim=10000.
#1. Import or simulate the data (a simulation is chosen for illustrative purposes):
DATA=simtuts(N=5,Harmonics=c(4,0,0), sin.ampl=c(10,0, 0), cos.ampl=c(0,0,0),
trend=0,y.sd=2, ti.sd=0.2)
y=DATA$observed$y.obs
ti.mu=DATA$observed$ti.obs.tnorm
ti.sd= rep(0.2, length(ti.mu))
#2. Fit the models:
n.sim=100
WRAP=tuwrap(y=y,ti.mu=ti.mu,ti.sd=ti.sd,n.sim=n.sim,CV=FALSE,n.cores=2)
#3. Generate summary results:
summary(WRAP)
# Note: Accessing individual summaries, diagnostics and plots is presented in manuals
# of models contained in the wrapper.SOme examples:
plot(WRAP$BFS,type='periodogram')
summary(WRAP$BFS,CI=0.99)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.