View source: R/uploadToDatabase.R
insertResultsToSqlite | R Documentation |
This function create an sqlite database with the PLP result schema and inserts all results
insertResultsToSqlite(
resultLocation,
cohortDefinitions = NULL,
databaseList = NULL,
sqliteLocation = file.path(resultLocation, "sqlite")
)
resultLocation |
(string) location of directory where the main package results were saved |
cohortDefinitions |
A set of one or more cohorts extracted using ROhdsiWebApi::exportCohortDefinitionSet() |
databaseList |
A list created by |
sqliteLocation |
(string) location of directory where the sqlite database will be saved |
This function can be used upload PatientLevelPrediction results into an sqlite database
Returns the location of the sqlite database file
plpData <- getEunomiaPlpData()
saveLoc <- file.path(tempdir(), "insertResultsToSqlite")
results <- runPlp(plpData, outcomeId = 3, analysisId = 1, saveDirectory = saveLoc)
databaseFile <- insertResultsToSqlite(saveLoc, cohortDefinitions = NULL,
sqliteLocation = file.path(saveLoc, "sqlite"))
# check there is some data in the database
library(DatabaseConnector)
connectionDetails <- createConnectionDetails(
dbms = "sqlite",
server = databaseFile)
conn <- connect(connectionDetails)
# All tables should be created
getTableNames(conn, databaseSchema = "main")
# There is data in the tables
querySql(conn, "SELECT * FROM main.model_designs limit 10")
# clean up
unlink(saveLoc, recursive = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.