exportFolder <- params$exportFolder # exportFolder #toc turned to yes makes security promt in word, so it is turned off (NOT TRUE) #something else turns it on options(scipen = 999) # sample code # results <- read.csv(file.path(exportFolder, "tablesAndFigures", "EmpiricalCalibration.csv")) # analysisIds <- unique(results$analysisId) # analysisIds <- analysisIds[order(analysisIds)] # hois <- 3
knitr::include_graphics(file.path(exportFolder, "DemogrPyramidFigure.png"))
knitr::include_graphics(file.path(exportFolder, "VisitsByDecileDotPlot.png"))
This output contains additional column with value as structured output (compared to Atlas view of Heel errors)
h<-read.csv(file = file.path(exportFolder, "HeelOutput.csv")) knitr::kable(h)
d<-read.csv(file = file.path(exportFolder, "SelectedDerivedMeasures.csv")) dsmall<-d[d$measure_id=='UnmappedData:byDomain:Percentage',] knitr::kable(dsmall,row.names = F)
#read names of the derived measures measNames<-read.csv(system.file("csv","derived_analysis_details.csv",package="Achilles")) d<-merge(d,measNames[,c("measure_id","name")],all.x = T) knitr::kable(d)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.