[R] binding two lists of lists of dataframes together
Vin Cheng
newrnewbie at hotmail.com
Tue May 12 21:56:24 CEST 2015
Hi,
Thanks David! Your solution 3 worked well with the sample data, but when I run solution 2 & 3 on the actual data - it creates a list of 1 for each data point and it doesn't end up looking like the desired output for some reason.
I've run a dput on the actual data and pasted below. There's a lot of data - so I'm only copying list1 - if the solution could bind list1 with itself - it should work just as well.
Sorry for not providing an accurate sample the first time around - I thought the shortened version would be simpler and sufficient.
Any help/guidance would be greatly appreciated!
Many Thanks,
Vince
list1 <- structure(list(V1 = list(c(19L, 94L, 94L, 15L, 90L, 13L, 66L,
17L, 45L, 69L), c(1, 1, 2, 3, 4, 5, 6, 7, 8, 9), c(NaN, NaN,
NA, NA, NA, NA, NA, NA, NA, NA), c(0, 0, 0, 0, 0, 0, 0, 0, 0,
0), structure(c(12L, 95L, 95L, 8L, 91L, 6L, 64L, 10L, 41L, 67L
), .Label = c("ID1", "ID10", "ID100", "ID11", "ID12", "ID13",
"ID14", "ID15", "ID16", "ID17", "ID18", "ID19", "ID2", "ID20",
"ID21", "ID22", "ID23", "ID24", "ID25", "ID26", "ID27", "ID28",
"ID29", "ID3", "ID30", "ID31", "ID32", "ID33", "ID34", "ID35",
"ID36", "ID37", "ID38", "ID39", "ID4", "ID40", "ID41", "ID42",
"ID43", "ID44", "ID45", "ID46", "ID47", "ID48", "ID49", "ID5",
"ID50", "ID51", "ID52", "ID53", "ID54", "ID55", "ID56", "ID57",
"ID58", "ID59", "ID6", "ID60", "ID61", "ID62", "ID63", "ID64",
"ID65", "ID66", "ID67", "ID68", "ID69", "ID7", "ID70", "ID71",
"ID72", "ID73", "ID74", "ID75", "ID76", "ID77", "ID78", "ID79",
"ID8", "ID80", "ID81", "ID82", "ID83", "ID84", "ID85", "ID86",
"ID87", "ID88", "ID89", "ID9", "ID90", "ID91", "ID92", "ID93",
"ID94", "ID95", "ID96", "ID97", "ID98", "ID99"), class = "factor"),
structure(c(12L, 95L, 95L, 8L, 91L, 6L, 64L, 10L, 41L, 67L
), .Label = c("Issuer1", "Issuer10", "Issuer100", "Issuer11",
"Issuer12", "Issuer13", "Issuer14", "Issuer15", "Issuer16",
"Issuer17", "Issuer18", "Issuer19", "Issuer2", "Issuer20",
"Issuer21", "Issuer22", "Issuer23", "Issuer24", "Issuer25",
"Issuer26", "Issuer27", "Issuer28", "Issuer29", "Issuer3",
"Issuer30", "Issuer31", "Issuer32", "Issuer33", "Issuer34",
"Issuer35", "Issuer36", "Issuer37", "Issuer38", "Issuer39",
"Issuer4", "Issuer40", "Issuer41", "Issuer42", "Issuer43",
"Issuer44", "Issuer45", "Issuer46", "Issuer47", "Issuer48",
"Issuer49", "Issuer5", "Issuer50", "Issuer51", "Issuer52",
"Issuer53", "Issuer54", "Issuer55", "Issuer56", "Issuer57",
"Issuer58", "Issuer59", "Issuer6", "Issuer60", "Issuer61",
"Issuer62", "Issuer63", "Issuer64", "Issuer65", "Issuer66",
"Issuer67", "Issuer68", "Issuer69", "Issuer7", "Issuer70",
"Issuer71", "Issuer72", "Issuer73", "Issuer74", "Issuer75",
"Issuer76", "Issuer77", "Issuer78", "Issuer79", "Issuer8",
"Issuer80", "Issuer81", "Issuer82", "Issuer83", "Issuer84",
"Issuer85", "Issuer86", "Issuer87", "Issuer88", "Issuer89",
"Issuer9", "Issuer90", "Issuer91", "Issuer92", "Issuer93",
"Issuer94", "Issuer95", "Issuer96", "Issuer97", "Issuer98",
"Issuer99"), class = "factor"), c(95.5, 98.5, 98.5, 99.5,
103.5, 98.563, 99.75, 98.5, 98.75, 99.125), c(97.5, 99.5,
99.5, 100.375, 104.5, 99.188, 100.25, 99.5, 99.75, 100.063
), c(2L, 2L, 2L, 2L, 2L, 2L, 1L, 1L, 1L, 4L), c(4L, 5L, 5L,
5L, 5L, 2L, 3L, 5L, 3L, 2L), c(TRUE, FALSE, FALSE, TRUE,
FALSE, TRUE, TRUE, FALSE, FALSE, TRUE), structure(c(1L, 1L,
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L), .Label = "First", class = "factor"),
structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L), .Label = "First", class = "factor"),
structure(c(9L, 2L, 2L, 1L, 2L, 1L, 3L, 3L, 5L, 9L), .Label = c("B",
"B-", "B+", "BB", "BB-", "BB+", "BBB-", "CCC", "CCC+", "NR"
), class = "factor"), structure(c(8L, 2L, 2L, 1L, 8L, 2L,
2L, 2L, 1L, 7L), .Label = c("B1", "B2", "B3", "Ba1", "Ba2",
"Ba3", "Caa1", "Caa2", "NR"), class = "factor"), structure(c(20L,
88L, 88L, 6L, 3L, 35L, 29L, 24L, 53L, 82L), .Label = c("1/11/2019",
"1/2/2019", "1/2/2020", "1/30/2022", "10/15/2016", "10/15/2021",
"10/17/2019", "10/17/2021", "10/19/2019", "10/2/2017", "10/22/2020",
"10/31/2018", "10/8/2021", "10/9/2018", "10/9/2019", "11/12/2020",
"11/20/2019", "11/20/2020", "11/27/2020", "11/5/2021", "11/6/2020",
"11/9/2017", "11/9/2018", "12/15/2018", "12/15/2021", "12/15/2022",
"12/16/2019", "12/18/2020", "12/20/2019", "12/7/2018", "12/7/2019",
"2/12/2021", "2/14/2020", "2/20/2021", "2/21/2021", "2/21/2022",
"2/24/2017", "2/26/2019", "2/6/2019", "3/20/2018", "3/20/2020",
"3/21/2019", "4/11/2016", "4/11/2020", "4/17/2021", "4/23/2020",
"4/30/2018", "4/5/2020", "5/11/2018", "5/14/2021", "5/14/2022",
"5/15/2018", "5/20/2021", "5/22/2021", "5/22/2022", "5/31/2020",
"5/8/2020", "6/13/2018", "6/17/2021", "6/19/2021", "6/19/2022",
"6/2/2019", "6/20/2017", "6/27/2019", "6/3/2019", "6/30/2016",
"6/30/2017", "6/30/2019", "6/5/2020", "6/7/2021", "7/10/2018",
"7/10/2020", "7/11/2021", "7/11/2022", "7/2/2021", "7/29/2021",
"7/29/2022", "7/3/2019", "7/9/2020", "7/9/2021", "8/1/2021",
"8/12/2021", "8/14/2019", "8/15/2021", "8/20/2021", "8/23/2019",
"8/24/2017", "8/29/2021", "8/3/2018", "8/7/2017", "8/7/2019",
"9/18/2016", "9/18/2019", "9/20/2019"), class = "factor"),
c(FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE,
FALSE, FALSE), structure(c(12L, 95L, 95L, 8L, 91L, 6L, 64L,
10L, 41L, 67L), .Label = c("Issuer1", "Issuer10", "Issuer100",
"Issuer11", "Issuer12", "Issuer13", "Issuer14", "Issuer15",
"Issuer16", "Issuer17", "Issuer18", "Issuer19", "Issuer2",
"Issuer20", "Issuer21", "Issuer22", "Issuer23", "Issuer24",
"Issuer25", "Issuer26", "Issuer27", "Issuer28", "Issuer29",
"Issuer3", "Issuer30", "Issuer31", "Issuer32", "Issuer33",
"Issuer34", "Issuer35", "Issuer36", "Issuer37", "Issuer38",
"Issuer39", "Issuer4", "Issuer40", "Issuer41", "Issuer42",
"Issuer43", "Issuer44", "Issuer45", "Issuer46", "Issuer47",
"Issuer48", "Issuer49", "Issuer5", "Issuer50", "Issuer51",
"Issuer52", "Issuer53", "Issuer54", "Issuer55", "Issuer56",
"Issuer57", "Issuer58", "Issuer59", "Issuer6", "Issuer60",
"Issuer61", "Issuer62", "Issuer63", "Issuer64", "Issuer65",
"Issuer66", "Issuer67", "Issuer68", "Issuer69", "Issuer7",
"Issuer70", "Issuer71", "Issuer72", "Issuer73", "Issuer74",
"Issuer75", "Issuer76", "Issuer77", "Issuer78", "Issuer79",
"Issuer8", "Issuer80", "Issuer81", "Issuer82", "Issuer83",
"Issuer84", "Issuer85", "Issuer86", "Issuer87", "Issuer88",
"Issuer89", "Issuer9", "Issuer90", "Issuer91", "Issuer92",
"Issuer93", "Issuer94", "Issuer95", "Issuer96", "Issuer97",
"Issuer98", "Issuer99"), class = "factor"), structure(c(12L,
95L, 95L, 8L, 91L, 6L, 64L, 10L, 41L, 67L), .Label = c("BL1",
"BL10", "BL100", "BL11", "BL12", "BL13", "BL14", "BL15",
"BL16", "BL17", "BL18", "BL19", "BL2", "BL20", "BL21", "BL22",
"BL23", "BL24", "BL25", "BL26", "BL27", "BL28", "BL29", "BL3",
"BL30", "BL31", "BL32", "BL33", "BL34", "BL35", "BL36", "BL37",
"BL38", "BL39", "BL4", "BL40", "BL41", "BL42", "BL43", "BL44",
"BL45", "BL46", "BL47", "BL48", "BL49", "BL5", "BL50", "BL51",
"BL52", "BL53", "BL54", "BL55", "BL56", "BL57", "BL58", "BL59",
"BL6", "BL60", "BL61", "BL62", "BL63", "BL64", "BL65", "BL66",
"BL67", "BL68", "BL69", "BL7", "BL70", "BL71", "BL72", "BL73",
"BL74", "BL75", "BL76", "BL77", "BL78", "BL79", "BL8", "BL80",
"BL81", "BL82", "BL83", "BL84", "BL85", "BL86", "BL87", "BL88",
"BL89", "BL9", "BL90", "BL91", "BL92", "BL93", "BL94", "BL95",
"BL96", "BL97", "BL98", "BL99"), class = "factor"), structure(c(4L,
3L, 3L, 5L, 6L, 3L, 2L, 6L, 6L, 5L), .Label = c("Banking, Finance, Insurance & Real Estate",
"Consumer goods: Non-durable", "Energy: Oil & Gas", "Hotel, Gaming, & Leisure",
"Retail", "Services: Business"), class = "factor"), structure(c(3L,
5L, 5L, 6L, 4L, 3L, 4L, 2L, 6L, 6L), .Label = c("Financial Intermediaries",
"Health care", "Leisure goods/activities/movies", "Multiline Retail",
"Oil & gas", "Retailers (except food & drug)"), class = "factor"),
structure(c(8L, 8L, 8L, 8L, 8L, 8L, 8L, 6L, 8L, 8L), .Label = c("AU",
"BE", "CA", "DE", "FR", "GB", "LU", "US"), class = "factor"),
structure(c(6L, 6L, 6L, 6L, 6L, 6L, 6L, 5L, 6L, 6L), .Label = c("1",
"2", "3", "Tax Jurisdiction", "UK", "US"), class = "factor"),
structure(c(4L, 4L, 4L, 4L, 4L, 4L, 4L, 2L, 4L, 4L), .Label = c("Canada",
"Europe", "Other", "U.S."), class = "factor"), structure(c(1L,
2L, 2L, 2L, 1L, 2L, 2L, 2L, 2L, 1L), .Label = c("N", "Y"), class = "factor"),
structure(c(2L, 1L, 1L, 1L, 2L, 1L, 1L, 1L, 1L, 2L), .Label = c("N",
"Y"), class = "factor"), structure(c(1L, 1L, 1L, 1L, 1L,
1L, 1L, 1L, 1L, 1L), .Label = "FLOATING", class = "factor"),
c(0.125550168, 1.731733265, 1.731733265, NA, 5.246485518,
7.798802147, NA, NA, NA, NA), c(4770L, 3490L, 3490L, 3490L,
3490L, 3490L, 2220L, 2220L, 2220L, 3490L), c(0.45, 0.4, 0.4,
0.45, 0.55, 0.4, 0.4, 0.45, 0.4, 0.5), c(4770L, 3490L, 3490L,
3490L, 3490L, 3490L, 2220L, 2220L, 2220L, 3490L), c(0.55,
0.4, 0.4, 0.4, 0.55, 0.4, 0.5, 0.5, 0.45, 0.55), c(18L, 15L,
15L, 15L, 18L, 15L, 15L, 15L, 14L, 17L), c(17L, 16L, 16L,
15L, 14L, 15L, 15L, 15L, 14L, 15L), c(192500000, 205000000,
205000000, 342000000, 120000000, 835000000, 1043700000, 160000000,
300000000, 265000000), c(0.02, 0.02, 0.02, 0.4, 0.02, 0.4,
0.6, 0.6, 0.6, 0.02), c(850L, 475L, 475L, 500L, 1000L, 350L,
400L, 975L, 500L, 700L), c(1, 1.5, 1.5, 1, 1.25, 1, 1, 1,
1, 1), c(0.0851, 0.04765, 0.04765, 0.0501, 0.100125, 0.0351,
0.0401, 0.0976, 0.0501, 0.0701), c(0.099192999, 0.023321348,
0.023321348, 0.06465519, 0.103470278, 0.052237196, 0.051331755,
0.112300026, 0.066116739, 0.084107871), c(897.0917677, -1.49365213,
-1.49365213, 549.0886934, 975.9481504, 429.1863229, 436.2991366,
1062.374805, 567.0741295, 747.1023728), c(0.088186528, 0.048131313,
0.048131313, 0.050131332, 0.096274038, 0.035499188, 0.040049938,
0.098585859, 0.050478589, 0.070385766), c(0L, 0L, 0L, 0L,
0L, 0L, 0L, 0L, 0L, 0L), structure(c(1L, 1L, 1L, 1L, 1L,
1L, 1L, 1L, 1L, 1L), .Label = "NO", class = "factor"), structure(c(1L,
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L), .Label = "CS", class = "factor"),
c(0.0178406708595388, 0.0136532951289398, 0.0136532951289398,
0.0143553008595989, 0.028689111747851, 0.0100573065902579,
0.0180630630630631, 0.043963963963964, 0.0225675675675676,
0.0200859598853868), c(0.046805, 0.01906, 0.01906, 0.02004,
0.05506875, 0.01404, 0.02005, 0.0488, 0.022545, 0.038555),
c(0.001702, 0.000953, 0.000953, 0.02004, 0.0020025, 0.01404,
0.02406, 0.05856, 0.03006, 0.001402)), V2 = list(c(93L, 3L,
85L, 34L, 20L, 89L, 16L, 25L, 83L, 90L), c(1, 1, 2, 3, 4, 5,
6, 7, 8, 9), c(NaN, NaN, NA, NA, NA, NA, NA, NA, NA, NA), c(0,
0, 0, 0, 0, 0, 0, 0, 0, 0), structure(c(94L, 24L, 85L, 29L, 14L,
89L, 9L, 19L, 83L, 91L), .Label = c("ID1", "ID10", "ID100", "ID11",
"ID12", "ID13", "ID14", "ID15", "ID16", "ID17", "ID18", "ID19",
"ID2", "ID20", "ID21", "ID22", "ID23", "ID24", "ID25", "ID26",
"ID27", "ID28", "ID29", "ID3", "ID30", "ID31", "ID32", "ID33",
"ID34", "ID35", "ID36", "ID37", "ID38", "ID39", "ID4", "ID40",
"ID41", "ID42", "ID43", "ID44", "ID45", "ID46", "ID47", "ID48",
"ID49", "ID5", "ID50", "ID51", "ID52", "ID53", "ID54", "ID55",
"ID56", "ID57", "ID58", "ID59", "ID6", "ID60", "ID61", "ID62",
"ID63", "ID64", "ID65", "ID66", "ID67", "ID68", "ID69", "ID7",
"ID70", "ID71", "ID72", "ID73", "ID74", "ID75", "ID76", "ID77",
"ID78", "ID79", "ID8", "ID80", "ID81", "ID82", "ID83", "ID84",
"ID85", "ID86", "ID87", "ID88", "ID89", "ID9", "ID90", "ID91",
"ID92", "ID93", "ID94", "ID95", "ID96", "ID97", "ID98", "ID99"
), class = "factor"), structure(c(94L, 24L, 85L, 29L, 14L, 89L,
9L, 19L, 83L, 91L), .Label = c("Issuer1", "Issuer10", "Issuer100",
"Issuer11", "Issuer12", "Issuer13", "Issuer14", "Issuer15", "Issuer16",
"Issuer17", "Issuer18", "Issuer19", "Issuer2", "Issuer20", "Issuer21",
"Issuer22", "Issuer23", "Issuer24", "Issuer25", "Issuer26", "Issuer27",
"Issuer28", "Issuer29", "Issuer3", "Issuer30", "Issuer31", "Issuer32",
"Issuer33", "Issuer34", "Issuer35", "Issuer36", "Issuer37", "Issuer38",
"Issuer39", "Issuer4", "Issuer40", "Issuer41", "Issuer42", "Issuer43",
"Issuer44", "Issuer45", "Issuer46", "Issuer47", "Issuer48", "Issuer49",
"Issuer5", "Issuer50", "Issuer51", "Issuer52", "Issuer53", "Issuer54",
"Issuer55", "Issuer56", "Issuer57", "Issuer58", "Issuer59", "Issuer6",
"Issuer60", "Issuer61", "Issuer62", "Issuer63", "Issuer64", "Issuer65",
"Issuer66", "Issuer67", "Issuer68", "Issuer69", "Issuer7", "Issuer70",
"Issuer71", "Issuer72", "Issuer73", "Issuer74", "Issuer75", "Issuer76",
"Issuer77", "Issuer78", "Issuer79", "Issuer8", "Issuer80", "Issuer81",
"Issuer82", "Issuer83", "Issuer84", "Issuer85", "Issuer86", "Issuer87",
"Issuer88", "Issuer89", "Issuer9", "Issuer90", "Issuer91", "Issuer92",
"Issuer93", "Issuer94", "Issuer95", "Issuer96", "Issuer97", "Issuer98",
"Issuer99"), class = "factor"), c(99.5, 99.646, 100.402, 100.25,
98, 99.563, 99.563, 99.388, 99.531, 103.5), c(100.5, 100.271,
100.903, 100.75, 99, 100.188, 100.063, 99.788, 100.125, 104.5
), c(1L, 6L, 9L, 1L, 1L, 2L, 2L, 10L, 4L, 2L), c(5L, 2L, 1L,
3L, 3L, 4L, 4L, 1L, 1L, 5L), c(TRUE, TRUE, FALSE, FALSE, TRUE,
FALSE, FALSE, TRUE, TRUE, FALSE), structure(c(1L, 1L, 1L, 1L,
1L, 1L, 1L, 1L, 1L, 1L), .Label = "First", class = "factor"),
structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L), .Label = "First", class = "factor"),
structure(c(8L, 1L, 4L, 1L, 3L, 4L, 6L, 1L, 5L, 2L), .Label = c("B",
"B-", "B+", "BB", "BB-", "BB+", "BBB-", "CCC", "CCC+", "NR"
), class = "factor"), structure(c(7L, 2L, 5L, 2L, 1L, 2L,
6L, 1L, 5L, 8L), .Label = c("B1", "B2", "B3", "Ba1", "Ba2",
"Ba3", "Caa1", "Caa2", "NR"), class = "factor"), structure(c(41L,
1L, 13L, 43L, 21L, 87L, 49L, 73L, 46L, 3L), .Label = c("1/11/2019",
"1/2/2019", "1/2/2020", "1/30/2022", "10/15/2016", "10/15/2021",
"10/17/2019", "10/17/2021", "10/19/2019", "10/2/2017", "10/22/2020",
"10/31/2018", "10/8/2021", "10/9/2018", "10/9/2019", "11/12/2020",
"11/20/2019", "11/20/2020", "11/27/2020", "11/5/2021", "11/6/2020",
"11/9/2017", "11/9/2018", "12/15/2018", "12/15/2021", "12/15/2022",
"12/16/2019", "12/18/2020", "12/20/2019", "12/7/2018", "12/7/2019",
"2/12/2021", "2/14/2020", "2/20/2021", "2/21/2021", "2/21/2022",
"2/24/2017", "2/26/2019", "2/6/2019", "3/20/2018", "3/20/2020",
"3/21/2019", "4/11/2016", "4/11/2020", "4/17/2021", "4/23/2020",
"4/30/2018", "4/5/2020", "5/11/2018", "5/14/2021", "5/14/2022",
"5/15/2018", "5/20/2021", "5/22/2021", "5/22/2022", "5/31/2020",
"5/8/2020", "6/13/2018", "6/17/2021", "6/19/2021", "6/19/2022",
"6/2/2019", "6/20/2017", "6/27/2019", "6/3/2019", "6/30/2016",
"6/30/2017", "6/30/2019", "6/5/2020", "6/7/2021", "7/10/2018",
"7/10/2020", "7/11/2021", "7/11/2022", "7/2/2021", "7/29/2021",
"7/29/2022", "7/3/2019", "7/9/2020", "7/9/2021", "8/1/2021",
"8/12/2021", "8/14/2019", "8/15/2021", "8/20/2021", "8/23/2019",
"8/24/2017", "8/29/2021", "8/3/2018", "8/7/2017", "8/7/2019",
"9/18/2016", "9/18/2019", "9/20/2019"), class = "factor"),
c(FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE,
FALSE, FALSE), structure(c(94L, 24L, 85L, 29L, 14L, 89L,
9L, 19L, 83L, 91L), .Label = c("Issuer1", "Issuer10", "Issuer100",
"Issuer11", "Issuer12", "Issuer13", "Issuer14", "Issuer15",
"Issuer16", "Issuer17", "Issuer18", "Issuer19", "Issuer2",
"Issuer20", "Issuer21", "Issuer22", "Issuer23", "Issuer24",
"Issuer25", "Issuer26", "Issuer27", "Issuer28", "Issuer29",
"Issuer3", "Issuer30", "Issuer31", "Issuer32", "Issuer33",
"Issuer34", "Issuer35", "Issuer36", "Issuer37", "Issuer38",
"Issuer39", "Issuer4", "Issuer40", "Issuer41", "Issuer42",
"Issuer43", "Issuer44", "Issuer45", "Issuer46", "Issuer47",
"Issuer48", "Issuer49", "Issuer5", "Issuer50", "Issuer51",
"Issuer52", "Issuer53", "Issuer54", "Issuer55", "Issuer56",
"Issuer57", "Issuer58", "Issuer59", "Issuer6", "Issuer60",
"Issuer61", "Issuer62", "Issuer63", "Issuer64", "Issuer65",
"Issuer66", "Issuer67", "Issuer68", "Issuer69", "Issuer7",
"Issuer70", "Issuer71", "Issuer72", "Issuer73", "Issuer74",
"Issuer75", "Issuer76", "Issuer77", "Issuer78", "Issuer79",
"Issuer8", "Issuer80", "Issuer81", "Issuer82", "Issuer83",
"Issuer84", "Issuer85", "Issuer86", "Issuer87", "Issuer88",
"Issuer89", "Issuer9", "Issuer90", "Issuer91", "Issuer92",
"Issuer93", "Issuer94", "Issuer95", "Issuer96", "Issuer97",
"Issuer98", "Issuer99"), class = "factor"), structure(c(94L,
24L, 85L, 29L, 14L, 89L, 9L, 19L, 83L, 91L), .Label = c("BL1",
"BL10", "BL100", "BL11", "BL12", "BL13", "BL14", "BL15",
"BL16", "BL17", "BL18", "BL19", "BL2", "BL20", "BL21", "BL22",
"BL23", "BL24", "BL25", "BL26", "BL27", "BL28", "BL29", "BL3",
"BL30", "BL31", "BL32", "BL33", "BL34", "BL35", "BL36", "BL37",
"BL38", "BL39", "BL4", "BL40", "BL41", "BL42", "BL43", "BL44",
"BL45", "BL46", "BL47", "BL48", "BL49", "BL5", "BL50", "BL51",
"BL52", "BL53", "BL54", "BL55", "BL56", "BL57", "BL58", "BL59",
"BL6", "BL60", "BL61", "BL62", "BL63", "BL64", "BL65", "BL66",
"BL67", "BL68", "BL69", "BL7", "BL70", "BL71", "BL72", "BL73",
"BL74", "BL75", "BL76", "BL77", "BL78", "BL79", "BL8", "BL80",
"BL81", "BL82", "BL83", "BL84", "BL85", "BL86", "BL87", "BL88",
"BL89", "BL9", "BL90", "BL91", "BL92", "BL93", "BL94", "BL95",
"BL96", "BL97", "BL98", "BL99"), class = "factor"), structure(c(2L,
2L, 3L, 6L, 1L, 6L, 6L, 6L, 1L, 6L), .Label = c("Banking, Finance, Insurance & Real Estate",
"Consumer goods: Non-durable", "Energy: Oil & Gas", "Hotel, Gaming, & Leisure",
"Retail", "Services: Business"), class = "factor"), structure(c(6L,
6L, 3L, 5L, 1L, 2L, 5L, 3L, 2L, 4L), .Label = c("Financial Intermediaries",
"Health care", "Leisure goods/activities/movies", "Multiline Retail",
"Oil & gas", "Retailers (except food & drug)"), class = "factor"),
structure(c(8L, 8L, 8L, 8L, 8L, 8L, 8L, 8L, 8L, 8L), .Label = c("AU",
"BE", "CA", "DE", "FR", "GB", "LU", "US"), class = "factor"),
structure(c(6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L), .Label = c("1",
"2", "3", "Tax Jurisdiction", "UK", "US"), class = "factor"),
structure(c(4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L, 4L), .Label = c("Canada",
"Europe", "Other", "U.S."), class = "factor"), structure(c(1L,
2L, 2L, 2L, 2L, 2L, 2L, 2L, 2L, 1L), .Label = c("N", "Y"), class = "factor"),
structure(c(2L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 2L), .Label = c("N",
"Y"), class = "factor"), structure(c(1L, 1L, 1L, 1L, 1L,
1L, 1L, 1L, 1L, 1L), .Label = "FLOATING", class = "factor"),
c(2.603554841, 7.27032758, 3.155438813, 5.037267081, 0.125550168,
NA, 3.464301168, NA, 4.816376964, 5.246485518), c(2220L,
2220L, 940L, 3490L, 4770L, 2220L, 1766L, 3490L, 2220L, 3490L
), c(0.55, 0.45, 0.5, 0.4, 0.6, 0.45, 0.45, 0.55, 0.2, 0.55
), c(2220L, 2220L, 940L, 3490L, 4770L, 2220L, 1766L, 3490L,
2220L, 3490L), c(0.55, 0.45, 0.5, 0.4, 0.3, 0.45, 0.45, 0.4,
0.2, 0.55), c(17L, 15L, 12L, 15L, 14L, 15L, 13L, 14L, 12L,
18L), c(16L, 16L, 14L, 16L, 15L, 12L, 13L, 15L, 14L, 14L),
c(200000000, 613811406, 750000000, 200000000, 405500000,
450000000, 530000000, 2010000000, 775000000, 120000000),
c(0.02, 0.5, 0.65, 0.27, 0.5, 0.65, 0.65, 0.3, 0.65, 0.02
), c(950L, 350L, 350L, 275L, 450L, 275L, 225L, 325L, 275L,
1000L), c(1.25, 1, 0.75, 0.75, 1, 0.75, 0, 1, 0.75, 1.25),
c(0.095125, 0.0351, 0.035075, 0.027575, 0.0451, 0.027575,
0.02527, 0.0326, 0.027575, 0.100125), c(0.104211455, 0.046414939,
0.050338657, 0.027233401, 0.059885473, 0.03459045, 0.028669191,
0.048294163, 0.040935438, 0.103470278), c(980.5501911, 400.3544693,
385.8629241, 244.6340073, 511.2711809, 294.3073789, 194.2034583,
385.9437059, 308.4324006, 975.9481504), c(0.095125, 0.035114573,
0.034847619, 0.027437811, 0.045786802, 0.027609374, 0.025317343,
0.032734868, 0.027622511, 0.096274038), c(0L, 0L, 0L, 0L,
0L, 0L, 0L, 0L, 0L, 0L), structure(c(1L, 1L, 1L, 1L, 1L,
1L, 1L, 1L, 1L, 1L), .Label = "NO", class = "factor"), structure(c(1L,
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L), .Label = "CS", class = "factor"),
c(0.0428490990990991, 0.0158108108108108, 0.037313829787234,
0.00790114613180516, 0.00945492662473794, 0.0124211711711712,
0.0143091732729332, 0.00934097421203438, 0.0124211711711712,
0.028689111747851), c(0.05231875, 0.015795, 0.0175375, 0.01103,
0.01353, 0.01240875, 0.0113715, 0.01304, 0.005515, 0.05506875
), c(0.0019025, 0.01755, 0.02279875, 0.00744525, 0.02255,
0.01792375, 0.0164255, 0.00978, 0.01792375, 0.0020025)),
V3 = list(c(47L, 95L, 26L, 64L, 16L, 55L, 61L, 39L, 23L,
66L), c(1, 1, 2, 3, 4, 5, 6, 7, 8, 9), c(NaN, NaN, NA, NA,
NA, NA, NA, NA, NA, NA), c(0, 0, 0, 0, 0, 0, 0, 0, 0, 0),
structure(c(43L, 96L, 20L, 62L, 9L, 52L, 59L, 34L, 17L,
64L), .Label = c("ID1", "ID10", "ID100", "ID11", "ID12",
"ID13", "ID14", "ID15", "ID16", "ID17", "ID18", "ID19",
"ID2", "ID20", "ID21", "ID22", "ID23", "ID24", "ID25",
"ID26", "ID27", "ID28", "ID29", "ID3", "ID30", "ID31",
"ID32", "ID33", "ID34", "ID35", "ID36", "ID37", "ID38",
"ID39", "ID4", "ID40", "ID41", "ID42", "ID43", "ID44",
"ID45", "ID46", "ID47", "ID48", "ID49", "ID5", "ID50",
"ID51", "ID52", "ID53", "ID54", "ID55", "ID56", "ID57",
"ID58", "ID59", "ID6", "ID60", "ID61", "ID62", "ID63",
"ID64", "ID65", "ID66", "ID67", "ID68", "ID69", "ID7",
"ID70", "ID71", "ID72", "ID73", "ID74", "ID75", "ID76",
"ID77", "ID78", "ID79", "ID8", "ID80", "ID81", "ID82",
"ID83", "ID84", "ID85", "ID86", "ID87", "ID88", "ID89",
"ID9", "ID90", "ID91", "ID92", "ID93", "ID94", "ID95",
"ID96", "ID97", "ID98", "ID99"), class = "factor"), structure(c(43L,
96L, 20L, 62L, 9L, 52L, 59L, 34L, 17L, 64L), .Label = c("Issuer1",
"Issuer10", "Issuer100", "Issuer11", "Issuer12", "Issuer13",
"Issuer14", "Issuer15", "Issuer16", "Issuer17", "Issuer18",
"Issuer19", "Issuer2", "Issuer20", "Issuer21", "Issuer22",
"Issuer23", "Issuer24", "Issuer25", "Issuer26", "Issuer27",
"Issuer28", "Issuer29", "Issuer3", "Issuer30", "Issuer31",
"Issuer32", "Issuer33", "Issuer34", "Issuer35", "Issuer36",
"Issuer37", "Issuer38", "Issuer39", "Issuer4", "Issuer40",
"Issuer41", "Issuer42", "Issuer43", "Issuer44", "Issuer45",
"Issuer46", "Issuer47", "Issuer48", "Issuer49", "Issuer5",
"Issuer50", "Issuer51", "Issuer52", "Issuer53", "Issuer54",
"Issuer55", "Issuer56", "Issuer57", "Issuer58", "Issuer59",
"Issuer6", "Issuer60", "Issuer61", "Issuer62", "Issuer63",
"Issuer64", "Issuer65", "Issuer66", "Issuer67", "Issuer68",
"Issuer69", "Issuer7", "Issuer70", "Issuer71", "Issuer72",
"Issuer73", "Issuer74", "Issuer75", "Issuer76", "Issuer77",
"Issuer78", "Issuer79", "Issuer8", "Issuer80", "Issuer81",
"Issuer82", "Issuer83", "Issuer84", "Issuer85", "Issuer86",
"Issuer87", "Issuer88", "Issuer89", "Issuer9", "Issuer90",
"Issuer91", "Issuer92", "Issuer93", "Issuer94", "Issuer95",
"Issuer96", "Issuer97", "Issuer98", "Issuer99"), class = "factor"),
c(99.688, 75.667, 99.229, 99.583, 99.563, 99.188, 98.8,
98.5, 99, 99.75), c(100.281, 78.667, 100.104, 100.333,
100.063, 99.906, 99.75, 99.5, 99.75, 100.25), c(4L, 3L,
6L, 3L, 2L, 4L, 5L, 1L, 1L, 1L), c(4L, 3L, 1L, 3L, 4L,
2L, 4L, 5L, 3L, 3L), c(FALSE, TRUE, TRUE, TRUE, FALSE,
TRUE, TRUE, FALSE, TRUE, TRUE), structure(c(1L, 1L, 1L,
1L, 1L, 1L, 1L, 1L, 1L, 1L), .Label = "First", class = "factor"),
structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L), .Label = "First", class = "factor"),
structure(c(3L, 8L, 9L, 1L, 6L, 3L, 10L, 10L, 9L, 3L), .Label = c("B",
"B-", "B+", "BB", "BB-", "BB+", "BBB-", "CCC", "CCC+",
"NR"), class = "factor"), structure(c(6L, 7L, 7L, 2L,
6L, 1L, 9L, 9L, 8L, 2L), .Label = c("B1", "B2", "B3",
"Ba1", "Ba2", "Ba3", "Caa1", "Caa2", "NR"), class = "factor"),
structure(c(66L, 80L, 74L, 30L, 49L, 72L, 70L, 62L, 10L,
29L), .Label = c("1/11/2019", "1/2/2019", "1/2/2020",
"1/30/2022", "10/15/2016", "10/15/2021", "10/17/2019",
"10/17/2021", "10/19/2019", "10/2/2017", "10/22/2020",
"10/31/2018", "10/8/2021", "10/9/2018", "10/9/2019",
"11/12/2020", "11/20/2019", "11/20/2020", "11/27/2020",
"11/5/2021", "11/6/2020", "11/9/2017", "11/9/2018", "12/15/2018",
"12/15/2021", "12/15/2022", "12/16/2019", "12/18/2020",
"12/20/2019", "12/7/2018", "12/7/2019", "2/12/2021",
"2/14/2020", "2/20/2021", "2/21/2021", "2/21/2022", "2/24/2017",
"2/26/2019", "2/6/2019", "3/20/2018", "3/20/2020", "3/21/2019",
"4/11/2016", "4/11/2020", "4/17/2021", "4/23/2020", "4/30/2018",
"4/5/2020", "5/11/2018", "5/14/2021", "5/14/2022", "5/15/2018",
"5/20/2021", "5/22/2021", "5/22/2022", "5/31/2020", "5/8/2020",
"6/13/2018", "6/17/2021", "6/19/2021", "6/19/2022", "6/2/2019",
"6/20/2017", "6/27/2019", "6/3/2019", "6/30/2016", "6/30/2017",
"6/30/2019", "6/5/2020", "6/7/2021", "7/10/2018", "7/10/2020",
"7/11/2021", "7/11/2022", "7/2/2021", "7/29/2021", "7/29/2022",
"7/3/2019", "7/9/2020", "7/9/2021", "8/1/2021", "8/12/2021",
"8/14/2019", "8/15/2021", "8/20/2021", "8/23/2019", "8/24/2017",
"8/29/2021", "8/3/2018", "8/7/2017", "8/7/2019", "9/18/2016",
"9/18/2019", "9/20/2019"), class = "factor"), c(FALSE,
FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE,
FALSE), structure(c(43L, 96L, 20L, 62L, 9L, 52L, 59L,
34L, 17L, 64L), .Label = c("Issuer1", "Issuer10", "Issuer100",
"Issuer11", "Issuer12", "Issuer13", "Issuer14", "Issuer15",
"Issuer16", "Issuer17", "Issuer18", "Issuer19", "Issuer2",
"Issuer20", "Issuer21", "Issuer22", "Issuer23", "Issuer24",
"Issuer25", "Issuer26", "Issuer27", "Issuer28", "Issuer29",
"Issuer3", "Issuer30", "Issuer31", "Issuer32", "Issuer33",
"Issuer34", "Issuer35", "Issuer36", "Issuer37", "Issuer38",
"Issuer39", "Issuer4", "Issuer40", "Issuer41", "Issuer42",
"Issuer43", "Issuer44", "Issuer45", "Issuer46", "Issuer47",
"Issuer48", "Issuer49", "Issuer5", "Issuer50", "Issuer51",
"Issuer52", "Issuer53", "Issuer54", "Issuer55", "Issuer56",
"Issuer57", "Issuer58", "Issuer59", "Issuer6", "Issuer60",
"Issuer61", "Issuer62", "Issuer63", "Issuer64", "Issuer65",
"Issuer66", "Issuer67", "Issuer68", "Issuer69", "Issuer7",
"Issuer70", "Issuer71", "Issuer72", "Issuer73", "Issuer74",
"Issuer75", "Issuer76", "Issuer77", "Issuer78", "Issuer79",
"Issuer8", "Issuer80", "Issuer81", "Issuer82", "Issuer83",
"Issuer84", "Issuer85", "Issuer86", "Issuer87", "Issuer88",
"Issuer89", "Issuer9", "Issuer90", "Issuer91", "Issuer92",
"Issuer93", "Issuer94", "Issuer95", "Issuer96", "Issuer97",
"Issuer98", "Issuer99"), class = "factor"), structure(c(43L,
96L, 20L, 62L, 9L, 52L, 59L, 34L, 17L, 64L), .Label = c("BL1",
"BL10", "BL100", "BL11", "BL12", "BL13", "BL14", "BL15",
"BL16", "BL17", "BL18", "BL19", "BL2", "BL20", "BL21",
"BL22", "BL23", "BL24", "BL25", "BL26", "BL27", "BL28",
"BL29", "BL3", "BL30", "BL31", "BL32", "BL33", "BL34",
"BL35", "BL36", "BL37", "BL38", "BL39", "BL4", "BL40",
"BL41", "BL42", "BL43", "BL44", "BL45", "BL46", "BL47",
"BL48", "BL49", "BL5", "BL50", "BL51", "BL52", "BL53",
"BL54", "BL55", "BL56", "BL57", "BL58", "BL59", "BL6",
"BL60", "BL61", "BL62", "BL63", "BL64", "BL65", "BL66",
"BL67", "BL68", "BL69", "BL7", "BL70", "BL71", "BL72",
"BL73", "BL74", "BL75", "BL76", "BL77", "BL78", "BL79",
"BL8", "BL80", "BL81", "BL82", "BL83", "BL84", "BL85",
"BL86", "BL87", "BL88", "BL89", "BL9", "BL90", "BL91",
"BL92", "BL93", "BL94", "BL95", "BL96", "BL97", "BL98",
"BL99"), class = "factor"), structure(c(1L, 6L, 6L, 4L,
6L, 4L, 6L, 2L, 6L, 2L), .Label = c("Banking, Finance, Insurance & Real Estate",
"Consumer goods: Non-durable", "Energy: Oil & Gas", "Hotel, Gaming, & Leisure",
"Retail", "Services: Business"), class = "factor"), structure(c(2L,
2L, 1L, 5L, 5L, 3L, 3L, 6L, 2L, 4L), .Label = c("Financial Intermediaries",
"Health care", "Leisure goods/activities/movies", "Multiline Retail",
"Oil & gas", "Retailers (except food & drug)"), class = "factor"),
structure(c(8L, 8L, 8L, 8L, 8L, 8L, 5L, 8L, 8L, 8L), .Label = c("AU",
"BE", "CA", "DE", "FR", "GB", "LU", "US"), class = "factor"),
structure(c(6L, 6L, 6L, 6L, 6L, 6L, 3L, 6L, 6L, 6L), .Label = c("1",
"2", "3", "Tax Jurisdiction", "UK", "US"), class = "factor"),
structure(c(4L, 4L, 4L, 4L, 4L, 4L, 2L, 4L, 4L, 4L), .Label = c("Canada",
"Europe", "Other", "U.S."), class = "factor"), structure(c(2L,
1L, 1L, 2L, 2L, 2L, 1L, 1L, 1L, 2L), .Label = c("N",
"Y"), class = "factor"), structure(c(1L, 2L, 2L, 1L,
1L, 1L, 2L, 2L, 2L, 1L), .Label = c("N", "Y"), class = "factor"),
structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L), .Label = "FLOATING", class = "factor"),
c(8.74248921, NA, NA, 4.338507174, 3.464301168, NA, NA,
NA, NA, NA), c(2220L, 2220L, 3490L, 3490L, 1766L, 2220L,
8070L, 8070L, 3490L, 2220L), c(0.6, 0.55, 0.4, 0.4, 0.45,
0.45, 0.4, 0.45, 0.6, 0.4), c(2220L, 2220L, 3490L, 3490L,
1766L, 2220L, 8070L, 8070L, 3490L, 2220L), c(0.3, 0.55,
0.55, 0.4, 0.45, 0.4, 0.45, 0.3, 0.55, 0.5), c(13L, 17L,
17L, 15L, 13L, 14L, 19L, 19L, 18L, 15L), c(15L, 16L,
15L, 15L, 13L, 14L, 19L, 19L, 15L, 15L), c(625000000,
450000000, 760000000, 630000000, 530000000, 671500000,
240000000, 100000000, 375000000, 1043700000), c(0.5,
0.02, 0.02, 0.3, 0.65, 0.3, 0.5, 0.65, 0.02, 0.6), c(275L,
750L, 650L, 300L, 225L, 300L, 700L, 925L, 825L, 400L),
c(0, 1, 1, 1.25, 0, 1, 1, 1.25, 1.25, 1), c(0.03027,
0.0751, 0.0651, 0.030125, 0.02527, 0.0301, 0.0701, 0.092625,
0.082625, 0.0401), c(0.031286195, 0.154827358, 0.080695261,
0.041683558, 0.028669191, 0.044131997, 0.084009559, 0.108958135,
0.090916682, 0.051331755), c(263.290277, 1448.101305,
704.3633733, 368.0708419, 194.2034583, 356.3784942, 746.772345,
1036.334285, 875.917553, 436.2991366), c(0.030274693,
0.097321394, 0.065317835, 0.030137658, 0.025317343, 0.030236973,
0.070611937, 0.093560606, 0.083144654, 0.040049938),
c(0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L), structure(c(1L,
1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L), .Label = "NO", class = "factor"),
structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L), .Label = "CS", class = "factor"),
c(0.0136351351351351, 0.0338288288288288, 0.0186532951289398,
0.00863180515759312, 0.0143091732729332, 0.0135585585585586,
0.00868649318463445, 0.0114776951672862, 0.0236747851002865,
0.0180630630630631), c(0.009081, 0.041305, 0.035805,
0.01205, 0.0113715, 0.01204, 0.031545, 0.0277875, 0.04544375,
0.02005), c(0.015135, 0.001502, 0.001302, 0.0090375,
0.0164255, 0.00903, 0.03505, 0.06020625, 0.0016525, 0.02406
))), .Names = c("V1", "V2", "V3"), row.names = c(NA,
-48L), class = c("data.table", "data.frame"))
> Subject: Re: [R] binding two lists of lists of dataframes together
> From: dwinsemius at comcast.net
> Date: Tue, 12 May 2015 11:36:50 -0700
> CC: r-help at r-project.org
> To: newrnewbie at hotmail.com
>
>
> On May 12, 2015, at 9:24 AM, Vin Cheng wrote:
>
> > list1<-list(structure(list(id = c(493L, 564L, 147L, 83L, 33L, 276L, 402L, 285L, 30L, 555L),
> > WgtBand = c(1, 1, 2, 3, 4, 5, 6, 7, 8, 9),
> > Wgt = c(NaN, NaN, NA, NA, NA, NA, NA, NA, NA, NA)),
> > .Names = c("id", "WgtBand", "Wgt")),
> > structure(list(id = c(76L, 330L, 574L, 47L, 131L, 581L, 133L, 69L, 35L, 487L),
> > WgtBand = c(1, 1, 2, 3, 4,5, 6, 7, 8, 9),
> > Wgt = c(NaN, NaN, NA, NA, NA, NA, NA, NA, NA, NA)),
> > .Names = c("id", "WgtBand", "Wgt")),
> > structure(list(id = c(376L, 130L, 574L, 47L, 131L, 581L, 133L, 69L, 35L, 487L),
> > WgtBand = c(1, 1, 2, 3, 4,5, 6, 7, 8, 9),
> > Wgt = c(NaN, NaN, NA, NA, NA, NA, NA, NA, NA, NA)),
> > .Names = c("id", "WgtBand", "Wgt")))
> >
> >
> > list2<-list(structure(list(id = c(493L, 564L, 147L),
> > WgtBand = c(1, 2, 3),
> > Wgt = c(NaN, NaN, NA)),
> > .Names = c("id", "WgtBand", "Wgt")),
> > structure(list(id = c(276L, 411L, 574L,111L),
> > WgtBand = c(1, 2, 3,4),
> > Wgt = c(NaN, NaN, NA,NA)),
> > .Names = c("id", "WgtBand", "Wgt")),
> > structure(list(id = c(76L, 330L),
> > WgtBand = c(1, 1),
> > Wgt = c(NaN, NaN)),
> > .Names = c("id", "WgtBand", "Wgt")))
> >
> > list3<-list(structure(list(id = c(493L, 564L, 147L, 83L, 33L, 276L, 402L, 285L, 30L, 555L,493L, 564L, 147L),
> > WgtBand = c(1, 1, 2, 3, 4, 5, 6, 7, 8, 9,1, 2, 3),
> > Wgt = c(NaN, NaN, NA, NA, NA, NA, NA, NA, NA, NA,NaN, NaN, NA)),
> > .Names = c("id", "WgtBand", "Wgt")),
> > structure(list(id = c(376L, 130L, 574L, 47L, 131L, 581L, 133L, 69L, 35L, 487L,276L, 411L, 574L,111L),
> > WgtBand = c(1, 1, 2, 3, 4,5, 6, 7, 8, 9, 1, 2, 3,4),
> > Wgt = c(NaN, NaN, NA, NA, NA, NA, NA, NA, NA, NA,NaN, NaN, NA,NA)),
> > .Names = c("id", "WgtBand", "Wgt")),
> > structure(list(id = c(76L, 330L, 574L, 47L, 131L, 581L, 133L, 69L, 35L, 487L,76L, 330L),
> > WgtBand = c(1, 1, 2, 3, 4,5, 6, 7, 8, 9, 1, 1),
> > Wgt = c(NaN, NaN, NA, NA, NA, NA, NA, NA, NA, NA,NaN, NaN)),
> > .Names = c("id", "WgtBand", "Wgt")))
>
> I get something like the desired structure with:
>
> mapply(function(x,y) mapply(c, x,y), list1,list2)
>
> I can make it closer with:
>
> lapply( mapply(function(x,y) mapply(c, x,y), list1,list2) , function(x) unclass( as.data.frame(x) ) )
>
>
> Or even closer with:
>
> lapply( mapply(function(x,y) mapply(c, x,y), list1,list2) , function(x) as.list( as.data.frame(x) ) )
>
> `identical` does not return TRUE but I cannot see where the difference lies.
>
> --
>
> David Winsemius
> Alameda, CA, USA
>
[[alternative HTML version deleted]]
More information about the R-help
mailing list