#loss function x=seq(-3,3,length=50) y=seq(-3,3,length=50) lossfunc1=function(x,y){ return(x^2+y^2) } z=matrix(0,50,50) for(i in 1:50){ for(j in 1:50){ z[i,j]=pdf(x[i],y[j]) } } persp(x,y,z,theta = 0, phi = 20, expand = 0.5,col = "lightblu…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。