Displaying 3 results from an estimated 3 matches for "ymap".
Did you mean:
map
2005 Mar 07
3
R crashes using the em function of package mclust (PR#7719)
...data=X, z=Xmap)
# CRASH:
em(modelName=Xm$modelName, data=X, mu=Xm$mu, sigmasq=Xm$sigmasq, pro=Xm$pro)
For bivariate data the following example works:
# bivariate example
require(mclust)
Y <- as.matrix(cbind(c(rnorm(100, mean=1), rnorm(100, mean=5)),
c(rnorm(100, mean=1), rnorm(100, mean=5))))
Ymap <- cbind(c(rep(1, 100), rep(0, 100)), c(rep(0, 100), rep(1, 100)))
Ym <- mstep(modelName="EEE", data=Y, z=Ymap)
# NO CRASH:
em(modelName=Ym$modelName, data=Y, mu=Ym$mu, sigmasq=Ym$Sigma, pro=Ym$pro)
But when the variables are not columns (as written in the mclust manual)
but rows,...
1997 May 11
2
R-alpha: Logarithmic scales
...&& FINITE(xt(x1[i%nx1])) && FINITE(yt(y1[i%ny1]))) {
GP->col = INTEGER(col)[i % ncol];
if(GP->col == NA_INTEGER) GP->col = colsave;
GP->lty = INTEGER(lty)[i % nlty];
GStartPath();
GMoveTo(XMAP(xt(x0[i % nx0])), YMAP(yt(y0[i % ny0])));
GLineTo(XMAP(xt(x1[i % nx1])), YMAP(yt(y1[i % ny1])));
GEndPath();
}
}
2) rect() does not work either. Unfortunately, do_rect() in "plot.c"
overrides the yt() function... What about this (lines 983-1031):
SEXP do_rect(SEXP call, SE...
2012 Jan 15
0
Reading MINE output into a matrix
...x<-read.csv(outputfilename,header=TRUE)
#isolate row/col frequencies as a matrix. we need to look at
# both to get the complete list of pairs and their respective frequencies
xtable<-table(x$X.var)
ytable<-table(x$Y.var)
#map frequencies of X & Y vars to rows
xmap<-xtable[x$X.var]
ymap<-ytable[x$Y.var]
finalmap<-order(xmap,-ymap,decreasing=TRUE)
#fill in matrix - we want the third column for MIC
z<-diag(length(levels(x$X.var))+1)
z[row(z)>col(z)]<-x[finalmap,3]
z<-z+t(z)
diag(z)<-1
#determine and set row/column names
varnames<-c(names(sort(xtable,decreasin...