knitr::opts_chunk$set(echo = TRUE, fig.cap = TRUE)
library(officedown)
library(officer)
library(msand)
library(tidyverse)
theme_set(theme_msand())
fp <- fp_par(
  text.align = "center", 
  padding.bottom = 20, padding.top = 120, 
  border.bottom = fp_border())
ft <- fp_text(shading.color='#EFEFEF', bold = TRUE)


















knitr::include_graphics("sandilands_data_science_logo.png")

\newpage

Table of content

block_toc(level = 5)

List of figures

block_toc(seq_id = "fig")

List of tables

block_toc(seq_id = "tab")

\newpage

Sections

A two columns section

Lorem ipsum dolor sit amet, consectetur adipiscing elit. Nulla eu pulvinar arcu, quis aliquam dui. In at cursus ante. Vestibulum non sagittis lacus. Duis vitae iaculis dui. Vivamus tempor, nibh ut pretium tempus, enim lorem dignissim quam, at euismod massa magna at magna. Sed facilisis dapibus diam nec volutpat. Maecenas facilisis dapibus egestas. Curabitur dignissim pharetra pulvinar. Nunc bibendum elit sed cursus congue.

r run_columnbreak()Curabitur ligula quam, iaculis faucibus orci quis, vestibulum lobortis lectus. Suspendisse fringilla nisl pulvinar, laoreet tellus sed, sollicitudin tortor. Donec consequat congue erat in iaculis. Curabitur luctus tellus ut turpis iaculis, nec laoreet ligula scelerisque.

Lorem ipsum dolor sit amet, consectetur adipiscing elit. Nulla eu pulvinar arcu, quis aliquam dui. In at cursus ante. Vestibulum non sagittis lacus. Duis vitae iaculis dui. Vivamus tempor, nibh ut pretium tempus, enim lorem dignissim quam, at euismod massa magna at magna. Sed facilisis dapibus diam nec volutpat. Maecenas facilisis dapibus egestas. Curabitur dignissim pharetra pulvinar. Nunc bibendum elit sed cursus congue. Curabitur ligula quam, iaculis faucibus orci quis, vestibulum lobortis lectus. Suspendisse fringilla nisl pulvinar, laoreet tellus sed, sollicitudin tortor. Donec consequat congue erat in iaculis. Curabitur luctus tellus ut turpis iaculis, nec laoreet ligula scelerisque.

End of two columns section

Lorem ipsum dolor sit amet, consectetur adipiscing elit. Nulla eu pulvinar arcu, quis aliquam dui. In at cursus ante. Vestibulum non sagittis lacus. Duis vitae iaculis dui. Vivamus tempor, nibh ut pretium tempus, enim lorem dignissim quam, at euismod massa magna at magna.

Lorem ipsum dolor sit amet, consectetur adipiscing elit. Nulla eu pulvinar arcu, quis aliquam dui. In at cursus ante. Vestibulum non sagittis lacus. Duis vitae iaculis dui. Vivamus tempor, nibh ut pretium tempus, enim lorem dignissim quam, at euismod massa magna at magna. Sed facilisis dapibus diam nec volutpat. Maecenas facilisis dapibus egestas. Curabitur dignissim pharetra pulvinar. Nunc bibendum elit sed cursus congue. Curabitur ligula quam, iaculis faucibus orci quis, vestibulum lobortis lectus. Suspendisse fringilla nisl pulvinar, laoreet tellus sed, sollicitudin tortor. Donec consequat congue erat in iaculis. Curabitur luctus tellus ut turpis iaculis, nec laoreet ligula scelerisque.

\newpage

Section 1

mtcars %>% 
  ggplot(aes(disp, mpg)) +
  geom_point(color = palette_msand()[1], size = 3) +
  labs(
    title = "MPG vs DISP",
    x = "DISP",
    y = "MPG"
  )

Subsection 1

head(mtcars)

Section 2

mtcars %>% 
  ggplot(aes(disp, mpg)) +
  geom_point(color = palette_msand()[1], size = 3) +
  labs(
    title = "MPG vs DISP",
    x = "DISP",
    y = "MPG"
  )

H3

H4

H5
H6

Here is a link to GOOGLE

Here is a word in bold and another word in bold.

Here is a word in italics and another word in italics.

When we compile our document, we are using the rmarkdown package.

Here are some example R commands:

2+2
mean(c(1,2,3,4,5))

\newpage

Here is an example of a non-numbered list:

Here is an example of a numbered list:

  1. Breakfast a. food i. eggs ii. toast iii. bacon b. drink i. apple juice
  2. Lunch a. taco
  3. Dinner a. baked chicken b. broccoli c. rice

\newpage

Here is an example of a blockquote:

This is a block quote. This paragraph has two lines.

  1. This is a list inside a block quote.
  2. Second item.

Here is an example of a nested blockquote:

This is a block quote. This paragraph has two lines.

This text is nested

Here is an example of code in a blockquote:

2+2
mean(c(1,2,3,4,5))
paste("This is text", "This is more text", sep = " ")


MichaelSandilands/msand documentation built on Jan. 28, 2023, 8:27 p.m.