Special Purpose class
dm_l
Demographics data DM
and supplemental Demographics data SUPP
sv_l
Subject Visits data SV
and supplemental Subject Visits data SUPP
1 2 3 4 5 6 7 8 | library(DBI)
library(sqldf)
studies_dir <- system.file("extdata", "ImmPortStudies", package = "RImmPort")
db_dir <- file.path(studies_dir, "Db")
sqlite_conn <- dbConnect(SQLite(), dbname=file.path(db_dir, "ImmPort.sqlite"))
setImmPortDataSource(sqlite_conn)
sdy139 <- getStudy("SDY139")
dm_df <- sdy139$special_purpose$dm_l$dm_df
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.