読み込む (256x256のほうのTSV) | myakari=data.matrix(read.table("clipboard",h=0)) |
…いんすとおーる! | install.packages('plot3D') # これは最初に1回だけ必要な操作です |
すごく 理科室にあるやつ | library(plot3D) # 起動するたびに必要 z <- 0.5 * myakari x <- 10 * (1:nrow(z)) y <- 10 * (1:ncol(z)) par(bg = "white") # 背景色を白にする persp3D(x, y, z, zlim = c(-80, 240), theta = 115, phi = 22.5, scale = FALSE, ltheta = 283.95 + 90, lphi = 21.76, shade = 0.75, border = NA, box = FALSE, clim = c(-320, 260), curtain = TRUE) # プロットされた図を右クリックしてコピーや保存をします |