if(require(beadarrayExampleData)){
data(exampleBLData)
sectionNames(exampleBLData)
data2 <- combine(exampleBLData, exampleBLData)
sectionNames(data2)
data(exampleSummaryData)
d1 <- exampleSummaryData[,c(1:4)]
d2 <- exampleSummaryData[,c(5:8)]
d3 <- combine(d1, d2)
d3
}
Run the code above in your browser using DataLab