作者developme223 (allen)
看板R_Language
标题[问题]时间序列资料 求中位数与标准差
时间Tue Nov 17 15:36:18 2015
文章分类提示:
- 问题: 当你想要问问题时，请使用这个类别
[问题类型]:
程式谘询(我想用R 做某件事情，但是我不知道要怎麽用R 写出来)
[软体熟悉度]:
请把以下不需要的部份删除
入门(写过其他程式，只是对语法不熟悉)
[问题叙述]:
请简略描述你所要做的事情，或是这个程式的目的
Code date close_price
3052 2012/5/21 50
3052 2012/5/22 43
3052 2012/5/23 44
3052 2012/5/24 51
3041 2012/8/21 17
3041 2012/8/22 16
3041 2012/8/23 21
.
.
.
5521 2014/5/22 22
5521 2014/5/23 21
5521 2014/5/24 20
8011 2015/5/01 102
8011 2015/5/02 103
我的资料大概长成上面的型态，Code为公司代码(每间公司资料长短皆不同)
想请问各位如果要算每个Code的Close_price之中位数及标准差，要怎麽做呢?
[程式范例]:
[环境叙述]:
版本：R i386 3.2.2
[关键字]:
median、tapply
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 120.126.58.61
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1447745780.A.67E.html
1F：→ celestialgod: 关键字tapply, median 11/17 15:46
2F：推 Edster: aggregate(as.matrix(X[,3]),by=list(X[,1]), quantile, 11/17 15:46
3F：→ Edster: probs = 0.5) 11/17 15:47
4F：→ Edster: 标准差的结构同上, quantile 换成 sd) 11/17 15:48
※ 编辑: developme223 (120.126.58.61), 11/17/2015 15:52:59
5F：→ celestialgod: dat %>% group_by(me=median(close_price), 11/17 15:53
6F：→ celestialgod: sd = sd(close_price)) 11/17 15:53
7F：→ celestialgod: 先library(dplyr)，以及dat是你的资要 11/17 15:53
8F：→ celestialgod: 我推关键字是指你可以透过那两个函数处理XD 11/17 15:54
9F：→ developme223: 谢谢两位高手解答。 11/17 16:44