Trial concept calculated: sample size of the trial, preferring results-related over protocol-related information.
Arguments
- df
data frame such as from dbGetFieldsIntoDf. If `NULL`, prints fields needed in `df` for calculating this trial concept, which can be used with dbGetFieldsIntoDf.
Examples
# fields needed
f.sampleSize()
#> $euctr
#> [1] "trialInformation.countrySubjectCounts.countrySubjectCount.subjects"
#> [2] "f11_number_of_subjects_for_this_age_range"
#> [3] "f1111_number_of_subjects_for_this_age_range"
#> [4] "f1121_number_of_subjects_for_this_age_range"
#> [5] "f1131_number_of_subjects_for_this_age_range"
#> [6] "f1141_number_of_subjects_for_this_age_range"
#> [7] "f1151_number_of_subjects_for_this_age_range"
#> [8] "f1161_number_of_subjects_for_this_age_range"
#> [9] "f121_number_of_subjects_for_this_age_range"
#> [10] "f131_number_of_subjects_for_this_age_range"
#>
#> $ctgov
#> [1] "enrollment"
#>
#> $ctgov2
#> [1] "protocolSection.designModule.enrollmentInfo.count"
#>
#> $isrctn
#> [1] "participants.targetEnrolment" "participants.totalFinalEnrolment"
#>
#> $ctis
#> [1] "authorizedPartsII.recruitmentSubjectCount"
#> [2] "authorizedPartI.rowSubjectCount"
#> [3] "authorizedApplication.authorizedPartsII.recruitmentSubjectCount"
#> [4] "authorizedApplication.authorizedPartI.rowSubjectCount"
#>
if (FALSE) { # \dontrun{
# apply trial concept when creating data frame
dbc <- nodbi::src_sqlite(
dbname = system.file("extdata", "demo.sqlite", package = "ctrdata"),
collection = "my_trials", flags = RSQLite::SQLITE_RO)
trialsDf <- dbGetFieldsIntoDf(
calculate = "f.sampleSize",
con = dbc)
} # }