如何在R中组合两个动物园对象

Question

我有2个相同长度的动物园对象，其中一个有日期。

> a
           Number
2007-01-01      5
...

> b
1 10
...

如何将b添加为？

中的列

            Number   b
2007-01-01       5  10

或者如上所述创建组合对象？

Answer 1

将来请以可复制的形式提供您的数据。我们假设数据.controller($scope, function($scope) { $scope.myMessage; var myInt = setInterval(function() { if (document.getElementById('myMessage').value !== '') { $scope.myMessage = document.getElementById('myMessage').value; $scope.$apply(); clearInterval(myInt); } }, 150); }); 和a如下所示。

b

，并提供：

library(zoo)

# inputs
a <- zoo(cbind(Number = 5), as.Date("2007-01-01"))
b <- zoo(cbind(10))

ab <- cbind(a, coredata(b))
names(ab) <- c(names(a), "b")