search for: ytype

Displaying 4 results from an estimated 4 matches for "ytype".

Did you mean: type
2004 Jul 15
1
areg.boot use of inverseTrans and ytype
Hi R helpers! I'm still a bit ( alot) confused by the use of "inverseTrans" and "ytype" in areg.boot (Hmisc): What I want to do seems very simple, but I do not get the result I want: plot the predicted values in the original scale. (I did not understand the documentation, sorry!) for instance the following code f<-areg.boot(Pe[here]~monotone(t[here])+monotone(v[here])+I(Pa[...
2007 Jan 22
0
Recursive-SVM (R-SVM)
...he frequency of each gene being selected in each level ## with each column corresponds to a level of selection ## and each row for a gene ## The top important gene in each level are those high-freqent ones RSVM <- function(x, y, ladder, CVtype, CVnum=0 ) { ## check if y is binary response Ytype <- names(table(y)) if( length(Ytype) != 2) { print("ERROR!! RSVM can only deal with 2-class problem") return(0) } ## class mean m1 <- apply(x[ which(y==Ytype[1]), ], 2, mean) m2 <- apply(x[ which(y==Ytype[2]), ], 2, mean) md <- m1-m2 yy <- vector( length=length(y...
2009 Jan 22
1
maintaining variable types in data frames
...s reason for that: Y was not changed, and more specifically, Y$V2 was not changed, so no change was made to the variable types. It all makes sense, but I want an easy way to maintain the structure of a data frame when I do this kind of operation. I ought to be able to do something like this: Ytypes <- get_types(Y) Y[is.na(Y)] <- X[is.na(Y)] use_types(Y, Ytypes) That kind of system would ensure that the basic structure of the data frame can be maintained. I don't want to have to check by hand, and sometimes it would be impossible to do so. So what's the trick? Is there a...
2005 Sep 06
2
Predicting responses using ace
Hello everybody, I'm a new user of R and I'm working right now with the ACE function from the acepack library. I Have a question: Is there a way to predict new responses using ACE? What I mean is doing something similar to the following code that uses PPR (Projection Pursuit Regression): library(MASS) x <- runif(20, 0, 1) xnew <- runif(2000, 0, 1) y <- sin(x) a <- ppr(x, y,