Four score and seven years ago, some famous President spoke infamous words that would live on throughout history. These words are famous enough that I want to highlight them with a block quote.
x = rnorm(n = 100, mean = 0, sd = 1) # N(0,1)
y = rnorm(n = 100, mean = 2, sd = 0.5) # N(2, 0.5)
summary(x)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## -2.21193 -0.53439 -0.03109 0.05531 0.62095 2.84033
summary(y)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 0.7084 1.6985 2.0376 2.0367 2.3766 3.3162
hist(x)
plot(x,y)
Some of these methods work better than others with a particular output format.
knitr::include_graphics()
.The html_document
format is fine with using the URL as the input to knitr::include_graphics()
, but the pdf_document
format seems to want a local file path, hence the use of download.file()
.
download.file("https://nyu.databrary.org/party/6/avatar",'img/rog.png', mode = 'wb')
knitr::include_graphics("img/rog.png")
knitr::include_graphics()
knitr::include_graphics("img/sleic.jpg")
summ.x = summary(x)
summ.y = summary(y)
names(summ.x) # Figure out variable names for indexing
## [1] "Min." "1st Qu." "Median" "Mean" "3rd Qu." "Max."
Index by variable name: X lies within the range of [-2.2119335, 2.8403283].
Index by numeric index: The (y-x) difference in means is 1.981394.
Calculate and report: The correlation between x and y is 0.0732853.
\[e=mc^{2}\]
Here is the footnote text. Note that it ends up at the end of the document.↩︎