f<-function(x,y) z[20*x+1/2,20*y+1/2]

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

x<-y<-seq(0.025,0.975,0.05)
f<-function(x,y) z[20*x+1/2,20*y+1/2]
zz<-outer(x,y,f)
persp(x,y,zz)

以上程序是我在画三维图形时写的。

对于已知的x，y，我的目的是令f（x，y）=z[20*x+1/2,20*y+1/2]
z是一个已知的20x20的矩阵。
但在做网格那一步时，好像总是说维数不对，不知道是什么原因。

错误提示如下：
错误于dim(robj) <- c(dX, dY) :
  dims [product 400]与对象长度[160000]不匹配


望各位大虾赐教！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：function

错误很明显，矩阵z的下标计算出来不全是整数，焉能不错？