Re: [R] All anchored series from a vector?

From: Gabor Csardi <csardi_at_rmki.kfki.hu>
Date: Tue, 18 Dec 2007 22:00:00 +0100

miracle <- function(x) { lapply(seq(along=x), function(y) x[1:y]) }

Gabor

On Tue, Dec 18, 2007 at 11:40:37PM +0100, Johannes Graumann wrote:
> Hi all,
>
> What may be a smart, efficient way to get the following result:
>
> myvector <- c("A","B","C","D","E")
> myseries <- miracle(myvector)
> myseries
> [1]
> [[1]] "A"
> [2]
> [[1]] "A" "B"
> [3]
> [[1]] "A" "B"
> [4]
> [[1]] "A" "B" "C"
> [5]
> [[1]] "A" "B" "C" "D"
> [6]
> [[1]] "A" "B" "C" "D" "E"
>
> Thanks for any hints,
>
> Joh
>
> ______________________________________________
> R-help_at_r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.

-- 
Csardi Gabor <csardi_at_rmki.kfki.hu>    MTA RMKI, ELTE TTK

______________________________________________
R-help_at_r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
Received on Tue 18 Dec 2007 - 21:03:41 GMT

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Tue 18 Dec 2007 - 21:30:20 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help. Please read the posting guide before posting to the list.