The hardware and bandwidth for this mirror is donated by dogado GmbH, the Webhosting and Full Service-Cloud Provider. Check out our Wordpress Tutorial.
If you wish to report a bug, or if you are interested in having us mirror your free-software or open-source project, please feel free to contact us at mirror[@]dogado.de.
library(dropR)
data("dropRdemo")
qs <- which(grepl("vi_", names(dropRdemo)))
dropRdemo <- add_dropout_idx(dropRdemo, q_pos = qs)
stats <- compute_stats(dropRdemo,
by_cond = "experimental_condition",
no_of_vars = length(qs))
NOTE: Chi-sq. tests are only available when an column denoting the experimental condition is given.
Let’s compute a Chisq test at question 15 for experimentatl
conditions 11
and 12
. dropR’s dropout
Chisq-Test returns a list containing the actual test results
and dropout overview table at the selected question.
do_chisq(stats,
chisq_question = 15,
sel_cond_chisq = c('11','12'),
p_sim = TRUE)
#> $`Test result`
#>
#> Pearson's Chi-squared test with simulated p-value (based on 2000
#> replicates)
#>
#> data: test_table
#> X-squared = 1.1979, df = NA, p-value = 0.3253
#>
#>
#> $`Dropout at question 15`
#> participants
#> conditions dropout remaining
#> 11 14 58
#> 12 7 50
kpm <- do_kpm(df = add_dropout_idx(dropRdemo, qs),
condition_col = "experimental_condition",
model_fit = "total")
kpm$model_fit
#> [1] "total"
head(kpm$steps)
#> x y uppr lwr condition
#> 1 0 0.3821138 0.4479241 0.3259726 total
#> 2 1 0.3821138 0.4479241 0.3259726 total
#> 3 1 0.3373984 0.4019727 0.2831975 total
#> 4 2 0.3373984 0.4019727 0.2831975 total
#> 5 2 0.3252033 0.3893417 0.2716307 total
#> 6 3 0.3252033 0.3893417 0.2716307 total
head(kpm$d)
#> obs_id experimental_condition vi_1 vi_2 vi_3 vi_4 vi_5 vi_6 vi_7 vi_8 vi_9
#> 1 7a9f33 11 1 1 1 1 1 1 1 1 1
#> 2 e11f94 22 1 NA 1 1 1 1 NA NA NA
#> 3 e72a50 22 1 NA 1 1 1 1 1 1 1
#> 4 f90f5f 11 1 1 1 1 1 1 1 1 1
#> 5 20bc72 12 1 NA 1 1 1 1 1 1 1
#> 6 76b97a 22 1 NA 1 1 1 1 1 1 1
#> vi_10 vi_11 vi_12 vi_13 vi_14 vi_15 vi_16 vi_17 vi_18 vi_19 vi_20 vi_21 vi_22
#> 1 1 1 1 1 1 1 1 1 1 1 1 1 1
#> 2 NA NA NA NA NA NA NA NA NA NA NA NA NA
#> 3 1 1 1 1 1 1 1 1 1 1 1 1 1
#> 4 1 1 1 1 1 1 1 1 1 1 1 1 1
#> 5 1 1 1 1 1 1 1 1 1 1 1 1 1
#> 6 1 1 1 1 1 1 1 1 1 1 1 1 1
#> vi_23 vi_24 vi_25 vi_26 vi_27 vi_28 vi_29 vi_30 vi_31 vi_32 vi_33 vi_34 vi_35
#> 1 1 1 1 1 1 1 1 1 1 1 1 1 1
#> 2 NA NA NA NA NA NA NA NA NA NA NA NA NA
#> 3 1 1 1 1 1 1 1 1 1 1 1 1 1
#> 4 1 1 1 1 1 1 1 1 1 1 1 1 1
#> 5 1 1 1 1 1 1 1 1 1 1 1 1 1
#> 6 1 1 1 1 1 NA NA NA NA NA NA NA NA
#> vi_36 vi_37 vi_38 vi_39 vi_40 vi_41 vi_42 vi_43 vi_44 vi_45 vi_46 vi_47 vi_48
#> 1 1 1 1 1 1 1 1 1 1 1 1 1 1
#> 2 NA NA NA NA NA NA NA NA NA NA NA NA NA
#> 3 1 1 1 1 1 1 1 1 1 1 1 1 1
#> 4 1 1 1 1 1 1 1 1 1 1 1 1 1
#> 5 1 1 1 1 1 1 1 1 1 1 1 1 1
#> 6 NA NA NA NA NA NA NA NA NA NA NA NA NA
#> vi_49 vi_50 vi_51 vi_52 do_idx surv
#> 1 1 1 1 1 0 0
#> 2 NA NA NA NA 6 6
#> 3 1 1 1 1 0 0
#> 4 1 1 1 1 0 0
#> 5 1 1 1 1 0 0
#> 6 NA NA NA NA 27 27
These binaries (installable software) and packages are in development.
They may not be fully stable and should be used with caution. We make no claims about them.
Health stats visible at Monitor.