jon*_*jon 5 graphics r wireframe graph lattice
我想在X,Y轴上使用非数字开发线框,但在Z轴上使用数字.
# 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)
Run Code Online (Sandbox Code Playgroud)
我试过用格子:
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')"
Run Code Online (Sandbox Code Playgroud)
任何建议赞赏.
这似乎有效:
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))
Run Code Online (Sandbox Code Playgroud)
