# NOT RUN {
dataFileRates <- system.file("extdata",
"dataset_rates.csv", package = "rpact")
if (dataFileRates != "") {
datasetRates <- readDataset(dataFileRates)
datasetRates
}
dataFileMeansMultiArm <- system.file("extdata",
"dataset_means_multi-arm.csv", package = "rpact")
if (dataFileMeansMultiArm != "") {
datasetMeansMultiArm <- readDataset(dataFileMeansMultiArm)
datasetMeansMultiArm
}
dataFileRatesMultiArm <- system.file("extdata",
"dataset_rates_multi-arm.csv", package = "rpact")
if (dataFileRatesMultiArm != "") {
datasetRatesMultiArm <- readDataset(dataFileRatesMultiArm)
datasetRatesMultiArm
}
dataFileSurvivalMultiArm <- system.file("extdata",
"dataset_survival_multi-arm.csv", package = "rpact")
if (dataFileSurvivalMultiArm != "") {
datasetSurvivalMultiArm <- readDataset(dataFileSurvivalMultiArm)
datasetSurvivalMultiArm
}
# }
Run the code above in your browser using DataLab