title: Left censoring by using lmomco R package
body: <p>I am using  &quot;pwmLC function from lmomco  R package&quot;  for the left censoring. I am trying to fit the 2-parametres log-normal distribution only on the upper tail of the (i-e-, upper 30% of the percentiles) which means censoring the lower values and fitting only on the upper tail of the distribution.</p>
  <p>The condition applied in pwmLC function &quot;sapply(x, function(v) { if(v &gt;= T) return(T); return(v) } )&quot;  gives me TypeError: 'NULLType' object is not subscriptable, and I get the values for left censoring only if I change the condition &quot;sapply(x, function(v) { if(v &lt;= T) return(T); return(v) } )&quot;. Still I find the problem in fitting (please see the attached figure) where It seems left censoring improves the fitting for the lower values but not for the higher values(orange curve) and I assume in the case of left censoring fitting should improve on the right part of the distribution (i.e., extreme values) compare to when we fit the distribution on  the whole series observations (red curve).   I would appreciate if you can help to fix this problem?
  <a href="https://i.stack.imgur.com/wTfka.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/wTfka.png" alt="enter image description here" /></a></p>