Я хочу создать короткую и простую анимацию, чтобы проиллюстрировать, как функция x ^ a изменяется для x от 0 до 1 и увеличивается от 0 до 1. Я запускаю этот код:
p1 <- seq(0, 1, 0.001)
alpha <- seq(0, 1, 0.05)
n <- length(alpha)
for (i in 1:n) {
p2 <- p1^(alpha[i])
p <- plot(p1, p2, ylim = c(0,1.1))
}
The Проблема в том, что R ждет, пока не будет выполнено все l oop, а затем просто отображает все графики, поэтому мне приходится пропускать графики самостоятельно. Я скорее хочу, чтобы новейший сюжет заменял старый и тем самым получал анимацию. Я как-то пробовал использовать print()
, но ничего не вышло. Есть ли способ сделать таким образом анимацию?
Я знаю, что есть пакеты анимации, но все они кажутся более сложными, чем мой способ. Однако, если вы считаете, что было бы лучше использовать один из них, сообщите об этом.