View source: R/ExternalValidatePlp.R
validateExternal | R Documentation |
validateExternal - Validate model performance on new data
validateExternal(
validationDesignList,
databaseDetails,
logSettings = createLogSettings(verbosity = "INFO", logName = "validatePLP"),
outputFolder
)
validationDesignList |
A list of objects created with |
databaseDetails |
A list of objects of class
|
logSettings |
An object of |
outputFolder |
The directory to save the validation results to (subfolders are created per database in validationDatabaseDetails) |
A list of results
data("simulationProfile")
plpData <- simulatePlpData(simulationProfile, n=1000)
# first fit a model on some data, default is a L1 logistic regression
saveLoc <- file.path(tempdir(), "development")
results <- runPlp(plpData, saveDirectory = saveLoc)
# then create my validation design
validationDesign <- createValidationDesign(1, 3, plpModelList = list(results$model))
# I will validate on Eunomia example database
connectionDetails <- Eunomia::getEunomiaConnectionDetails()
Eunomia::createCohorts(connectionDetails)
databaseDetails <- createDatabaseDetails(connectionDetails = connectionDetails,
cdmDatabaseSchema = "main", cdmDatabaseName = "Eunomia", cdmDatabaseId = 1,
targetId = 1, outcomeIds = 3)
path <- file.path(tempdir(), "validation")
validateExternal(validationDesign, databaseDetails, outputFolder = path)
# see generated result files
dir(path, recursive = TRUE)
# clean up
unlink(saveLoc, recursive = TRUE)
unlink(path, recursive = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.