用R语言实现几个简朴的三维动画

R语言最强悍的有两点：统计和画图。本日就来将一下用R语言来简朴的画图。下面的操纵主要参考《R统计建模与R软件》，以及R语言的 辅佐文档。首先，我们应该知道，三维图像有三个坐标，所以它的函数最少是有2个未知变量的

，我做的这个图是《R统计建模与R软件》第161页上的习题3.8（没有完全凭据上面的要求）

下面是我的详细的代码

x <- seq(-2,3,0.05)#x在区间[-2,3]之间，取值隔0.05取一个
y <- seq(-1,7,0.05)#y在区间[-1,7]之间,取值隔0.05取一个
f <- function(x,y)#实现函数
{
x^4-2*x^2*y-2*x*y+2*y^2+4.5*x-4*y+4
}
z <- outer(x,y,f)#让x,y在函数f的干系下作外积运算，形成网格，这样才气绘出三维图形
a <- seq(0,100,10)

for (i in a)
{

persp(x,y,z,theta=i,phi=30,expand=0.7,col=”blue”)#这里让寓目标角度每隔一按时间变一次，theta应该是程度偏向#的，phi是竖直偏向上的角度

Sys.sleep(3)#让R的运行暂停三秒
}

这道题的原始函数是z=x^4-2*x^2*y+x^2-2*x*y+2*y^2+4.5*x-4*y+4
画的是在区域-2<=x<=3,-1<=y<=7的图像。
这样或许就可以或许成为一个很简朴的变革的三维图像了。