小编haf*_*aff的帖子

是否可以在.Rmd中包含来自外部R脚本的代码并同时运行代码,显示代码并在输出.HTML文件中显示其结果？例如,如果我有

x <- 1
y <- 3
z <- x + y
z

在external.R.在输出文档中,我想看到上面的代码以及结果z,即4.基本上,我想要相当于如果我在R块中复制/粘贴上面的内容会发生什么.所以我想要

```{r}
some.library::some.function("external.R")
```

相当于

```{r}
x <- 1
y <- 3
z <- x + y
z
```

在输出HTML文件中.我试过的东西像knitr::read_chunk('external.R)和source('external.R)',但这些不显示的代码.我错过了一些简单的事吗？

编辑

我发现这source('external.R', echo = TRUE)将产生我的要求,但输出显示的代码/结果的每一行都是前缀##.如果代码只是简单地复制/粘贴在.Rmd中的一个块中,任何方式都可以使它看起来像？

我想在单击右箭头（演示样式）时使flexdashboard / storyboard上的项目符号项逐渐显示。如何做到这一点？我正在猜测一些Javascript，但不知道从哪里开始。从Rmd导出的Ioslides可以选择增量项目符号，但是我希望能够在每个幻灯片的基础上进行，并且无论如何我都希望Flexdashboard / storyboard具有更大的灵活性。

查看此MWE：

---
title: "How to increment?"
output: 
  flexdashboard::flex_dashboard:
    storyboard: true
---

### Slide 1

```{r}
hist(rnorm(100))
```

***

- I want these bullets
- to appear
- incrementally

### Slide 2

```{r}
hist(runif(100))
```

***

- I want these bullets
- to appear
- all at once
- when this slide
- comes up

我正在寻找一个免费的开源选项，以便同时向大约 100 名学生提供闪亮的应用程序。我尝试使用 Shiny Server Open 来执行此操作，但它受到限制。用户收到类似这样的消息

Too Many Users

Sorry, but this application has exceeded its quota of concurrent users. Please try again later.

在搜索该错误消息后，我现在知道我可以增加并发连接数，但我担心由于 R 的单线程性而出现瓶颈。我知道 Shiny Proxy 并且一直在尝试这个，但它似乎可能包含我不需要的额外复杂层。

我之前曾使用 Docker 提供过 Shiny 应用程序（但没有面向这么多受众），所以我想知道这是否足够。

我的问题是：如果我不需要身份验证（用户登录），Docker 是否足以支持约 100 个同时连接的单页面应用程序？或者我真的需要闪亮代理吗？

推论：我怎样才能测试它并确保它能够工作（除了在 100 名学生面前进行即时测试之外）？

是否可以在 Vim 中删除单个换行符但保留空行（我猜是双换行符？）？我正在使用 Vim 的 HardPencil 插件进行一些文字处理，我喜欢硬换行，因为它可以更轻松地在文件周围弹跳。但是，我需要在 LibreOffice Writer 或 Word 中共享此信息，如果其他人编辑文件，硬换行将无法正常工作。澄清一下，这就是我所拥有的：

Line1.
Line2.
Line3.

Line4.
Line5.

这就是我想要的：

Line1. Line2. Line3.

Line4. Line5.

基本上硬换行符应该用空格替换，双换行符应该保留。

我尝试了 的变体，:%s/\n但无法保留双换行符。我在这里和这里发现了类似的问题，但这些不是 Vim 特有的。