2011-11-09 32 views
5

Tôi muốn phát triển wireframe như âm mưu với số không trên trục X, Y tuy nhiên số ở trục Z.R: wireframe như âm mưu 3D cho các biến phân loại

# mydata 
set.seed(123) 
yv <- rnorm(20, 10, 3) 
gen <- rep(paste("G", 1:5, sep= ""), 4) 
env <- c(rep(c("CA","MN","SD", "WI"), each = 5)) 
mdf <- data.frame(yv, gen, env) 

tôi đã cố gắng sử dụng mạng:

require(lattice) 
wireframe(yv,gen, env, data = mdf) 

Error in UseMethod("wireframe") : 
    no applicable method for 'wireframe' applied to 
    an object of class "c('double', 'numeric')" 

Bất kỳ lời đề nghị đánh giá cao.

Trả lời

5

Điều này dường như làm việc:

set.seed(123) 
mdf <- data.frame(yv=rnorm(20, 10, 3), 
        gen=rep(paste("G", 1:5, sep= ""), 4), 
        env=c(rep(c("CA","MN","SD", "WI"), each = 5))) 
library(lattice) 
wireframe(yv~gen*env,data=mdf,scales=list(arrows=FALSE)) 

enter image description here

+0

+1 hơn nếu bạn có thể làm cho nó trông giống như một cần cẩu origami. –

3

Cách dễ nhất để sử dụng các chức năng trong lattice là sử dụng giao diện công thức.

Giả sử rằng yv là biến độc lập của bạn:

wireframe(yv ~ gen + env, data = mdf) 

enter image description here

Các vấn đề liên quan