R help - Apr 2009 - rbind on a list

I have two lists (and possibly more):

col.prop <-
structure(list(B = structure(c(0.5, 0.5, 0.6, 0.4, 0.555555555555556,
0.444444444444444), class = c("cast_matrix", "matrix"), .Dim
= 2:3,
.Dimnames = list(
    NULL, NULL)), D = structure(c(1, 0, 0.666666666666667,
0.333333333333333,
0.8, 0.2), class = c("cast_matrix", "matrix"), .Dim = 2:3,
.Dimnames = list(
    NULL, NULL))), .Names = c("B", "D"))
n <-
structure(list(B = c(4, 5, 9), D = c(4, 6, 10)), .Names = c("B",
"D"))
> col.prop
$B
     [,1] [,2]      [,3]
[1,]  0.5  0.6 0.5555556
[2,]  0.5  0.4 0.4444444

$D
     [,1]      [,2] [,3]
[1,]    1 0.6666667  0.8
[2,]    0 0.3333333  0.2
> n
$B
[1] 4 5 9

$D
[1]  4  6 10

I would like to "rbind" each element with the corresponding element of
each
list ($B with $B and $D with $D):
> res
$B
     [,1] [,2]      [,3]
[1,]  0.5  0.6 0.5555556
[2,]  0.5  0.4 0.4444444
[3,]    4    5         9

$D
     [,1]      [,2] [,3]
[1,]    1 0.6666667  0.8
[2,]    0 0.3333333  0.2
[3,]    4         6   10

I've made an ugly loop to do this... Is there an easier way?

Thank you very much.

David

	[[alternative HTML version deleted]]

Try this:

lapply(names(col.prop), function(idx)rbind(col.prop[[idx]], n[[idx]]))

On Thu, Apr 23, 2009 at 7:33 AM, David Hajage <dhajage.r@gmail.com> wrote:
> I have two lists (and possibly more):
>
> col.prop <-
> structure(list(B = structure(c(0.5, 0.5, 0.6, 0.4, 0.555555555555556,
> 0.444444444444444), class = c("cast_matrix", "matrix"),
.Dim = 2:3,
> .Dimnames = list(
>    NULL, NULL)), D = structure(c(1, 0, 0.666666666666667,
> 0.333333333333333,
> 0.8, 0.2), class = c("cast_matrix", "matrix"), .Dim =
2:3, .Dimnames > list(
>    NULL, NULL))), .Names = c("B", "D"))
> n <-
> structure(list(B = c(4, 5, 9), D = c(4, 6, 10)), .Names = c("B",
> "D"))
>
> > col.prop
> $B
>     [,1] [,2]      [,3]
> [1,]  0.5  0.6 0.5555556
> [2,]  0.5  0.4 0.4444444
>
> $D
>     [,1]      [,2] [,3]
> [1,]    1 0.6666667  0.8
> [2,]    0 0.3333333  0.2
>
> > n
> $B
> [1] 4 5 9
>
> $D
> [1]  4  6 10
>
> I would like to "rbind" each element with the corresponding
element of each
> list ($B with $B and $D with $D):
>
> > res
> $B
>     [,1] [,2]      [,3]
> [1,]  0.5  0.6 0.5555556
> [2,]  0.5  0.4 0.4444444
> [3,]    4    5         9
>
> $D
>     [,1]      [,2] [,3]
> [1,]    1 0.6666667  0.8
> [2,]    0 0.3333333  0.2
> [3,]    4         6   10
>
> I've made an ugly loop to do this... Is there an easier way?
>
> Thank you very much.
>
> David
>
>        [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help@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

	[[alternative HTML version deleted]]