Как мне объединить большой список xts-объектов с помощью цикла / функции в R?

У меня есть цикл, который извлекает ~ 200 отдельных таймсерий, вызывая API.

Цикл выводит таймсерии в виде объектов xts ( library (xts) ) в Глобальная среда с расширением ".oc". Итак, у меня есть 200 xts-объектов вида «ABC.oc», «ABD.oc» и т. Д. Каждый объект содержит 1000 строк данных.

Я бы хотел написать цикл (или использовать подходящую функцию) который берет все объекты "* .oc" и объединяет их по столбцам. IE закончил бы с:

Date           ABC.oc    ABD.oc -> 200 columns like this
2011-01-01      10         10
2011-01-02      20         20
2011-01-03      30         30
2011-01-04      40         40
2011-01-05      50         50

С коротким списком таймсерий, просто написал бы:

m <- merge(ABC.oc,ABD.oc,all=FALSE)

Но очевидно, что это непрактично с 200 отдельными объектами, поэтому я хотел бы написать цикл, чтобы разбить все эти объекты вместе, например "merge" делает.

Достаточно легко получить доступ к переменным для цикла через для i in length (ls (pattern = "*. oc")) {, но просто не могу понять остальную часть петля. Я пробовал cbind, но, похоже, не понял.

Любая помощь, которую очень ценю