bestApproximateMinimizers | R Documentation |
Returns the approximate minimizers with minimum SSR found by CGNM.
bestApproximateMinimizers(
CGNM_result,
numParameterSet = 1,
ParameterNames = NA,
ReparameterizationDef = NA
)
CGNM_result |
(required input) A list stores the computational result from Cluster_Gauss_Newton_method() function in CGNM package. |
numParameterSet |
(default 1) A natural number number of parameter sets to output (chosen from the smallest SSR to numParameterSet-th smallest SSR) . |
ParameterNames |
(default: NA) A vector of strings the user can supply so that these names are used when making the plot. (Note if it set as NA or vector of incorrect length then the parameters are named as theta1, theta2, ... or as in ReparameterizationDef) |
ReparameterizationDef |
(default: NA) A vector of strings the user can supply definition of reparameterization where each string follows R syntax |
A vector a vector of accepted approximate minimizers with minimum SSR found by CGNM.
model_analytic_function=function(x){
observation_time=c(0.1,0.2,0.4,0.6,1,2,3,6,12)
Dose=1000
F=1
ka=x[1]
V1=x[2]
CL_2=x[3]
t=observation_time
Cp=ka*F*Dose/(V1*(ka-CL_2/V1))*(exp(-CL_2/V1*t)-exp(-ka*t))
log10(Cp)
}
observation=log10(c(4.91, 8.65, 12.4, 18.7, 24.3, 24.5, 18.4, 4.66, 0.238))
CGNM_result=Cluster_Gauss_Newton_method(
nonlinearFunction=model_analytic_function,
targetVector = observation,
initial_lowerRange = c(0.1,0.1,0.1), initial_upperRange = c(10,10,10),
num_iter = 10, num_minimizersToFind = 100, saveLog = FALSE)
bestApproximateMinimizers(CGNM_result,10)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.