楼主: duanwuhuan
5231 17

[问答] R软件中的数据分析问题 [推广有奖]

11
duanwuhuan 发表于 2011-12-30 13:06:24
大公子 发表于 2011-12-30 09:40
我这儿是行的。错误信息贴出来。
[[710]]
         V1         V2   V3
710  600000 2011-12-22 8.53
1704 600004 2011-12-22 6.22

[[711]]
         V1         V2   V3
711  600000 2011-12-23 8.54
1705 600004 2011-12-23 6.21

[[712]]
         V1         V2   V3
1063 600004 2009-05-05 9.08

[[713]]
         V1         V2    V3
1261 600004 2010-02-26 11.78
这是两支股票一部分数据,我现在只想要有共同时间的那些数据,即【712】和【713】不要,因为只有600004有数据。另外怎么把这些合并成一个表?
              V1         V2   V3
710  600000 2011-12-22 8.53
1704 600004 2011-12-22 6.22
711  600000 2011-12-23 8.54
1705 600004 2011-12-23 6.21
1063 600004 2009-05-05 9.08

12
xiaobing212 发表于 2011-12-30 14:48:34
duanwuhuan 发表于 2011-12-30 12:54
不是,运行结果不对啊。我是求各支股票都有交易的那些时间的对应数据。也就是:如果股票1,从1月1日到1月 ...
  1. z[which(table(z[,2])==max(table(z[,2]))),2]->tt

  2. z[which(z[,2] %in% tt),]
复制代码
我再试试看

13
duanwuhuan 发表于 2011-12-30 15:56:09
xiaobing212 发表于 2011-12-30 14:48
我再试试看
谢谢您的热情帮助,感激不尽啊。

14
大公子 发表于 2011-12-30 16:06:02
t <- unlist(lapply(b,nrow))
fin1 <- b[t>1]#t>1?
fin2 <- do.call(rbind,fin1)
加了三句,不过还是没明白你的意思,t>1还是t>30还是怎样,这个参数你自己改改。
另外这种事在excel中也简单,干嘛非用R。

15
xiaobing212 发表于 2011-12-30 16:16:21
duanwuhuan 发表于 2011-12-30 15:56
谢谢您的热情帮助,感激不尽啊。
这条程序还不行啊

16
xiaobing212 发表于 2011-12-30 16:24:01
大公子 发表于 2011-12-30 16:06
t 1?
fin2 1还是t>30还是怎样,这个参数你自己改改。
另外这种事在excel中也简单,干嘛非用R。
这里的意思,t应该取最大值吧?

17
大公子 发表于 2011-12-30 16:26:02
xiaobing212 发表于 2011-12-30 16:24
这里的意思,t应该取最大值吧?
t <- unlist(lapply(b,nrow))
fin1 <- b[which(t==max(t))]
fin2 <- do.call(rbind,fin1)

18
xiaobing212 发表于 2011-12-30 16:34:13
大公子 发表于 2011-12-30 16:26
t
apply系列函数很好用啊,我R写的有点业余

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2025-12-30 09:16