Try this:
lapply(split(a, rep(1:2, each=nrow(x)/2)), ts, start=start(a),
freq=frequency(a))
On 04/02/2008, stephen sefick <ssefick at gmail.com>
wrote:> I have a time series object with two columns.
>
> a <- ts(x, frequency=1/15)
> I would like to split this into two time series of the same length
> (they are the same number of observations lined up time for time
> already).
>
> --
> Let's not spend our time and resources thinking about things that are
> so little or so large that all they really do for us is puff us up and
> make us feel like gods. We are mammals, and have not exhausted the
> annoying little problems of being mammals.
>
> -K. Mullis
>
> ______________________________________________
> 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.
>
--
Henrique Dallazuanna
Curitiba-Paran?-Brasil
25? 25' 40" S 49? 16' 22" O