empirical_dist object x.R/empirical_dist.R
sup.empirical_dist.RdMethod for obtaining the support of empirical_dist object x.
# S3 method for class 'empirical_dist'
sup(x)A finite_set object containing the support of x.
ed <- empirical_dist(c(1, 2, 2, 3))
s <- sup(ed)
s$has(2) # TRUE
#> [1] TRUE
s$has(4) # FALSE
#> [1] FALSE