Running examples in 'hrIPW-Ex.R' failed
The error most likely occurred in:

> ### Name: hrIPW
> ### Title: Hazard ratio estimation using Cox model weighted by the
> ###   propensity score
> ### Aliases: hrIPW
> 
> ### ** Examples
> 
> ## Using a simulated cohort
> data(hrData, package = "hrIPW")
> hrIPW(hrData, time = "time", status = "status", exposure = "Trt",
+       variables = paste("X", 1:9, sep = ""), wtype = "ATE-stab")
$coefficient
[1] -0.01717167

$std
[1] 0.03282054

$ciinf
[1] -0.08149875

$cisup
[1] 0.04715541

$p.value
[1] 0.6008359

> 
> # Standard error could be compared with the (robust) Lin's standard error
> # which does not take into account the propensity score estimation step:
> modT <- glm(Trt ~ X1 + X2 + X3 + X4 + X5 + X6 + X7 + X8 + X9, data = hrData, family = "binomial")
> probT <- predict(modT, type = "response")
> hrData$w <- 1/ifelse(hrData$Trt == 1, probT, 1 - probT)
> library(survival)
> coxph(Surv(time, status) ~ Trt + cluster(id), data = hrData, method = "breslow", weights = w)
Call:
coxph(formula = Surv(time, status) ~ Trt, data = hrData, weights = w, 
    method = "breslow", cluster = id)

        coef exp(coef) se(coef) robust se      z     p
Trt -0.01743   0.98272  0.01415   0.03543 -0.492 0.623

Likelihood ratio test=1.52  on 1 df, p=0.2182
n= 10000, number of events= 10000 
> 
> # or with the bootstrap-based standard-error (see Austin 2016):
> ## Not run: 
> ##D f.boot <- function(data, i, wtype) {
> ##D     df <- data[i, ]
> ##D     modT <- glm(Trt ~ X1 + X2 + X3 + X4 + X5 + X6 + X7 + X8 + X9, data = df, family = "binomial")
> ##D     probT <- predict(modT, type = "response")
> ##D     df$w <- 1/ifelse(df$Trt == 1, probT, 1 - probT)
> ##D 
> ##D     return(coxph(Surv(time, status) ~ Trt, data = df, weights = w)$coef)
> ##D }
> ##D 
> ##D library(boot); set.seed(1234)
> ##D rcoefs <- boot(data = hrData, statistic = f.boot, R = 500)$t
> ##D sd(rcoefs)
> ## End(Not run)
> 
> ## Using the DIVAT data base (package IPWsurvival, to be installed)
> data(dataDIVAT2, package = "RISCA")
Error in find.package(package, lib.loc, verbose = verbose) : 
  there is no package called 'RISCA'
Calls: data -> find.package
Execution halted