请注明:姓名-公司-职位
以便审核进群资格,未注明则拒绝
x<-y<-seq(-4,4,length=20)f<-function(x,y){(exp(-0.5*x^2-0.5*y^2))/(2*pi)}z<-outer(x,y,f)persp(x,y,z,theta=45,phi=25,col='lightblue')
怎么老师都会留同样的作业。
这是我以前用的方法,
是个最简单的二元正态分布
期望为0,方差为1,相关系数为0
如果你需要,
可以自己更改函数表达式
原图尺寸 10.91 KB