2014-01-09 49 views
0

我在R輸入語言很新,我終於已經能夠使表面休耕代碼:R中surface3d的顏色漸變?

drilling_trial<- read.table("DRILLING_TRIAL.csv",header=TRUE,sep=",") 
all_pit_data<- read.table("ALL_PIT_DATA.csv",header=TRUE,sep=",") 
require("akima") 
s <- with(all_pit_data,interp(x1,y1,z1)) 
library("rgl") 
plot3d(drilling_trial$x,drilling_trial$y,drilling_trial$z, col = drilling_trial$d, add = FALSE, axes = TRUE, bbox = TRUE, xlab="x", ylab="y", zlab="z") 
surface3d(s$x,s$y,s$z,col="gray") 

Bynow,我表面是灰色的,但我想用陰影關閉隨顏色它(灰度)取決於z位置。有人有關於如何這樣做的想法?

謝謝

+1

Does http://stackoverflow.com/questions/3786189/r-4d-plot-x-y-z-colours help? – csgillespie

+0

坦克,我得到了一些顏色漸變,但沒有任何與z值有關。我想要的是能夠分開我的z(身高)說10節,並可以很容易地更改爲任意數量的部分。然後,具有那些「水平切片」的顏色漸變。 – chepasim

回答

1

我試了幾件事情,我結束了這個給了我相當多我想要的東西:

cols <- terrain.colors(462) 
surface3d(s$x,s$y,s$z,color=cols[s$z]) 

462是我z的更高值!謝謝csgillespie提供的鏈接...我從那裏開始!