0

这是一个可以正常工作的简单示例：

a = 1; b = 2; c = 3
d = 65; e = 66; f = 77
m1 = cbind(a, b, c); m2 = cbind(d, e, f); M = cbind(m1, m2)
colnames(M)
#   [1] "a" "b" "c" "d" "e" "f"

但是，现在对时间序列数据尝试完全相同的事情：

a = 1; b = 2; c = 3
d = 65; e = 66; f = 77
m1 = as.ts(cbind(a, b, c)); m2 = as.ts(cbind(d, e, f)); M = cbind(m1, m2)
colnames(M)
#   [1] "m1.a" "m1.b" "m1.c" "m2.d" "m2.e" "m2.f"'

如何避免时间序列数据的这些前缀？
（即：前缀m1.和m2.）

PS：显然我知道我们可以直接执行“cbind”命令a, b, c, d, e, f绕过m1and m2，但我需要循环中的这些中间阶段矩阵。

4

2 回答 2

0

没有办法阻止cbind.ts这样做。防止它的通常方法是设置deparse.level=0，但cbind.ts忽略它。

R> stats:::cbind.ts
function (..., deparse.level = 1) 
{
    if (deparse.level != 1) 
        .NotYetUsed("deparse.level != 1")
    .cbind.ts(list(...), .makeNamesTs(...), dframe = FALSE, union = TRUE)
}
<bytecode: 0x35531f8>
<environment: namespace:stats>

您可以随时设置colnames自己，只是要小心它们是“有效的”（例如 via make.names）并且没有重复，否则您可能会在稍后的分析中遇到问题。

colnames(M) <- make.names(c(colnames(m1), colnames(m2)))
于 2015-03-27T10:24:54.920 回答
0

无法解释原因，但cbind.data.frame两者都一样：

a = 1; b = 2; c = 3
d = 65; e = 66; f = 77
m1 = cbind(a, b, c)
m2 = cbind(d, e, f)
M = cbind.data.frame(m1, m2)
colnames(M)
#[1] "a" "b" "c" "d" "e" "f"

m1 = as.ts(cbind(a, b, c))
m2 = as.ts(cbind(d, e, f))
M = cbind.data.frame(m1, m2)
colnames(M)
#[1] "a" "b" "c" "d" "e" "f"
于 2015-03-27T10:16:49.713 回答