R:片段不能显示在视频文件中
R: segments can not be displayed in a video file
我尝试使用 "animation" 包在 R 中创建视频文件。每一帧都是由一个二维矩阵(graphics::images)构成的,并且在帧中还添加了一段文字和一段。在创建视频之前,文本和片段已经过测试,遵循以下 post;放入视频文件时,已经看不到文字和片段了。
saveVideo({
par(mar = c(5, 0.2, 1, 2), mgp = c(3, 1, 0), tcl = -0.3, cex.axis = 1,
cex.lab = 0.8, cex.main = 1)
ani.options(interval = 0.6, nmax = 50, ani.height=0.2, ani.width=0.3)
for (FrameNo in c(1:5)){
X <- Y[,,FrameNo]
graphics::image(ifelse(drop(X)!=0, X, NA),
col=rgb(0,1,1,alpha), add=TRUE)
segments(0.1, 0.2, 0.3, 0.2, col="white", lwd=3)
text(0.05, 0.18, "testing", col="white")
}
}, video.name = FileN, other.opts = "-b 300k")
感谢您的宝贵时间。
我找到了一个解决方案 - 不是最直接的,但它有效...
- 将单个帧创建为 PNG 文件
- 使用ffmpeg生成视频
使用这些单独的 PNG 文件创建文件。
我尝试使用 "animation" 包在 R 中创建视频文件。每一帧都是由一个二维矩阵(graphics::images)构成的,并且在帧中还添加了一段文字和一段。在创建视频之前,文本和片段已经过测试,遵循以下 post;放入视频文件时,已经看不到文字和片段了。
saveVideo({
par(mar = c(5, 0.2, 1, 2), mgp = c(3, 1, 0), tcl = -0.3, cex.axis = 1,
cex.lab = 0.8, cex.main = 1)
ani.options(interval = 0.6, nmax = 50, ani.height=0.2, ani.width=0.3)
for (FrameNo in c(1:5)){
X <- Y[,,FrameNo]
graphics::image(ifelse(drop(X)!=0, X, NA),
col=rgb(0,1,1,alpha), add=TRUE)
segments(0.1, 0.2, 0.3, 0.2, col="white", lwd=3)
text(0.05, 0.18, "testing", col="white")
}
}, video.name = FileN, other.opts = "-b 300k")
感谢您的宝贵时间。
我找到了一个解决方案 - 不是最直接的,但它有效...
- 将单个帧创建为 PNG 文件
- 使用ffmpeg生成视频 使用这些单独的 PNG 文件创建文件。