json - 在 R 中将 markdown 转换为 json

Question

以下是我要执行的步骤:

1. 将 Markdown 文件(见下文)读入 R
2. 将 markdown 文本转换为 JSON
3. 在 API POST 调用中发送 JSON

例如。 Markdown 文本文件:

## This is a list

+ one
+ two
+ three

#### Do a thing
```coffee
points <- rnorm(10)
plot(points)
```

#### Do something else

![](someimage)

第 1 步和第 3 步很简单，但第 2 步是我没有做到的。对 rjson::toJSON 或 RJSONIO::toJSON 的调用未正确格式化输出 JSON。有谁知道这样做的方法。 This README on github有一个看起来不错的 JSON 转换 Markdown 示例。

Answer 1

rCharts 有几个实用函数可以很容易地做到这一点。我假设你的 Rmd 文件保存为 test.Rmd .您可以查看已发布的要点 here

require(rCharts)
payload = create_gist('test.Rmd', description = 'Testing Md to Gist')
post_gist(payload, viewer = 'http://gist.github.com/')

这就是您要找的吗？

更新:如果你想更新你创建的要点，你可以使用 update_gist函数，并将要点 ID 传递给它。

update_gist(payload, id, viewer = 'http://gist.github.com/')

您可以使用 options(github.username = ..., github.password = ...)如果您不想在 R 控制台中输入您的用户名和密码。