我想在 R 中连续加载两个 jpeg 图像,但它们非常大(4000X3000 像素)
所以简单地做
library(biOps)
x <- readJpeg("image.jpg")
plot(x)
需要一段时间。当显示第一张图像时,用户必须在图像上填写一些观察结果。我想知道是否可以绘制图像但暂停实际可视化,以便利用用户填写我提到的数据的时间,以便稍后显示图像,可能是根据用户的指示,比如按下回车键。
这可以做到吗?
一种选择是使用animation
包。saveHTML
将创建一个由 SciAnimator 库动画的 html 文件。您可以显示第一个情节并停止可视化,转到下一个情节,使用计时器,...
ll.imgs <- list.files(Imgs_folder,patt='jpg',full=TRUE)
saveHTML({
for(i in seq_along(ll.imgs)){
x <- readJpeg("image.jpg")
plot(x) ##maybe you should try grid.raster(x) from grid package
}
}, img.name = "plots", imgdir = "plots_dir",
htmlfile = "random.html", autobrowse = FALSE,
title = "Plotting images but holding visualization until instruction",
outdir=getwd())