Plot code does not work in R Studio but does in R
<p>i am trying to move plot results in to rmarkdown in R studio
the following code fails</p>

<pre><code>```{r front_stuff ,echo=FALSE,fig.height=3,fig.width=4}
library(ggplot2)
library(cowplot)
library(lubridate)
library(reshape2)
library(htmlTable)
library(data.table)
library(png)
project_folder&lt;-"C:\\Users\\jciconsult\\SkyDrive\\trial_retail\\"
load(paste0(project_folder,"sa_prov_html.RSave"))
load(paste0(project_folder,"Ontario_plot_save.RSave"))
ls()
```
`r ggdraw(cow_plot1)`
</code></pre>

<p>Error message is</p>

<blockquote>
  <p>Quitting from lines 29-29 (test1.Rmd) 
  Error in <code>vapply(x, format_sci_one, character(1L), ..., USE.NAMES = FALSE)</code> : 
    values must be length 1,
   but <code>FUN(X[[1]])</code> result is length 2
  Calls:  ... paste -> hook -> .inline.hook -> format_sci -> vapply
  Execution halted</p>
</blockquote>

<p>If I take the same code and copy it into a clear R session (eliminating the stuf for code blocks), everything works.</p>

<p>What I am trying to do is get a document that can convert to word.  I am using the knit HTML option because that is needed to get my htmlTable output to work.
I want something that I can cut and paste into word for final formatting, </p>