stribution given a sample (from @Statistics.Distribution.Exponential@)
-- 
-- > λ> mwc $ listOf 10 (exponentialFromSample $ V.fromList [1,1,1,0])
-- > [ 0.4237050903604833,1.934301502525168,0.7435728843566659
-- > , 1.8720263209574293,0.605750265970631,0.24103955067365979
-- > , 0.6294952762436511,1.660404952631443,0.6448230847113577
-- > , 0.8891555734786789 ]
exponentialFromSample :: PrimMonad m
                      => Sample
                      -> Maybe (RandT m Double)
exponentialFromSample s = continuous <$> (fromSample s :: Maybe E.ExponentialDistribution)










exponentialFromSample :: PrimMonad m
                      => Sample
                      -> Maybe (RandT m Double)
exponentialFromSample s = continuous <$> (fromSample s :: Maybe E.ExponentialDistribution)
exponentialFromSample s = continuous <$> (fromSample s :: Maybe E.ExponentialDistribution)