class: title-slide, left, bottom
library(knitr) library(tidyverse) ### Packages not on CRAN ### # install.packages("remotes") # remotes::install_github("mitchelloharawild/icons") library(icons) # icons need to be loaded to view so run following code if not already done # icons::download_fontawesome() # install.packages("devtools") #devtools::install_github("gadenbuie/xaringanExtra") library(xaringanExtra) xaringanExtra::use_share_again() # need to get the slide button on html view # install.packages("devtools") # devtools::install_github('nhs-r-community/nhsrtheme') library(nhsrtheme) # set default options opts_chunk$set(echo = FALSE, fig.width = 7.252, fig.height = 4, dpi = 300, dev.args = list(type = "cairo"), eval = TRUE, warning = FALSE, message = FALSE, error = FALSE) # uncomment the following lines if you want to use the NHS-R theme colours by default # scale_fill_continuous <- partial(scale_fill_nhs, discrete = FALSE) # scale_fill_discrete <- partial(scale_fill_nhs, discrete = TRUE) # scale_colour_continuous <- partial(scale_colour_nhs, discrete = FALSE) # scale_colour_discrete <- partial(scale_colour_nhs, discrete = TRUE)
# Adds logo to all slides xaringanExtra::use_logo( image_url = "https://cdu-data-science-team.github.io/assets//logo/nottshc-logo.jpg", exclude_class = c("inverse", "hide-logo"), width = "300px", height = "200px", position = css_position(top = "0em", right = "1em") )
r rmarkdown::metadata$title
r rmarkdown::metadata$subtitle
r rmarkdown::metadata$author
| r rmarkdown::metadata$date
class: inverse, middle, center
Links on an inverse slide would look like
this one leading to acknowledgements
class: inverse-white, middle, center
If slides overrun the bottom image this slide can be used to remove the image completely - keeping the logo unless hide-logo added to class:
like
this one leading to a table that overruns the background
--
--
--
--
You can emphasize text with color:
--
And make it bold or italicized using Markdown:
knitr::kable(head(iris), format = 'html')
This is what a quote looks like.
class: inverse-white, hide-logo
name: line-highlight
An example of using the trailing comment #<<
to highlight lines:
`r ''````r library(ggplot2) ggplot(mtcars) + aes(mpg, disp) + geom_point() + #<< geom_smooth() #<< ```
library(ggplot2) ggplot(mtcars) + aes(mpg, disp) + geom_point() + #<< geom_smooth() #<<
class: inverse-white
Footnotes overrun the slide background image so this is footnote to use with inverse-white or inverse.
.footnote[The nhsr theme was designed by Silvia Canelon for, and with feedback from, the NHS-R Community, following the NHS identity guidelines.]
Footnotes with a background need to be called with footnote-background
. To alter in nhsr.css
change margin-top:
.footnote-background[The nhsr theme was designed by Silvia Canelon for, and with feedback from, the NHS-R Community, following the NHS identity guidelines.]
class: inverse
name: acknowledgement
Acknowledgements: the professional look of this presentation, using NHS and Nottinghamshire Healthcare NHS Foundation Trust colour branding, exists because of the amazing work of Silvia Canelón, details of the workshops she ran at the NHS-R Community conference, Milan Wiedemann who created the CDU Data Science logo with the help of the team and Zoë Turner for putting together the slides.
r icons::fontawesome("twitter")
@DataScienceNott
r icons::fontawesome("github")
Clinical Development Unit Data Science Team
r icons::fontawesome("paper-plane")
cdudatascience@nottshc.nhs.uk
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.