Content - a55f5d499ccfda17785758069070634e394c1731 - 9d98522/R/cOpt_gsym2_empirical.R

visit type:

https://github.com/cran/GsymPoint

05 November 2023, 22:21:14 UTC

Tip revision: 158c572b6991bd851086fb65dec3157d2ba15647 authored by Mónica López-Ratón on 31 October 2023, 18:30:02 UTC
version 1.1.2

Tip revision: 158c572

cOpt_gsym2_empirical.R

cOpt_gsym2_empirical <-
function(t, parameters)
{
  cte = parameters[1]
  x0b = parameters[2:length(parameters)]
  ROCt = 1-cdf_empirical_dist(x0b, 1-t)
  res <- (1/cte)*(1-t)-ROCt
  return(res)
}