update

MS/SM.qmd

@@ -1,9 +1,12 @@
 ---
 msname: MS
 smname: SM
-subtitle: Supplementary Material
 bibliography: [../BB/Ref.bib, ../BB/localRef.bib]
-csl: _extensions/inst/tex/elsevier-harvard.csl
+# csl: _extensions/inst/tex/elsevier-harvard.csl
+# csl: ./_extensions/inst/tex/american-chemical-society.csl
+csl: ./_extensions/inst/tex/nature.csl
+subtitle: "Supplementary Information"
+date: ""
 format:
   elsevier-html:
     css: _extensions/inst/css/style.css
@@ -12,23 +15,30 @@ format:
   pdf:
     # documentclass: article
     latex-clean: false # to keep aux
+    # toc: true
+    # toc-location: body
     citecolor: blue
     colorlinks: true
     number-sections: false
     sansfont: "Gill Sans"
     papersize: a4paper
     sansfontoptions: 
-      - Color=39729E
+      # - Color=39729E
+      - Color=2A303B
     mainfont: "Source Sans 3" #| Verdana (fontsize: 11pt) # Source Sans 3 | Times New Roman| Helvetica | PT Sans
     monofont: "JetBrains Mono"
     mathfont: "Cambria Math"
     CJKmainfont: SimHei
-    fontsize: 12pt
+    fontsize: 11pt
     keep-md: false
+    keep-tex: true
     include-in-header: "./_extensions/inst/tex/header.tex"
     header-includes:
       - \let\oldsection\section
       - \renewcommand{\section}{\clearpage\oldsection}
+      - \let\oldsubsection\subsection
+      - \renewcommand{\subsection}{\clearpage\oldsubsection}
+      # - \renewcommand{\thepage}{S\arabic{page}}
       # - \usepackage{threeparttable}
       # - \usepackage{fontspec}
       # - \usepackage{endfloat}
@@ -37,8 +47,8 @@ format:
       - \usepackage{float}
       - \usepackage[normalem]{ulem}
       - \usepackage[doublespacing]{setspace}
-      - \usepackage{lineno}
-      - \linenumbers
+      # - \usepackage{lineno}
+      # - \linenumbers
 filters:
    - latex-environment
    - authors-block
@@ -46,54 +56,58 @@ lightbox: auto
 commands: [clab]
 ---
 
+\thispagestyle{empty}
 
 ```{r}
-#| label: setup
 #| include: false
 #| cache: false
+options(tinytex.clean = FALSE)
 lang <- "en"
-RM <- "F"   # global rendermode, L: load pdata; F: fast load pdf # nolint
-isRendering <- isTRUE(getOption("knitr.in.progress"))
+RM <- "F" # global rendermode, L: load pdata; F: fast load pdf
+isRendering <- isTRUE(getOption('knitr.in.progress'))
 require(tidyverse)
-require(lubridate)
 require(patchwork)
 require(drwateR)
 rmdify::rmd_init()
-biburl <- "https://drc.drwater.net/datapool/public/BB/Ref.bib"
-if (!isRendering) { download.file(biburl, destfile = "Ref.bib") }
 ```
 
-# Supplementary Material {-}
-
 Figures and/or tables are provided below as the supplementary evidences to the main text.
 
+{{< pagebreak >}}
 
-\pagebreak
 
-::: {#sfg-demofigure}
-
-```{r}
-#| out-width: 60%
-#| lightbox:
-#|   group: all
-
-if (!isRendering) {
-
-  mtcars |>
-  ggplot(aes(x = wt, y = mpg)) +
-    geom_point() +
-    labs(x = "Weight", y = "Miles per Gallon") +
-    dwfun::theme_sci(3, 3)
-
-  ggsavep("../figures/demofigure.pdf", loadit = FALSE)
-
-} # End of isrendering
-
-ggsavep("../figures/demofigure.pdf", loadit = TRUE)
 
+```{=latex}
+\clearpage
+{
+\hypersetup{linkcolor=black}
+\setcounter{tocdepth}{3}
+\tableofcontents
+}
 ```
 
-This is demo figure in supplementary material
+
+{{< pagebreak >}}
+
+
+::: {#sfg-demo}
+
+```{r}
+#| out-width: "40%"
+
+if (!isRendering) {
+  data.frame(x = 1:10, y = 1:10) |>
+    ggplot(aes(x, y)) +
+    geom_point() +
+    theme_sci(3, 2.0)
+
+  ggsavep("../figures/demo.pdf", loadit = FALSE)
+}
+
+ggsavep("../figures/demo", loadit = TRUE)
+```
+
+Caption of demo figure
 
 :::