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