前面一文记录：筛选写书工具的艰苦经历简要记录的自己尝试几种工具的艰苦努力，最后的结论是”Word + Calibre” 制造常用的电子书(DOCX, PDF, EPUB，MOBI和AZW3等)还是够用的。

如果想要制作 Web 书，甚至是需要算法的动态展示？自己制作本地的Jupyter Book简单介绍了如何使用 Jupyter Book create 和 build 生成Web 书。在那里也提到了我感兴趣的支持数据分析不错的工具 - R 和 RStudio，围绕R也有创建Web 书的技术。

R BookDown 编纂Web 书

在自己制作本地的Jupyter Book中展示了几本谢益辉(YiHui Xie)[GitHub,Web]编纂的围绕R制作 PDF, EPUB和Web书的几本书，想着自己也有计划完成基于R的数据分析册子，所以，就搜罗资料实践了下如何基于 R BookDown 生成书的技巧。

R Studio 编纂 BookDown 书就够了 (不依赖*nix 操作系统环境)

意思是，虽然R语言包是RStudio 的底层技术，不过，有了 RStudio，其实就是够了：不管是使用R来编程，还是使用BookDown 来写R语言交互的书。

之所以点出来这一点，是因为我在R Project 的代码里加载了所需要的包，但是，R语言包和RStudio 的R语言包二者是相互独立的。

一些依赖的包还是换成国内源吧

一如很多开源软件的安装，访问国外是很耗时的，还是换成国内的源吧。

在 RStudio 中创建 Bookdown project 很简单

只是编译(Build All)的时候，有些包要依赖 – `rmarkdown`, `caTools`等。而这些包还依赖 R 的版本

我最开始安装的是 R3.5.2，在`Build All` 时就出现需要 `caTools 1.14`。

查了下，caTools 有要求R的版本高 – 只好重新安装最新的 R 3.6.3

须重启 RStudio (会自动换成R 3.6.3环境) – 安装那些包即可

安装了 rmarkdown 后，就少了很多包

> install.packages('rmarkdown')
also installing the dependencies ‘highr’, ‘markdown’, ‘digest’, ‘Rcpp’, ‘rlang’, ‘glue’, ‘magrittr’, ‘stringi’, ‘knitr’, ‘yaml’, ‘htmltools’, ‘evaluate’, ‘base64enc’, ‘jsonlite’, ‘mime’, ‘tinytex’, ‘xfun’, ‘stringr’

按照提示，在 RStudio 的 Console 里安装相应的包即可

install.packages('caTools')
install.packages('bitops')
install.packages('rprojroot')
install.packages('bookdown')

再次build All 就可以了

生成了 HTML, PDF 和 EPUB。效果还是不错的。

对照Rmd文本和生成的页面，看出，页面中有Rmd中嵌入的R代码的结果图

01-intro.Rmd

# Introduction {#intro}

You can label chapter and section titles using `{#label}` after them, e.g., we can reference Chapter \@ref(intro). If you do not manually label them, there will be automatic labels anyway, e.g., Chapter \@ref(methods).

Figures and tables with captions will be placed in `figure` and `table` environments, respectively.

```{r nice-fig, fig.cap='Here is a nice figure!', out.width='80%', fig.asp=.75, fig.align='center'}
par(mar = c(4, 4, .1, .1))
plot(pressure, type = 'b', pch = 19)
```

Reference a figure by its code chunk label with the `fig:` prefix, e.g., see Figure \@ref(fig:nice-fig). Similarly, you can reference tables generated from `knitr::kable()`, e.g., see Table \@ref(tab:nice-tab).

```{r nice-tab, tidy=FALSE}
knitr::kable(
  head(iris, 20), caption = 'Here is a nice table!',
  booktabs = TRUE
)
```

You can write citations, too. For example, we are using the **bookdown** package [@R-bookdown] in this sample book, which was built on top of R Markdown and **knitr** [@xie2015].