rich.Rd
compute fraction of "rich"
rich(edf, richline)
an ecdf
the cutoff for being rich
scalar fraction that are "rich"