2012-10-27 98 views
1

我有包含时间序列这种格式的两个文件:(前股票-X)R 3与查找表

Tag, T1, T2, ... Tn 
Stock-1, 2, 3, .. 6 
Stock-2, 3, 2, .. 7 
. 
. 
Stock-m, 2, 1, .. 9 

在R,对于任何标记我想从两个文件采取相关的阵列,并计算互相关(ccf)。我该怎么做?

注意:如果它会更容易,我可以更改文件格式。

更新:

我从文件中读取到data.frames本:

file1 = read.table("file1.txt", header = TRUE, sep = ",") 

我将如何到达与标签名称的特定行,如“股票-5”?

+0

您可以简单地将两个文件读入两个不同的data.frames(使用'read.table()'或其他类型),然后在这些tw中访问正确的行o数据帧。如果你需要更多的信息,如果你能准确的告诉我们在这个过程中的哪一点你有问题,那么这将是一件好事。 –

+0

我更新了问题。 – metdos

+0

我认为这是一个很好的问题,但我认为它比StackOverflow更多地属于这里。 –

回答

0

我删除从文件的“标签”:

T1, T2, ... Tn 
Stock-1, 2, 3, .. 6 
Stock-2, 3, 2, .. 7 
. 
. 
Stock-m, 2, 1, .. 9 

然后我就能够得到与该R代码的结果:

file1 = read.table("file1.txt",head=TRUE,sep=",") 
file2 = read.table("file2.txt",head=TRUE,sep=",") 

row1 = file1["Stock-5",] 
row2 = file2["Stock-5",] 

vec1 = c(t(row1)) 
vec2 = c(t(row2)) 

ccf(vec1,vec2) 
0

看来,这个问题可能会回答:

f1stock5df <- subset(file1,Tag %in% c("stock5")) 

f2stock5df <- subset(file2,Tag %in% c("stock5")) 

bothstocks <- rbind(f1stock5df, f2stock5df) 

with(bothstocks, ccf(x,y)) 
+0

我试过了,但它没有奏效。也许我做错了什么。 – metdos

+0

它应该使用rbind - 但是在哪一步不起作用? – Donnied

+0

匹配错误(x,table,nomatch = 0L):找不到对象'Tag'。无论如何,我有办法,所以这不是问题。谢谢。 – metdos