代码之家 › 专栏 › 技术社区 › JRR

如何在Rmarkdown包vignette中嵌入rgl快照

vignette rgl r-package r-markdown r

JRR · 技术社区 · 7 年前

---
title: "title"
output: rmarkdown::html_vignette
vignette: >
  %\VignetteIndexEntry{title}
  %\VignetteEngine{knitr::rmarkdown}
  %\VignetteEncoding{UTF-8}
---

```{r setup, include = FALSE}
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)
```

```r
rgl::plot3d(runif(10), runif(10), runif(10))
```

```{r, echo = FALSE}
rgl::plot3d(runif(10), runif(10), runif(10))
rgl::rglwidget()
```

它工作得很好,但因我的需要而过度使用了。一张简单的非交互式图片就足够了。webGL显示的问题在于它会创建一个大文件(>1MB)。因此,我在CRAN上有一个关于目录大小的注释。我不想争论这个问题,而是想使用一个普通的图片来减少html输出的大小。

rgl::plot3d(runif(10), runif(10), runif(10))
rgl::rgl.snapshot()

1 回复 | 直到 7 年前

user2554330 7 年前

你需要用旧的 hook_rgl 中描述的方法 knitr rgl . 例如,这些块将插入PNG图形:

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
rgl::setupKnitr()
```

```{r rgl=TRUE, dev='png'}
rgl::plot3d(runif(10), runif(10), runif(10))
```

推荐文章

Amp · 使用R ggplot2删除geom_radial中axis.line和panel.border之间的空格

1 年前

Hard_Course · 用另一列中的值替换行的最后一个非NA条目

1 年前

Mark R · 使用geom_sf()删除地球仪上不需要的网格线

1 年前

Joe · 根据对工作日和本周早些时候的日期的了解,找到一个日期

1 年前

Ben · 统计向量中的单词在字符串中出现的频率

1 年前

TheCodeNovice · R中符号格式的尾随零和其他问题[重复]

1 年前

katefull06 · 在R中使用terra修改范围时,会为单独的SpatRaster重写范围

1 年前

dez93_2000 · 在R管道子功能中引用管道对象的当前状态

1 年前

accibio · 在ggplot2中为同一变量创建两个连续的颜色渐变比例

1 年前

Mankka · 如何在Ggplot2中绘制均匀的径向图

1 年前