Running examples in ‘crch-Ex.R’ failed
The error most likely occurred in:

> ### Name: CensoredLogistic
> ### Title: Create a Censored Logistic Distribution
> ### Aliases: CensoredLogistic mean.CensoredLogistic
> ###   variance.CensoredLogistic skewness.CensoredLogistic
> ###   kurtosis.CensoredLogistic pdf.CensoredLogistic
> ###   log_pdf.CensoredLogistic cdf.CensoredLogistic
> ###   quantile.CensoredLogistic random.CensoredLogistic
> ###   crps.CensoredLogistic support.CensoredLogistic
> 
> ### ** Examples
> 
> ## Don't show: 
>  if(!requireNamespace("distributions3")) {
+   if(interactive() || is.na(Sys.getenv("_R_CHECK_PACKAGE_NAME_", NA))) {
+     stop("not all packages required for the example are installed")
+   } else q() }
Loading required namespace: distributions3
> ## End(Don't show)
> ## package and random seed
> library("distributions3")

Attaching package: ‘distributions3’

The following object is masked from ‘package:stats’:

    Gamma

The following object is masked from ‘package:grDevices’:

    pdf

> set.seed(6020)
> 
> ## three censored logistic distributions:
> ## - uncensored standard logistic
> ## - left-censored at zero with latent location = 1 and scale = 1
> ## - interval-censored in [0, 5] with latent location = 2 and scale = 1
> X <- CensoredLogistic(
+   location = c(   0,   1, 2),
+   scale    = c(   1,   1, 1),
+   left     = c(-Inf,   0, 0),
+   right    = c( Inf, Inf, 5)
+ )
> X
[1] "CensoredLogistic distribution (location = 0, scale = 1, left = -Inf, right = Inf)"
[2] "CensoredLogistic distribution (location = 1, scale = 1, left =    0, right = Inf)"
[3] "CensoredLogistic distribution (location = 2, scale = 1, left =    0, right =   5)"
> 
> ## compute mean of the censored distribution
> mean(X)
[1] 0.000000 1.313262 2.078341
> ## higher moments (variance, skewness, kurtosis) are not implemented yet
> 
> ## support interval (minimum and maximum)
> support(X)
      min max
[1,] -Inf Inf
[2,]    0 Inf
[3,]    0   5
> 
> ## simulate random variables
> random(X, 5)
            r_1        r_2        r_3         r_4        r_5
[1,] -0.5489266 0.71149394 -0.9934677 -0.09368233 -3.1677767
[2,]  0.3829342 2.00150190  2.0657180  0.31347300  0.0000000
[3,]  2.7294189 0.05283236  0.0000000  1.19632319  0.5573964
> 
> ## histograms of 1,000 simulated observations
> x <- random(X, 1000)
> hist(x[1, ], main = "uncensored")
> hist(x[2, ], main = "left-censored at zero")
> hist(x[3, ], main = "interval-censored in [0, 5]")
> 
> ## probability density function (PDF) and log-density (or log-likelihood)
> x <- c(0, 0, 1)
> pdf(X, x)
Error in FUN(at, d = d, ...) : unused argument (elementwise = NULL)
Calls: pdf -> pdf.CensoredLogistic -> <Anonymous>
Execution halted