experiment with ggplot

Author: svmiller

article2-example/svm-article2-example.Rmd

@@ -38,6 +38,8 @@ header-includes:
 
 ```{r setup, include=FALSE}
 knitr::opts_chunk$set(echo = TRUE)
+library(tidyverse)
+library(stevemisc)
 ```
 
 
@@ -68,6 +70,18 @@ This is an R Markdown document. Markdown is a simple formatting syntax for autho
 
 \kant[19-23]
 
+```{r, echo=F, fig.cap = "A Simple ggplot with the mtcars Data in R", message=F, fig.width=8}
+
+mtcars %>%
+  ggplot(.,aes(wt, mpg)) + geom_point() +
+  theme_steve_web() +
+  geom_smooth(method="lm") +
+  labs(caption = "Data: 1974 Motor Trend US magazine",
+       x = "Weight (1,000 Pounds)",
+       y = "(U.S.) Miles per Gallon")
+
+```
+
 When you click the **Knit** button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:
 
 ```{r cars}
@@ -91,6 +105,10 @@ Note that the `echo = FALSE` parameter was added to the code chunk to prevent pr
 
 \kant[25-35]
 
+```{r}
+plot(mtcars)
+```
+
 # Conclusion
 
 \kant[36-40]

article2-example/svm-article2-example.pdf

@@ -179,10 +179,7 @@
 % See: https://tex.stackexchange.com/questions/2275/keeping-tables-figures-close-to-where-they-are-mentioned
 \usepackage[section]{placeins}
 
-\usepackage{longtable}
-\LTcapwidth=.95\textwidth
-\linespread{1.05}
-\usepackage{hyperref}
+
 
 \makeatletter
 \@ifpackageloaded{hyperref}{}{%
@@ -217,12 +214,24 @@
 
 
 
+% This will better treat References as a section when using natbib
 % https://tex.stackexchange.com/questions/49962/bibliography-title-fontsize-problem-with-bibtex-and-the-natbib-package
 \renewcommand\bibsection{%
    \section*{References}%
    \markboth{\MakeUppercase{\refname}}{\MakeUppercase{\refname}}%
   }%
 
+% set default figure placement to htbp
+\makeatletter
+\def\fps@figure{htbp}
+\makeatother
+
+
+
+\usepackage{longtable}
+\LTcapwidth=.95\textwidth
+\linespread{1.05}
+\usepackage{hyperref}
 \begin{document}
 
 % \textsf{\textbf{This is sans-serif bold text.}}
@@ -332,6 +341,12 @@ \subsection{Another Subsection}\label{another-subsection}}
 
 \kant[19-23]
 
+\begin{figure}
+\centering
+\includegraphics{svm-article2-example_files/figure-latex/unnamed-chunk-1-1.pdf}
+\caption{A Simple ggplot with the mtcars Data in R}
+\end{figure}
+
 When you click the \textbf{Knit} button a document will be generated
 that includes both content as well as the output of any embedded R code
 chunks within the document. You can embed an R code chunk like this:
@@ -369,6 +384,14 @@ \subsection{Including Plots}\label{including-plots}}
 
 \kant[25-35]
 
+\begin{Shaded}
+\begin{Highlighting}[]
+\KeywordTok{plot}\NormalTok{(mtcars)}
+\end{Highlighting}
+\end{Shaded}
+
+\includegraphics{svm-article2-example_files/figure-latex/unnamed-chunk-2-1.pdf}
+
 \hypertarget{conclusion}{%
 \section{Conclusion}\label{conclusion}}