Displaying 2 results from an estimated 2 matches for "meanz".
Did you mean:
means
2011 Apr 07
1
dotplot as a background for multiple barchart plots (with Lattice)
...ta.frame(Subject=rep(c("A", "B", "C", "D"), each=6),
Type=rep(c("EEE", "FFF", "GGG", "HHH", "III",
"JJJ"), times=4),
MeanX=abs(rnorm(24)),
MeanZ=abs(rnorm(24)))
### data for regrouping all means
all <- data.frame(Type=levels(factor(test$Type)), MeanX = c(0), MeanZ =
c(0))
### building means...
for(s in levels(factor(test$Subject)))
{
tmp <- data.frame(Type = all$Type)
for(t in tmp$Type)
{
tmp$MeanX[tmp$T...
2008 Feb 15
2
wire.frame tick labels from matrix
...t;- matrix(nrow=num.rows, ncol=num.x.col*num.y.col)
for( i in 1:num.rows) {
Z[i,] <- as.vector( Y[i,] %*% t(X[i,])^-1 )
}
pred.est <- 3.453*Z+1.994
z=(pred.est-a)/a
colnames(z)<- rep(c("X1","X2","X3","X4","X5","X6"),6)
meanz=colMeans(z)
mat.x <- matrix(meanz, nrow=6, ncol=6, byrow=TRUE)
colnames(mat.x)<- c(0,1,2,3,4,5)
rownames(mat.x)<-c(0,5,10,15,20,25)
mat.x
library(lattice)
wireframe(mat.x,drape=TRUE,zlab=list("Proportion Error of Estimate",
rot=90), xlab="Resistance Error (%) ",ylab=...