search for: nona

...his is how I can create the mean matrix by hand. “MDD.mean.s10” is the matrix I want in the end. (notice the first bracket after $results is the only part that changes 1-10 (to represent the 10 items) and the last bracket is [,7] to represent the mean located in column 7) > m.1a <- MC_MDD.noNA$results[[1]][[2]][,7] > m.2b <- MC_MDD.noNA$results[[2]][[2]][,7] > m.3c <- MC_MDD.noNA$results[[3]][[2]][,7] > m.4d <- MC_MDD.noNA$results[[4]][[2]][,7] > m.5e <- MC_MDD.noNA$results[[5]][[2]][,7] > m.6f <- MC_MDD.noNA$results[[6]][[2]][,7] > m.7g <-...

Hi, I was wondering if anyone could give me advice regarding using the lmer command in lme4 package to do logistic regression (mixed effects model). I use the following command lmer(ISH ~ArrayPathology2, random=~1|PatientID, data=HSDB4.noNA, family="binomial") where ISH is outcome(0 or 1), ArrayPathology2 is the variable of interest(factor), PatientID is random effect(factor), and HSDB4.noNA is the complete dataframe (column names ArrayPathology2, Patient ID and ISH etc) There are no NAs in the data. I get the following e...

...FALSE, print.traj = FALSE, imputationMethod = "copyMean", distance, power = 2, centerMethod = meanNA, startingCond = "allMethods", distanceStartingCond = "euclidean", ...) { nbIdFull <- nrow(Object["traj"]) convergenceTime <- 0 noNA <- selectSupTrajMinSize(Object, trajMinSize) trajNoNA <- Object["traj"][noNA, ] nbTime <- length(Object["time"]) nbId <- nrow(trajNoNA) saveCld <- 0 scr <- plotAll(Object, print.cal = print.cal, print.traj = print.traj, print.sub = F...

...atement below is appropriate for my design? #group represents the case (total of 132) vs control (253 out of the total of 853 controls) groups; prob is 1 for cases and 253/853 for controls and ssize=132 for cases and 853 otherwise; dstr=svydesign(id=~1, strata=~group, prob=~prob, fpc=~ssize, data=noNA) -- View this message in context: http://r.789695.n4.nabble.com/svydesign-syntax-tp2298793p2298793.html Sent from the R help mailing list archive at Nabble.com.

...g the glht function from the multcomp package to perform post-hoc tests. I've tried multiple iterations, but can't seem to get it to work. Here is (a subset of) what I have been trying. Any help would be greatly appreciated: > model.3<-lme(fixed=Totnum~Wk*Pop, random=~1|nUID, data=nona) #Wk has 6 levels, 0-5; Pop has 2 levels; nUID is a unique ID given to each individual (multiple individuals from each population were re-measured each week) > anova(model.3) numDF denDF F-value p-value (Intercept) 1 592 649.7753 <.0001 Week 5 592 302.9706 &...

...4.24 3.3 4.24 3.3 dim 3.66 2.8 3.66 2.8 switch 3.60 2.8 3.80 2.9 vector 2.68 2.1 8.02 6.2 inherits 1.90 1.5 1.90 1.5 any 1.68 1.3 1.68 1.3 noNA.levels 1.46 1.1 7.84 6.1 .Call 1.40 1.1 1.40 1.1 ! 1.26 1.0 1.26 1.0 attr<- 1.06 0.8 1.06 0.8 .subset 1.00 0.8 1.00 0.8 class<- 0.82 0.6 0.82...

Hi there, I am trying to run a liner regression using lm with na.action = NULL, but I am getting an error message. Any ideas as to why this may be happening? Please see code and error message below: > reg_test<-lm(yy~.,data=test,na.action=NULL) Error in lm.fit(x, y, offset = offset, singular.ok = singular.ok, ...) : NA/NaN/Inf in foreign function call (arg 4) This message and

...return(no) } } } else test <- if (isS4(test)) methods::as(test, "logical") else as.logical(test) ## this is to ensure the documented behavior re: attributes of result ans <- test len = length(ans) if(nonas <- !anyNA(test)) { ypos = test npos = !test } else { ok <- !(nas <- is.na(test)) ypos = test & ok npos = !test & ok } if(any(ypos, na.rm = TRUE)) ##equivalent to any(test[ok]) ans[ypos] = rep(yes, length.out = len)[ypos]...

# BUG 1: returns empty vector if no NAs present > nona <- 1:10 > na.omit(nona) numeric(0) na.omit.default() has two lines where object[-omit] is used, where omit represents positions of NAs and thus without NAs omit = numeric(0) and since -numeric(0) = numeric(0) object[-omit] = numeric(0) It looks like an earlier version of na.omit.de...

