Mail Archive Search: <+from:dimitrios.rizopoulos@student.kuleuven.ac.be>

Results:

References: [ +from:dimitrios.rizopoulos@student.kuleuven.ac.be: 40 ]

Total 40 documents matching your query.

1. Re: Problems with "uniroot" (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Wed, 27 Jul 2005 16:45:54 +0200; try it this way: SeuilGamma <- function(x, mu, shape, rate, kk) mu * (pgamma(x, shape + 1, rate) - kk) + x * (1 - pgamma(x, shape, rate)) uniroot(f = SeuilGamma, lower = 440, upper = 450, mu = 7462.8; /archives/html/s-news/2005-07/msg00144.html (11,113 bytes)
2. Re: comparing NA values (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Tue, 14 Jun 2005 13:16:24 +0200; or maybe something like this: x <- c(1:10, 1:10, rep(NA, 20)) y <- c(1:30, rep(NA, 10)) ind <- as.logical( (is.na(x) | is.na(y)) - (is.na(x) & is.na(y)) ) out <- x == y out[ind] <- FALSE out could al; /archives/html/s-news/2005-06/msg00054.html (10,565 bytes)
3. Re: comparing NA values (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Tue, 14 Jun 2005 13:46:52 +0200; What I proposed is based on the position of NAs, so probably it will work. However, note that floating point comparisons are tricky, see e.g., 4.15 - 3.15 == 1 all.equal(1, 4.15 - 3.15) I hope it hel; /archives/html/s-news/2005-06/msg00055.html (12,753 bytes)
4. Re: Permuting a data frame (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Tue, 21 Jun 2005 15:18:59 +0200; maybe you can use something like this: mat <- matrix(1:10, 10, 5) n <- nrow(mat) for(i in 2:ncol(mat)) mat[, i] <- mat[c(seq(n - i + 2, n), seq(1, n - i + 1)), i] mat I hope it helps. Best, Dimitris; /archives/html/s-news/2005-06/msg00074.html (9,551 bytes)
5. Re: Q; Matrix manipulation (score: 1): Author: .com>; Date: Mon, 4 Apr 2005 14:58:22 +0200; er of non-missing; /archives/html/s-news/2005-04/msg00013.html (8,788 bytes)
6. Re: installing gee on splus for windows (score: 1): Author: i.it>; Date: Wed, 27 Apr 2005 17:09:12 +0200; lation. If somebo; /archives/html/s-news/2005-04/msg00165.html (8,960 bytes)
7. Re: Adaptive Gaussian Quadrature question (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Wed, 30 Mar 2005 09:07:10 +0200; In GLMMs the marginal likelihood (i.e., of the observed data) involves an integral that cannot be solved analytically. Adaptive Gauss-Hermite provides an **approximation** to this integral, so strict; /archives/html/s-news/2005-03/msg00166.html (9,649 bytes)
8. Re: A question about String manipulation? (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Thu, 31 Mar 2005 16:37:38 +0200; try this: x <- c("aaa,bbb" , "cc,dd,ee" , "ffff") lapply(x, function(y) unlist(unpaste(y, sep=","))) I hope it helps. Best, Dimitris -- Dimitris Rizopoulos Ph.D. Student Biostatistical Centre School; /archives/html/s-news/2005-03/msg00174.html (10,347 bytes)
9. Re: Unlisting a list of dataframes (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Thu, 31 Mar 2005 16:57:03 +0200; try this: s1 <- lapply(1:3, function(x) data.frame( matrix(runif(10),nrow=2) )) s1 do.call("rbind", s1) I hope it helps. Best, Dimitris -- Dimitris Rizopoulos Ph.D. Student Biostatistical Centre Scho; /archives/html/s-news/2005-03/msg00176.html (10,737 bytes)
10. Re: Unlisting a list of dataframes (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Thu, 31 Mar 2005 17:03:43 +0200; sorry but I forgot that you also wanted the last indicator column: s1 <- lapply(1:3, function(x) data.frame( matrix(runif(10),nrow=2) )) s1 dat <- do.call("rbind", s1) dat$Item <- rep(LETTERS[1:lengt; /archives/html/s-news/2005-03/msg00179.html (10,855 bytes)
11. Re: Recoding variables in S+ (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Fri, 4 Feb 2005 16:46:58 +0100; try the following: mat <- matrix(sample(1:2, 100, TRUE), 10, 10) new.mat <- mat new.mat[mat==2] <- 0 mat; new.mat x <- sample(letters[1:10], 20, TRUE) u.x <- sort(unique(x)) mat <- matrix(0, length(x; /archives/html/s-news/2005-02/msg00016.html (9,704 bytes)
12. Re: How to change a data structure? (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Mon, 7 Feb 2005 15:05:36 +0100; a possible improvement of your approach could be: t(sapply(split(theData, index), function(x, n) if((nx <- length(x)) < n) c(x, rep(NA, n-nx)) else x, n=4)) I hope it helps. Best, Dimitris -- Dimitri; /archives/html/s-news/2005-02/msg00023.html (9,602 bytes)
13. Re: extracting components from t.test (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Mon, 10 Jan 2005 13:33:24 +0100; .; /archives/html/s-news/2005-01/msg00053.html (10,059 bytes)
14. Re: Proposing models (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Thu, 27 Jan 2005 16:07:29 +0100; e; /archives/html/s-news/2005-01/msg00139.html (9,165 bytes)
15. Re: setting random terms in lme (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Thu, 27 Jan 2005 17:48:03 +0100; a; /archives/html/s-news/2005-01/msg00142.html (9,636 bytes)
16. Re: gee (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Mon, 8 Nov 2004 16:57:25 +0100; Hi Karin, First of all, as far as I know MASS (version 7.0) does not contain a "gee()" function, maybe you mean the library "gee"! There is the option to use "glmmPQL" from MASS, but before doing tha; /archives/html/s-news/2004-11/msg00049.html (8,039 bytes)
17. Re: Changing data (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Mon, 8 Nov 2004 17:05:28 +0100; Hi Sjoerd, maybe this could help: x <- c("A1234", "A1354", "A123") for(i in 1:length(x)) substring(x[i], 1, 1) <- "W" x Best, Dimitris -- Dimitris Rizopoulos Ph.D. Student Biostatistical Centre Schoo; /archives/html/s-news/2004-11/msg00050.html (9,015 bytes)
18. Re: Variance covariance matrix from lme (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Wed, 10 Nov 2004 09:52:52 +0100; . -; /archives/html/s-news/2004-11/msg00074.html (9,215 bytes)
19. Re: A simple rounding problem (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Mon, 4 Oct 2004 17:52:47 +0200; Hi Huub, maybe you could use the "format" function, i.e., x <- 21.587 format(x, nsmall=1, digits=3) I hope this helps. Best, Dimitris -- Dimitris Rizopoulos Ph.D. Student Biostatistical Centre School; /archives/html/s-news/2004-10/msg00007.html (9,058 bytes)
20. Re: plotting Stacked histograms (score: 1): Author: "Dimitris Rizopoulos" <dimitrios.rizopoulos@student.kuleuven.ac.be>; Date: Tue, 5 Oct 2004 15:52:54 +0200; Hi Thom, take a look at ?barplot I hope it helps. Best, Dimitris -- Dimitris Rizopoulos Ph.D. Student Biostatistical Centre School of Public Health Catholic University of Leuven Address: Kapucijnenvo; /archives/html/s-news/2004-10/msg00016.html (8,942 bytes)

Current List: 1 - 20
Page: [1] [2]