search for: m3b

Displaying 10 results from an estimated 10 matches for "m3b".

Did you mean: 3b
2011 Sep 03
2
problem in applying function in data subset (with a level) - using plyr or other alternative are also welcome
...sample (c(1, 2,3), 10, replace= T) # variable set 2 M2a <- sample (c(1, 2,3), 10, replace= T) M2b <- sample (c(1, 2,3), 10, replace= T) M2aP1 <- sample (c(1, 2,3), 10, replace= T) M2bP2 <- sample (c(1, 2,3), 10, replace= T) # variable set 3 M3a <- sample (c(1, 2,3), 10, replace= T) M3b <- sample (c(1, 2,3), 10, replace= T) M3aP1 <- sample (c(1, 2,3), 10, replace= T) M3bP2 <- sample (c(1, 2,3), 10, replace= T) mydf <- data.frame (ped, M1a,M1b,M1aP1,M1bP2, M2a,M2b,M2aP1,M2bP2, M3a,M3b,M3aP1,M3bP2, y) # functions and further calculations mmat <- matrix (c("M1a...
2011 May 04
0
Fwd: simple question
...e question, please execuse me: #example data, the real data consists of 20000 pairs of variables K1 <- c(1,2,1, 1, 1,1); K2 <- c(1, 1,2,2, 1,2); K3 <- c(3, 1, 3, 3, 1, 3) M1a <- rep( K1, 100); M1b <- rep(K2, 100) M2a <- rep(K1, 100); M2b <- rep(K1, 100) M3a <- rep(K1, 100); M3b <- rep(K3, 100) mydf <- data.frame(M1a, M1b, M2a, M2b, M3a, M3b) # matrix operation nmat <- matrix(c(paste('M', 1:3, 'a', sep = ''), paste('M', 1:3, 'b', sep = '')), 3) coffin <- function(x) { x <- as.vector(x) d1cf <- ifelse(myd...
2013 Oct 17
1
pamer.fnc y la nueva versión de R
...The calls to ffRanefLMER.fnc and bfFixefLMER_F.fnc could # be replaced by a call to fitLMER.fnc. In this latter case, however, # bfFixefLMER_F.fnc would be called first, then the random effect # structure would be forward fitted, and finally teh fixed effects # would be backfitted again. m3b <- fitLMER.fnc(model = m1, ran.effects = c("(0 + LengthBc | Subject)", "(0 + WMCc | Item)"), backfit.on = "F", log.file = FALSE) pamer.fnc(m3b) # The results are the same. This may not necessarily be the case #...
2014 Mar 17
5
LD50
Quiero comparar varias dosis letales 50% (LD50) usando análisis probit. He seguido un ejemplo que viene en paquete DRC, pero no obtengo el resultado esperado. Lo que quiero es saber si las LD50s, son diferentes y si la diferencias son estadísticamente significativas. Gracias de antemano. José Arturo e-mail. jafarfan@uady.mx <grejon@uady.mx> e-mail alterno. jafarfan@gmail.com
2015 Mar 22
2
robust updating methods
...#39;t work for any reason f4 <- function(m) { d2 <- d; d2[1] <- d2[1]+0 ## force copy update.both(m,data=d2) } ## Case 1: fit within function m2 <- f1() try(update.default(m2)) ## default: object 'd2' not found m3A <- update.envformula(m2) ## envformula: works m3B <- update.both(m2) ## works ## Case 2: update within function m4A <- f2(m1) ## default: works try(f3(m1)) ## envformula: object 'd2' not found m4B <- f4(m1) ## works -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.11 (GNU/Linux) iQEcBAEBAgAGBQJVDvHBAAoJEOCV5YRblxUH...
2015 Mar 24
2
robust updating methods
...for any reason f4 <- function(m) { d2 <- d; d2[1] <- > d2[1]+0 ## force copy update.both(m,data=d2) } > > ## Case 1: fit within function m2 <- f1() try(update.default(m2)) > ## default: object 'd2' not found m3A <- update.envformula(m2) ## > envformula: works m3B <- update.both(m2) ## works > > ## Case 2: update within function m4A <- f2(m1) ## default: works > try(f3(m1)) ## envformula: object 'd2' not found m4B <- f4(m1) > ## works > >> >> ______________________________________________ >> R...
2015 Mar 23
0
robust updating methods
...m) { > d2 <- d; d2[1] <- d2[1]+0 ## force copy > update.both(m,data=d2) > } > > ## Case 1: fit within function > m2 <- f1() > try(update.default(m2)) ## default: object 'd2' not found > m3A <- update.envformula(m2) ## envformula: works > m3B <- update.both(m2) ## works > > ## Case 2: update within function > m4A <- f2(m1) ## default: works > try(f3(m1)) ## envformula: object 'd2' not found > m4B <- f4(m1) ## works > > -----BEGIN PGP SIGNATURE----- > Version: GnuPG v1.4.11 (GNU/Linux)...
2015 Mar 27
0
robust updating methods
...4 <- function(m) { d2 <- d; >> d2[1] <- d2[1]+0 ## force copy update.both(m,data=d2) } > >> ## Case 1: fit within function m2 <- f1() >> try(update.default(m2)) ## default: object 'd2' not found m3A <- >> update.envformula(m2) ## envformula: works m3B <- >> update.both(m2) ## works > >> ## Case 2: update within function m4A <- f2(m1) ## default: >> works try(f3(m1)) ## envformula: object 'd2' not found m4B <- >> f4(m1) ## works > >>> >>> ______________________________...
2005 Dec 21
9
question about changejournal
Hi, I''ve got a newbie question--sorry if this is covered elsewhere, I parsed through the archives for awhile and didn''t see it. I''d like to listen for whenever a file is renamed (e.g. foo.txt -> foo.old) and then magically change it back. This sounds odd, but I''m working with a stubborn application and this will actually make things work nice. So, if I do:
2008 Jun 30
4
Rebuild of kernel 2.6.9-67.0.20.EL failure
Hello list. I'm trying to rebuild the 2.6.9.67.0.20.EL kernel, but it fails even without modifications. How did I try it? Created a (non-root) build environment (not a mock ) Installed the kernel.scr.rpm and did a rpmbuild -ba --target=`uname -m` kernel-2.6.spec 2> prep-err.log | tee prep-out.log The build failed at the end: Processing files: kernel-xenU-devel-2.6.9-67.0.20.EL Checking