Hi, I have a dataframe with 14319rows and 9 colums. for some rows there are null values.I want a dataframe without these null values.I wanna select only those that have values !=NA. kindly let me know how to do that. Ramya -- View this message in context: http://www.nabble.com/selecting-dataframe-values-that-are-not-nulls-tp19537093p19537093.html Sent from the R help mailing list archive at

Dear all, Can anybody give me some hint on the following error msg I got with using randomForest? I have two-class classification problem. The data file "sample" is: ---------------------------------------------------------- udomain.edu udomain.hcs hpclass 1 1.0000 1 not 2 NA 2 not 3 NA 0.8 not 4 NA 0.2 hp 5 NA 0.9 hp ------------------------------------------------------------ The

HI All , I am running a FC6 box with two internet links with load balance . Every thing is working fine expect the MSN connection that failed and reconnect every time and SSL connections . I would link to know if with the nona howto I could fix that . I have been tried with no success to redirect that connection only to one link but its look like do not work . Here my configuration : #!/bin/bash # # Script Baseado em http://lartc.org/howto/lartc.rpdb.multiple-links.html # # # IF0=eth1 function interface_interna() {...

> I propose a patch to ifelse that leverages anyNA(test) to achieve an > improvement in performance. For a test vector of length 10, the change > nearly halves the time taken and for a test of length 1 million, there > is a tenfold increase in speed. Even for small vectors, the > distributions of timings between the old and the proposed ifelse do > not intersect. For smaller

...m(formula = G1L1WR ~ NR + KINDERWR + NS + WM + PA + NR:KINDERWR + NR:NS + KINDERWR:NS + NR:WM + KINDERWR:WM + NS:WM + NR:PA + + KINDERWR:PA + NS:PA + WM:PA + NR:KINDERWR:NS + NR:KINDERWR:WM + NR:NS:WM + KINDERWR:NS:WM + NR:NS:PA + KINDERWR:NS:PA + KINDERWR:WM:PA + NR:KINDERWR:NS:WM, data = lafrance.NoNA) All of the terms of this model have statistical t-tests, the residual standard error has gone down to 0.2102, and the adjusted R2 has increased to 0.7839. An anova shows a clear difference between the simplified model and the maximal fit model. My question is, should I really pick the maximal fit...

...retargetable compiler, implementing the algorithm: Rainer Leupers: Code Selection for Media Processors with SIMD Instructions. DATE 2000: 4-8 what i have now is only iburg, though robust but with very limited functionality. i have consider using "nova" - http://cocom.sourceforge.net/nona.html but it seems not be updated since 2001. any other suggestion? -- Tzu-Chien Chiu, Computer Graphics Guy, <URL:http://www.csie.nctu.edu.tw/~jwchiu>

I'm attempting to pass a string argument into the function randomForest but I get an error: state <- paste(list("fruit ~", "apples+oranges+blueberries", "data=fruits.data, mtry=2, do.trace=100, na.action=na.omit, keep.forest=TRUE"), sep= " ", collapse="") model.rf <- randomForest(state) Error in if (n==0) stop ("data(x) has 0

...0AnX z1oJ6DxtCzRlK{`y{EP(syaX#KL4Pm73MT=cu at xB!26zdUQ-YVh1k0TSc*d4zBp66P z%B^kDY3Fp4cBQ%PO7q&4=C><t+OD*qU1_s+rOmB%n)vaTkF>x?8bivqNJ%%!s{Yq} z5?x=6cg=p+tl64aC7Z29%Vf_A;MQV0cyYa8-CAe|FVvznk{4`PtL@;`^@3^o&?|b- z37UuxPdY7<T_H{c<wVp-mi^i&<MdEtu;H9#Ko-679~b8+tu-2uBaOu7|I#K-NOnae z#}3JjG={BG86N73G=_;%8GhZDu$Iv;IlbYN6BI?EktUH`@A`j~D>I*{ozJSweDa)- zbUyi%k4okRsM8tJ at 6AylMe^)?^CJ1_eADGyoz8bgX1-0GkaWHU^~$GJpfZVp8mYmO ziug!DWu$4OprP_ozP;>xXJ+Qx%n3>7+x&aV`$HVqC2!{O(Y!L!EYdu){Q0!IF<l^t zb0RVOvgXRIAWvq*5M**IQKHP!xKz}NOe%{r84*<S!H-8JzY_eUsVsD;AaT8hT$ssA zq=`*PjR...