Content - 85db2d7e38f8dd27b5ef5955ed90378c8152e202 - 9d98522/R/empirical_dist.R

visit type:

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

empirical_dist.R

empirical_dist <-
function(x,t)
{
  x_logico = (x<=t)
  y = sum(x_logico)/length(x)
  res <- y
  return(res)
}