t = fitdistcens(data, 'frechet',
+                      control=list(reltol=1e-14),
+                      start=list(loc=4, scale=5))
> result
Fitting of the distribution ' frechet ' on censored data by maximum
likelihood
Parameters:
       estimate
scale 2.7902200
shape 0.6379845
Fixed parameters:
    value
loc     0
ri