| To: | Bert Jacobs <b.jacobs@pandora.be> |
|---|---|
| Subject: | Re: Removing 0's |
| From: | "Richard M. Heiberger" <rmh@temple.edu> |
| Date: | Mon, 21 Nov 2005 07:52:07 -0500 |
| Cc: | s-news@lists.biostat.wustl.edu |
tmp <- c(0,0,12,15,16,0,0,18,4,3,2,0,0)
middle <- function(x) {
x0 <- (x == 0)
not0 <- !cumprod(x0) & !rev(cumprod(rev(x0)))
x[not0]
}
middle(tmp)
|
| <Prev in Thread] | Current Thread | [Next in Thread> |
|---|---|---|
| ||
| Previous by Date: | Re: Removing 0's, Sundar Dorai-Raj |
|---|---|
| Next by Date: | Re: Removing 0's, jsv |
| Previous by Thread: | Re: Removing 0's, jsv |
| Next by Thread: | surrogate splits in tree, melina cappelli |
| Indexes: | [Date] [Thread] [Top] [All Lists] |