https://github.com/cran/GsymPoint
Raw File
Tip revision: 48978493006d9009b92388f7dddf92e9ab78b98d authored by Mü¾Œ¶˜¼nica Lü¾Œ¶˜¼pez-Ratü¾Œ¶˜¼n on 08 February 2017, 15:54:09 UTC
version 1.1
Tip revision: 4897849
empirical_dist.R
empirical_dist <-
function(x,t)
{
  x_logico = (x<=t)
  y = sum(x_logico)/length(x)
  res <- y
  return(res)
}
back to top