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,