\rhead{\today}
\lhead{\includegraphics[width=10cm]{r system.file("figures", "sph_cida_wm_blk.png", package = "CIDAtools")
}}
knitr::opts_chunk$set(echo = FALSE, warning = FALSE, message = FALSE)
knitr::opts_chunk$set(echo = FALSE) library(tidyverse) library(knitr) library(kableExtra) library(CIDAtools)
Project: r CIDAtools::ProjectName()
\newline
Analyst: r CIDAtools::ProjectAnalyst()
\newline
Investigator(s): r CIDAtools::ProjectPI()
\newline
Report generated: r paste(format(Sys.Date(), '%B %d, %Y'))
\newline
Introduction text
Methods text
Tables/Figures/Results section
data("cars") plot(cars$speed, cars$dist, pch = 20)
cars$group <- paste0("Group " , rep(1:2,25)) # See: https://cran.r-project.org/web/packages/furniture/vignettes/Table1.html furniture::table1( cars, "Speed (mph)" = speed, "Distance (mi)" = dist, splitby = ~ group, test = TRUE, type = c("simple", "condensed"), output = "latex", align = "c", caption = "Sample characteristics" ) %>% kable_styling(latex_options = "hold_position")
Interpretations, discussion
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.