Fake Analysis Report

Creating Dummy Text

First, I created some dummy text via

library(tidyverse)
library(stringi)
set.seed(123)
stri_rand_lipsum(1)

Dealing With Formatting

The output from thos functions can be easily formated like so:

Lorem ipsum dolor sit amet, sollicitudin duis maecenas habitasse ultrices aenean tempus. Volutpat id, non natoque ad, commodo suscipit sed risus, facilisis mauris aliquam, a. Non leo leo, sapien non eu a quam. Nunc vivamus in, purus ultricies ac suspendisse at. Eu quisque fames sapien consequat et nisl nunc, viverra est mattis mattis posuere. Purus quisque auctor aenean sed risus mauris ante nisi. Ligula ac vitae lacinia. Magna aliquet et mi cubilia per. Hendrerit amet eu ullamcorper turpis ultrices aliquam.¹

Also, one can transform the text into lists sentence by sentence

• Lorem ipsum dolor sit amet, sollicitudin duis maecenas habitasse ultrices aenean tempus.
• Volutpat id, non natoque ad, commodo suscipit sed risus, facilisis mauris aliquam, a.
• Non leo leo, sapien non eu a quam.
• Nunc vivamus in, purus ultricies ac suspendisse at.
• Eu quisque fames sapien consequat et nisl nunc, viverra est mattis mattis posuere.
• Purus quisque auctor aenean sed risus mauris ante nisi.
• Ligula ac vitae lacinia. Magna aliquet et mi cubilia per.
• Hendrerit amet eu ullamcorper turpis ultrices aliquam.

1. Lorem ipsum dolor sit amet, sollicitudin duis maecenas habitasse ultrices aenean tempus.
2. Volutpat id, non natoque ad, commodo suscipit sed risus, facilisis mauris aliquam, a.
3. Non leo leo, sapien non eu a quam.
4. Nunc vivamus in, purus ultricies ac suspendisse at.
5. Eu quisque fames sapien consequat et nisl nunc, viverra est mattis mattis posuere.
6. Purus quisque auctor aenean sed risus mauris ante nisi.
7. Ligula ac vitae lacinia. Magna aliquet et mi cubilia per.
8. Hendrerit amet eu ullamcorper turpis ultrices aliquam.

Tables

The first 10 rows and first 5 columns of ggplot2::mpg are displayed in this fancy table:

manufacturer	model	displ	year	cyl
audi	a4	1.8	1999	4
audi	a4	1.8	1999	4
audi	a4	2.0	2008	4
audi	a4	2.0	2008	4
audi	a4	2.8	1999	6
audi	a4	2.8	1999	6
audi	a4	3.1	2008	6
audi	a4 quattro	1.8	1999	4
audi	a4 quattro	1.8	1999	4
audi	a4 quattro	2.0	2008	4

Plots

Finally, I created this helpful plot.

Also, I did this using the following code:

nycflights13::flights %>% 
  na.omit() %>% 
  filter(dep_delay > 0) %>% 
  ggplot(aes(x = dep_delay)) +
  geom_histogram() + 
  scale_x_log10()

---

1. This is an amazing footnote containing another Link↩︎