Last updated on 2026-11-10 02:51:46 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 1.3.0 | 7.96 | 100.37 | 108.33 | OK | |
| r-devel-linux-x86_64-debian-gcc | 1.3.0 | 5.99 | 62.49 | 68.48 | ERROR | |
| r-devel-linux-x86_64-fedora-clang | 1.3.0 | OK | ||||
| r-devel-linux-x86_64-fedora-gcc | 1.3.0 | 72.17 | OK | |||
| r-devel-windows-x86_64 | 1.3.0 | 13.00 | 111.00 | 124.00 | OK | |
| r-patched-linux-x86_64 | 1.3.0 | OK | ||||
| r-release-linux-x86_64 | 1.3.0 | 9.22 | 92.55 | 101.77 | OK | |
| r-release-macos-arm64 | 1.3.0 | 2.00 | 26.00 | 28.00 | OK | |
| r-release-macos-x86_64 | 1.3.0 | 6.00 | 131.00 | 137.00 | OK | |
| r-release-windows-x86_64 | 1.3.0 | 13.00 | 117.00 | 130.00 | OK | |
| r-oldrel-macos-arm64 | 1.3.0 | 3.00 | 28.00 | 31.00 | OK | |
| r-oldrel-macos-x86_64 | 1.3.0 | 6.00 | 131.00 | 137.00 | OK | |
| r-oldrel-windows-x86_64 | 1.3.0 | 16.00 | 130.00 | 146.00 | OK |
Version: 1.3.0
Check: examples
Result: ERROR
Running examples in ‘DTEAssurance-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: calibrate_PP_threshold
> ### Title: Function to calculate the 'optimal' PP threshold value
> ### Aliases: calibrate_PP_threshold
>
> ### ** Examples
>
> set.seed(123)
> control_model <- list(dist = "Exponential", parameter_mode = "Distribution",
+ t1 = 12, t1_Beta_a = 20, t1_Beta_b = 32)
>
> effect_model <- list(delay_SHELF = SHELF::fitdist(c(5.5, 6, 6.5),
+ probs = c(0.25, 0.5, 0.75), lower = 0, upper = 12),
+ delay_dist = "gamma",
+ HR_SHELF = SHELF::fitdist(c(0.5, 0.6, 0.7),
+ probs = c(0.25, 0.5, 0.75), lower = 0, upper = 1),
+ HR_dist = "gamma",
+ P_S = 1, P_DTE = 0)
>
> recruitment_model <- list(method = "power", period = 12, power = 1)
>
> IA_model <- list(events = 40, IF = 0.5)
>
> analysis_model <- list(method = "LRT", alpha = 0.025,
+ alternative_hypothesis = "one.sided")
>
> data_generating_model <- list(lambda_c = log(2)/12, gamma_c = NULL,
+ delay_time = 3, post_delay_HR = 0.75)
>
> # A single future efficacy look at 30 events (Z > 2.24), then final at 40
> # events (Z > 2.00) -- match this to the true design's own boundaries.
> future_boundaries <- list(
+ list(events = 30, crit = 2.24),
+ list(events = 40, crit = 2.00)
+ )
>
> # Deliberately small settings so the example runs quickly. For a real
> # analysis use the defaults (update_priors_sims = 1000, PP_sims = 2000)
> # and a larger n_df_sims.
> threshold <- calibrate_PP_threshold(n_c = 25, n_t = 25,
+ control_model = control_model,
+ effect_model = effect_model,
+ recruitment_model = recruitment_model,
+ IA_model = IA_model,
+ analysis_model = analysis_model,
+ data_generating_model = data_generating_model,
+ future_boundaries = future_boundaries,
+ update_priors_sims = 100,
+ PP_sims = 100,
+ n_df_sims = 2)
Error in update_priors(data, control_model = control_model, effect_model = effect_model, :
This function requires the 'rjags' package. Please install it with install.packages('rjags').
Calls: calibrate_PP_threshold -> lapply -> FUN -> update_priors
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc