これがデモ library(devtools) install_github("ryamada22/Ronlyryamada") library(Ronlyryamada) example(my.catmull.clark.tri) まずは、適当に3次元立体オブジェクトを作り、3次元アレイに0,1のデータとして与えよう 適当なアレイ領域にいくつかの球のOR…

２次元を例に 分布(たとえば正規分布)の重なりとして推定する Rの関数bkde2D()の中身を追いかけよう ２次元プロットデータを作る Npt<-300 x<-y<-rep(0,Npt) r<-10 for(i in 1:Npt){ t<-runif(1)*2*pi/1 r2<-r*(sin(t*200)+10)+rnorm(1)*0.1 x[i]<-r2*cos(t)…