source("../readme_generator.R")

  wd = getwd()
  print(wd)

## [1] "/Users/scottsaunders/labwork/IDA/tools/test"

  wd = paste(wd, "README.Rmd",sep = '/')
  print(wd)

## [1] "/Users/scottsaunders/labwork/IDA/tools/test/README.Rmd"

  file.copy(from = "../09_05_19_sandbox.Rmd", to = wd )

## [1] FALSE

knit_readme_all()

## [1] "README.Rmd"

knit_readme("../../../IDA/", recursive = F)

## [1] "README_files" "README.html"  "README.md"    "README.Rmd"

library(ggplot2)
library(patchwork)
library(cowplot)

## 
## Attaching package: 'cowplot'

## The following object is masked from 'package:ggplot2':
## 
##     ggsave

plot_mpg <- ggplot(mtcars, aes(x = cyl, y = mpg)) + geom_point()

plot_disp <- ggplot(mtcars, aes(x = cyl, y = disp)) + geom_point()




bottom_title <- ggdraw() + draw_label("Time resolved emission w/ DNA CT metal complexes",
    fontface = 'bold', x = 0.5, hjust = 0.5, size = 12 ) 

(plot_mpg | plot_disp  ) / bottom_title / plot_disp + plot_layout(heights = c(1,0.1,1)) + plot_annotation( tag_level = '1')

plot_grid(plot_mpg, plot_disp, scale = 0.9)  + draw_figure_label(label = "A complicated title for this subplot", position = "top", size = 12, fontface = 'bold',)

sessionInfo()

## R version 3.5.3 (2019-03-11)
## Platform: x86_64-apple-darwin15.6.0 (64-bit)
## Running under: macOS Mojave 10.14.6
## 
## Matrix products: default
## BLAS: /Library/Frameworks/R.framework/Versions/3.5/Resources/lib/libRblas.0.dylib
## LAPACK: /Library/Frameworks/R.framework/Versions/3.5/Resources/lib/libRlapack.dylib
## 
## locale:
## [1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8
## 
## attached base packages:
## [1] stats     graphics  grDevices utils     datasets  methods   base     
## 
## other attached packages:
## [1] cowplot_0.9.4   patchwork_0.0.1 ggplot2_3.2.1   rmarkdown_1.13 
## 
## loaded via a namespace (and not attached):
##  [1] Rcpp_1.0.2       knitr_1.23       magrittr_1.5     tidyselect_0.2.5
##  [5] munsell_0.5.0    colorspace_1.4-1 R6_2.4.0         rlang_0.4.0     
##  [9] stringr_1.4.0    dplyr_0.8.1      tools_3.5.3      grid_3.5.3      
## [13] gtable_0.3.0     xfun_0.7         withr_2.1.2      htmltools_0.3.6 
## [17] yaml_2.2.0       lazyeval_0.2.2   digest_0.6.21    assertthat_0.2.1
## [21] tibble_2.1.3     crayon_1.3.4     purrr_0.3.2      glue_1.3.1      
## [25] evaluate_0.14    labeling_0.3     stringi_1.4.3    compiler_3.5.3  
## [29] pillar_1.4.2     scales_1.0.0     pkgconfig_2.0.3

plot(cars)