[R] binding two lists of lists of dataframes together

[Vin Cheng]

 Hi, 
I'm new to R and am stumped.  I'm trying to bind List 1 to List 2 and have the corresponding Output.  
 
I've found the following code - I can't say I understand rbindlist(lapply(list12, "[", i, TRUE)).  Either way - it doesn't give exactly what's needed.
 
library(data.table)
list12 <- list(List1,List2)
nr <- as.vector(nrow(list12[[1]]))
fastbind.ith.rows <- function(i) rbindlist(lapply(list12, "[", i, TRUE))
fastbound <- lapply(1:nr, fastbind.ith.rows)
 
It produces Output 2 - where dataframes are grouped together by rownames, but keeps 2 separate vectors - vs. binding the two into 1 vector.
 
Any help/guidance would be greatly appreciated!!
 
Thanks!
Vince
 
 
List1List2Output (Wanted) V1V2V3 V1V2V3 V1V2V3idc(563,623,581)c(563,623,581)c(563,623,581)idc(217,  120, 372)c(125,  334, 86)c(130,  349, 576)idc(563,623,581,217,  120, 372)c(563,623,581,125,  334, 86)c(563,623,581,130,  349, 576)wgtbandc(0,  0, 0, 0, 0)c(0,  0, 0, 0, 0)c(0,  0, 0, 0, 0)wgtbandc(1,  2, 3)c(1,  2, 3)c(1,  2, 3)wgtbandc(0,  0, 0, 0, 0,1, 2, 3)c(0,  0, 0, 0, 0,1, 2, 3)c(0,  0, 0, 0, 0,1, 2, 3)wgtc(0.007956164,  0.00199414, 0.009970699, 0.00994571, 0.011994826)c(0.007956164,  0.00199414, 0.009970699, 0.00994571, 0.011994826)c(0.007956164,  0.00199414, 0.009970699, 0.00994571, 0.011994826)wgtc(0.003565190625,  0.003565190625, 0.003565190625)c(0.003565190625,  0.00514971979166667, 0.003565190625)c(0.003565190625,  0.003565190625, 0.00514971979166667)wgtc(0.007956164,  0.00199414, 0.009970699, 0.00994571, 0.011994826,0.003565190625,  0.003565190625, 0.003565190625)c(0.007956164,  0.00199414, 0.009970699, 0.00994571, 0.011994826,0.003565190625,  0.00514971979166667, 0.003565190625)c(0.007956164,  0.00199414, 0.009970699, 0.00994571, 0.011994826,0.003565190625,  0.003565190625, 0.00514971979166667)heldc(2,  2, 2, 2, 2)c(2,  2, 2, 2, 2)c(2,  2, 2, 2, 2)heldc(0,  0, 0)c(0,  0, 0)c(0,  0, 0)heldc(2,  2, 2, 2, 2,0, 0, 0)c(2,  2, 2, 2, 2,0, 0, 0)c(2,  2, 2, 2, 2,0, 0, 0)efficiencyc(765,  1660, 1539, 1377, 1452)c(765,  1660, 1539, 1377, 1452)c(765,  1660, 1539, 1377, 1452)efficiencyc(1292,  908, 1283)c(1292,  908, 1283)c(1292,  908, 1283)efficiencyc(765,  1660, 1539, 1377, 1452,1292, 908, 1283)c(765,  1660, 1539, 1377, 1452,1292, 908, 1283)c(765,  1660, 1539, 1377, 1452,1292, 908, 1283)couponc(4,  11, 16, 27, 48)c(4,  11, 16, 27, 48)c(4,  11, 16, 27, 48)couponc(735,  403, 1366)c(414,  1183, 284)c(435,  1222, 127)couponc(4,  11, 16, 27, 48,735, 403, 1366)c(4,  11, 16, 27, 48,414, 1183, 284)c(4,  11, 16, 27, 48,435, 1222, 127) 
Output2 from Sample Code V1V2V3idc(563,623,581)c(563,623,581)c(563,623,581)c(217, 120, 372)c(125,  334, 86)c(130,  349, 576)wgtbandc(0,  0, 0, 0, 0)c(0,  0, 0, 0, 0)c(0,  0, 0, 0, 0)c(1, 2, 3)c(1,  2, 3)c(1,  2, 3)wgtc(0.007956164,  0.00199414, 0.009970699, 0.00994571, 0.011994826)c(0.007956164,  0.00199414, 0.009970699, 0.00994571, 0.011994826)c(0.007956164,  0.00199414, 0.009970699, 0.00994571, 0.011994826)c(0.003565190625, 0.003565190625,  0.003565190625)c(0.003565190625,  0.00514971979166667, 0.003565190625)c(0.003565190625,  0.003565190625, 0.00514971979166667)heldc(2,  2, 2, 2, 2)c(2,  2, 2, 2, 2)c(2,  2, 2, 2, 2)c(0, 0, 0)c(0,  0, 0)c(0,  0, 0)efficiencyc(765,  1660, 1539, 1377, 1452)c(765,  1660, 1539, 1377, 1452)c(765,  1660, 1539, 1377, 1452)c(1292, 908, 1283)c(1292,  908, 1283)c(1292,  908, 1283)couponc(4,  11, 16, 27, 48)c(4,  11, 16, 27, 48)c(4,  11, 16, 27, 48)c(735, 403, 1366)c(414,  1183, 284)c(435,  1222, 127) 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

 		 	   		  
	[[alternative HTML version deleted]]