hand-merged knitr material

[cdsc_tex.git] / paper_template / text.Rnw

diff --git a/paper_template/text.Rnw b/paper_template/text.Rnw
index a58ce9129e6821b96ef6d43542a745c3e0ee161e..1f38026e761982d040e11916f31f732fdcf27efe 100644 (file)
--- a/paper_template/text.Rnw
+++ b/paper_template/text.Rnw
@@ -10,6 +10,17 @@
 
 \usepackage[utf8]{inputenc}
 \usepackage{wrapfig}
+
+<<init, echo=FALSE>>=
+knit_hooks$set(document = function(x) {
+  sub('\\usepackage[]{color}',
+'\\usepackage[usenames,dvipsnames]{color}', x, fixed = TRUE)
+})
+opts_chunk$set(fig.path="figures/knitr-")
+
+source("resources/preamble.R")
+@
+
 \usepackage[T1]{fontenc}
 \usepackage{textcomp}
 \usepackage[garamond]{mathdesign}
@@ -26,9 +37,7 @@
 % \usepackage{endfloat}
 
 % import and customize urls
-\usepackage[usenames,dvipsnames]{color}
 \usepackage[breaklinks]{hyperref}
-
 \hypersetup{colorlinks=true, linkcolor=Black, citecolor=Black, filecolor=Blue,
     urlcolor=Blue, unicode=true}
 
@@ -135,6 +144,15 @@ brown fox jumps over the lazy dog.  The quick brown fox jumps over the
 lazy dog.  The quick brown fox jumps over the lazy dog.  The quick brown
 fox jumps over the lazy dog \citep{989866}.
 
+\begin{table}
+  \centering
+<<test_table, echo=FALSE>>=
+kable(form.copy, format="latex")
+@
+\caption{This is a test table. There are \Sexpr{f(nrow(form.copy))} rows in the table.}
+\label{tab:test}
+\end{table}
+
 The quick brown fox jumps over the lazy dog.  The quick brown fox jumps
 over the lazy dog.  The quick brown fox jumps over the lazy dog.  The
 quick brown fox jumps over the lazy dog.  The quick brown fox jumps over