knitr::opts_chunk$set(echo = TRUE)
WD
getwd()
spruce.df = read.csv("SPRUCE.csv") head(spruce.df)
obj = lm(Height~BHDiameter, data = spruce.df) summary(obj) plot(Height~BHDiameter, data = spruce.df) abline(obj) library(s20x) trendscatter(Height~BHDiameter,f=0.7, data=spruce.df)
This is how you place images in RMD documents
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.