class: inverse, hide-logo, suppress-footer, center, middle

cmdlr::load_packages(c("fontawesome"))
options(htmltools.dir.version = FALSE)

# Set knitr default options
knitr::opts_chunk$set(echo = FALSE, eval = TRUE, warning = FALSE, message = FALSE)

.center[ .middle[ NMBU logo white
] ]


class: inverse, center, middle

Title of the presentation

Subtitle of the presentation

Erlend Dancke Sandorfa
Author Twoa
Author Threeb
Author Fourb

aNorwegian University of Life Sciences

bA different university


Create a function that can add two numbers and have a long title

add <- function(x, y) {
  return(x + y)
}

??? Speaker notes I think


The simplest MNL model

$$\Pr(i_{nit}|\beta) = \frac{\exp(\beta X_{nit})}{\sum_{j=1}^{J}\exp(\beta X_{njt})}$$

-- where


A slide with blocks

.content-box-green[This is a green box]

--

.content-box-light-green[This is a light green box]


Blockquote

.pull-left[ .blockquote[ Statistics is the grammar of science. .right[-- Karl Pearson] ] ]

-- .pull-right[

.blockquote[
  Statistics is the grammar of science.
  .right[-- <cite>Karl Pearson</cite>]
]

]


Use footnotes

Lorem ipsum dolor sit amet, consectetur adipiscing elit, sed do eiusmod tempor incididunt ut labore et dolore magna aliqua1

.footnote[ [1] What my footnote says ]


Slide with bullets

--

--

--

  1. Numbered a. Numbered
  2. Numbered

Slide with R output

summary(cars)

Slide with plot

plot(pressure)

class: inverse, hide-logo, suppress-footer, center, middle

Thank you!

NMBU squares


edsandorf/gizmo documentation built on Oct. 7, 2022, 3:45 p.m.