View source: R/PulseWaveform.R
simplex.MakeSimplex3 | R Documentation |
simplex.MakeSimplex3 iterates on the initially estimated values for non-fixed parameters, refining them to give the simplex an improved starting position. It is used within the FindWithinParams function, such that a matrix of optimised non-fixed parameters can be generated for each beat in an inputted batch.
simplex.MakeSimplex3(ppg, param,f,inScale, directions=NULL, inTol=-1, optional=NULL, debug=FALSE, beat_vector = beat_vector, renal_param, dias_param = dias_param, sys_time, w)
ppg |
ppg time series segment |
param |
model parameter inputs |
f |
model2.ChiSq3 function |
inScale |
the starting value by which to iterate on parameter values (0.1 recommended) |
directions |
the initial direction in which to iterate parameter values (default null) |
inTol |
the minimum value a parameter can change if it cannot be iterated upon to improve goodness of fit |
optional |
for direct input into model2.ChiSq3 function, default NULL |
debug |
logical, if true iteration and refinement statuses will be printed to console |
beat_vector |
an index of beats to be modeled and their x-coordinates to extract from the PPG time series (for direct input to f) |
renal_param |
the starting parameter for 1st reflectance peak timing (inputted to prevent drastic deviations from this value) |
dias_param |
the starting parameter for 2nd reflectance peak timing (inputted to prevent drastic deviations from this value) |
sys_time |
the starting parameter for systolic peak timing (inputted to prevent drastic deviations from this value) |
w |
the timing of the 1st derivative peaks on the ppg time series |
result |
a matrix of parameter sets, including the initially inputted parameters (row 1) and a parameter set for each refined parameter |
simplex.MakeSimplex3 is for non-fixed (within beat) parameters only. Thus the outputted matrix will include absent (NA) rows where non-fixed parameters are represented (these are refined separately in the simplex.MakeSimplex2 function).
within_params <- FindWithinParams(beats_in, ppg, beat = new_beat, gs = model2.GetSegment, fp = model2.FixParams3, ms = simplex.MakeSimplex3, m2 = model2.ChiSq3, beat_vector = beat_vector, renal_param = renal_param, dias_param = dias_param, sys_time = sys_time, w = w)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.