search for: dorder

...zation code here */ break; case DLL_PROCESS_DETACH: /* clean-up code here */ break; } return(TRUE); } #endif void nlme_two_comp_zero_CI_lag (long int *norow, double *maxoorder, double *OMAT, long int *ndrow, double *maxdorder, double *DMAT, long int *logparam, long int *logresp, double *Resp) { long int i, j, No = *norow, Nd = *ndrow, LogParam = *logparam, LogResp = *logresp; double Tdiff, a, b, k21, origReset, counterDose, id, T1, constReseti, constResetj, MaxOORDER = *maxoorder, MaxDORDER = *maxdorder,...

...lines(1:1000, t, col="blue") lines(1:1000, t2, col="red") # ---------------------------------------------------------------------- # Savitzky-Golay Algorithm # ---------------------------------------------------------------------- # T2 <- sav.gol(T, fl, forder=4, dorder=0); # # Polynomial filtering method of Savitzky and Golay # See Numerical Recipes, 1992, Chapter 14.8, for details. # # T = vector of signals to be filtered # (the derivative is calculated for each ROW) # fl = filter length (for instance fl = 51..151) # forder = filter order (2 =...

...5.html) for variables in my dataset, dim (272:90). I managed to run the code for individual variables in the dataset and then combine the results into a single dataset. My novice attempt at this task is shown below csg<-NULL for (i in 1:ncol(data.all)) { sg<-sav.gol(data.all[,i],1,forder=2,dorder=0) csg[i]<-data.frame(sg) dat<-do.call(cbind,(csg)) } I eventually plan to test whether there is a significant difference between the original noisy dataset (data.all) and the Savitzky-Golay datasets(dat 1,dat2, ...). To create the Savitzky-Golay datasets I plan...