title: How many time does knitr takes do export a html file in R markdown?
body: <p>This is me again asking a noob question.
  I writed a code in R Markdown file to export results in html. All chunks runs just fine in R. But, when I click 'knit' button, the system hangs for a long time processing de file and get stucked at the 3rd chunk. I've already waited for an entire hour but there's no progress and don't give me any error message. This is the first &quot;big&quot; base I'm working, with 21k lines and 69 columns. I don't know if it is normal for this size of data or maybe I'm missing any detail. The data base is hosted in my drive <a href="https://drive.google.com/file/d/1WfYiq2GOUheN9y_rSaSumbp_rIYIiQVb/view?usp=sharing" rel="nofollow noreferrer">https://drive.google.com/file/d/1WfYiq2GOUheN9y_rSaSumbp_rIYIiQVb/view?usp=sharing</a> and the code and the processing progress follows here:</p>
  <pre><code>  
      ---
      title: &quot;exer2_Renato_Fred&quot;
      output:
        pdf_document: default
        html_document: default
      ---
      &lt;style&gt;
      body {
      text-align: justify}
      &lt;/style&gt;
  
      ```{r setup, include=FALSE}
      knitr::opts_chunk$set(cache = TRUE)
      knitr::opts_chunk$set(results = 'hide')
      library(data.table)
      library(foreign)
      library(tidyverse)
      library(jtools)
      library(readxl)
      library(ggplot2)
      library(lmtest)
      library(sandwich)
      library(lfe)
      library(huxtable)
      ```
      ```{r , echo=FALSE}
      setwd(&quot;D:/Google Drive/Mestrado 2020/Econometria Aplicada I/Aula_3-PooledOls&quot;)
      local &lt;- getwd()
      arquivo &lt;- paste0(local,&quot;/Base.xlsx&quot;)
      tabela &lt;- read_xlsx(arquivo)
      tabela &lt;- data.table(tabela, stringsAsFactors = TRUE)
      ```
  
      ```{r, echo=FALSE}
      levels(factor(tabela$setoreconomtica))
      ggplot(tabela,aes(tabela$corporategovernancelevel,tabela$netprofit))+geom_point()
      ```
      
      ```{r, echo=FALSE}
      tabela[,&quot;tobin&quot; := firmmarketvalue/totalasset]
      tabela[,&quot;roa&quot; := netprofit/totalasset]
      tabela[,&quot;roe&quot; := equity/totalasset]
      tabela[,&quot;dividacp&quot; := shorttermdebt/totalasset]
      tabela[,&quot;dividalp&quot; := longtermdebt/totalasset]
      tabela[,&quot;ieg&quot; := (longtermdebt+shorttermdebt)/totalasset]
      tabela[,quarter := as.factor(quarter)]
      ```
      
      ```{r ,echo=TRUE}
      lmroa &lt;- lm(roa~ieg+dividalp, data=tabela)
      summ(lmroa)
      coeftest(lmroa, df= ,vcov = vcovHC(lmroa,&quot;HC1&quot;))
      #tabela[,corporategovernancelevel := as.factor(corporategovernancelevel)]
      ```
      
      ```{r,echo=TRUE}
      lmroa2 &lt;- lm(roa~ieg+dividalp+quarter, data=tabela)
      summ(lmroa2)
      coeftest(lmroa2, df= ,vcov = vcovHC(lmroa,&quot;HC1&quot;))
      ```
      
      ```{r,echo=TRUE}
      tabela$quarter &lt;- relevel(tabela$quarter,ref=&quot;1&quot;)
      lmroa3 &lt;- lm(roa~dividacp+quarter, data = tabela)
      summ(lmroa3, robust = &quot;HC1&quot;, confint = T, digits=5)
      coeftest(lmroa3, df= ,vcov = vcovHC(lmroa,&quot;HC1&quot;))
      felmroa &lt;- felm(roa~dividacp+quarter | setoreconomtica, data=tabela)
      felmroa2 &lt;- felm(roa~dividacp+corporategovernancelevel | setoreconomtica, data=tabela)
      huxreg(lmroa3,felmroa,felmroa2)
      ```
      
  </code></pre>
  <hr />
  <p>processing file: exer2_Renato_Fred.Rmd
  |.....                                                                 |   8%
  ordinary text without R code</p>
  <p>|...........                                                           |  15%
  label: setup (with options)
  List of 1
  $ include: logi FALSE</p>
  <p>|................                                                      |  23%
  label: unnamed-chunk-1 (with options)
  List of 1
  $ echo: logi FALSE</p>
  <p>|......................                                                |  31%
  ordinary text without R code</p>
  <p>|...........................                                           |  38%
  label: unnamed-chunk-2 (with options)
  List of 1
  $ echo: logi FALSE</p>
  <p>|................................                                      |  46%
  ordinary text without R code</p>
  <p>|......................................                                |  54%
  label: unnamed-chunk-3 (with options)
  List of 1
  $ echo: logi FALSE</p>
  <p>after this, nothing happens. I tried to insert the data.table in another chunk and in that chunk the system gets busy. Seems to be something wrong with de columns creation.</p>