Findings class
lb_lLaboratory Test Results data LB and supplemental Laboratory Test Results data SUPPLB
pe_lPhysical Examination data PE and supplemental Physical Examination data SUPPPE
vs_lVital Signs data VS and supplemental Vital Signs data SUPPVS
qs_lQuestionnaires data QS and supplemental Questionnaires data SUPP
fa_lFindings About data FA and supplemental Findings About data SUPPFA
sr_lSkin Response data SR and supplemental Skin Response data SUPP
pf_lGenetics Findings data PF and supplemental Genetics Findings data SUPPPF
za_lProtein Quantification data ZA and supplemental Protein Quantification data SUPPZA
zb_lCellular Quantification data ZB and supplemental Cellular Quantification data SUPP
zc_lNucleic Acid Quantification data ZC and supplemental Nucleic Acid Quantification data SUPP
zd_lTiter Assay Results data ZD and supplemental Titer Assay Results 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")
zb_df <- sdy139$findings$zb_l$zb_df
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.