title: “Learning R—animation”
author: “刘栋”
date: “2017年12月18日”
output: html_document

  最近看PLA时，想要观察分隔超平面的更新情况，所以尝试用R画更新的过程，即动图。

环境配置

  ImageMagic安装，​​官网http://www.imagemagick.org/script/download.php​​。我选择的是ImageMagick-7.0.7-15-Q16-x64-static.exe。指定目录，默认选项安装即可。

R实现

library(animation)
## 指定ImageMagic目录位置，注意是magick.exe，之前版本貌似一致是convert.exe
ani.options(convert = "D:/ImageMagic/ImageMagick-7.0.7-Q16/magick.exe")
x1  <-  1:10
saveGIF(
expr = {
for (i in 1:5) {
plot(
x = x1,
y = x1 * i,
type = "l",
ylim = c(0, 100),
xlab = "x",ylab = "y"
)
title(paste0("Pic", i))

}
},
## GIF文件名，注意文件后缀名要加上
movie.name = "First Blood Of Gif.gif",
## 时间间隔
interval = 0.2,
## 图形设置
ani.width = 600,
ani.height = 600,
## 文件输出在当前目录
outdir = getwd()
)

动图

[外链图片转存失败,源站可能有防盗链机制,建议将图片保存下来直接上传