# [R] Pairwise Partitioning of a Vector

Moshe Olshansky m_olshansky at yahoo.com
Mon Jun 23 08:46:36 CEST 2008

```One possibility is:

x <- c(30.9, 60.1  , 70.0 ,  73.0 ,  75.0 ,  83.9 ,  93.1 ,  97.6 ,  98.8 , 113.9)
for (i in 1:9) assign(paste("PAIR",i,sep=""),list(part1 = x[1:i],part2 = x[-(1:i)]))

--- On Mon, 23/6/08, Gundala Viswanath <gundalav at gmail.com> wrote:

> From: Gundala Viswanath <gundalav at gmail.com>
> Subject: [R] Pairwise Partitioning of a Vector
> To: r-help at stat.math.ethz.ch
> Received: Monday, 23 June, 2008, 4:13 PM
> Hi,
>
> How can I partitioned an example vector like this
>
> > print(myvector)
>  [1]   30.9   60.1   70.0   73.0   75.0   83.9   93.1
> 97.6   98.8  113.9
>
> into the following pairwise partition:
>
> PAIR1
> part1  = 30.9
> part2  = 60.1   70.0   73.0   75.0   83.9   93.1   97.6
> 98.8  113.9
>
> PAIR2
> part1 = 30.9   60.1
> part2 =  70.0   73.0   75.0   83.9   93.1   97.6   98.8
> 113.9
>
> ....
>
> PAIR9
> part1 = 30.9   60.1   70.0   73.0   75.0   83.9   93.1
> 97.6   98.8
> part2 = 113.9
>
>
> I'm stuck with this kind of loop:
>
> __BEGIN__
>
> # gexp is a Vector
>
> process_two_partition <- function(gexp) {
>     sort.gexp <- sort(as.matrix(gexp))
>     print(sort.gexp)
>
>     for (posb in 1:ncol(gexp)) {
>         for (pose in 1:ncol(gexp)) {
>
>           sp_b <- pose+1
>           sp_e <- ncol(gexp)
>
>           # This two doesn't do what I want
>           part1 <- sort.gexp[posb:pose]
>           part2 <- sort.gexp[sp_b:sp_e]
>
>          # we later want to process part1 and part2
> separately
>
>         }
>     }
>
> }
>
> __END__
>
> - Gundala Viswanath
> Jakarta - Indonesia
>
> ______________________________________________
> 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.

```