提取时间序列中的数据

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

如题，请问怎么从时间序列中提取出同年不同月的数据啊？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：时间序列

问错了，是同月不同年的！

1. as.numeric(tsales[,1])
   
2. as.numeric(tsales[,2])

复制代码

不清楚具体要弄成什么形式

fdsasdfddsa 发表于 2018-9-17 17:42
不清楚具体要弄成什么形式

1. sales <- c(18, 33, 41, 7, 34, 35, 24, 25, 24, 21, 25, 20,
   
2.            22, 31, 40, 29, 25, 21, 22, 54, 31, 25, 26, 35)
   
3. tsales <- ts(sales, start=c(2003, 1), frequency=12)

复制代码

这是原数据，class是ts，你这个方法行不通，我想的是能不能按月份提取每年在同月的数据，以一个numeric向量的形式

Hoas 发表于 2018-9-17 17:51
这是原数据，class是ts，你这个方法行不通，我想的是能不能按月份提取每年在同月的数据，以一个numeric向 ...

1. tsales[cycle(tsales)==1]
   
2. tsales[cycle(tsales)==2]

复制代码

这样呢

fdsasdfddsa 发表于 2018-9-17 18:12
这样呢

啊啊啊成功了！我找了好久没找到，谢谢你！
可以加一下你的qq吗？我是新手好多不会...

fdsasdfddsa 发表于 2018-9-17 18:12
这样呢

行得通，谢啦！！！

fdsasdfddsa 发表于 2018-9-17 18:12
这样呢

嗯...再问下如果想吧这些月的信息全部整合到一起有什么简便的方法吗？

Hoas 发表于 2018-9-17 18:31
嗯...再问下如果想吧这些月的信息全部整合到一起有什么简便的方法吗？

要是想合并的话不如一开始就用matrix

1. sales <- c(18, 33, 41, 7, 34, 35, 24, 25, 24, 21, 25, 20,
   
2.            22, 31, 40, 29, 25, 21, 22, 54, 31, 25, 26, 35)
   
3. data=matrix(sales,nrow=12)
   
4. dimnames(data) = list(c("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec"),c(2003,2004))
   
5. data

复制代码

如果一定要先ts的话：

1. data=tsales[cycle(tsales)==1]
   
2. for(i in 2:12){
   
3.   data=rbind(data,tsales[cycle(tsales)==i])
   
4. }
   
5. dimnames(data) = list(c("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec"),c(2003,2004))
   
6. data

复制代码

fdsasdfddsa 发表于 2018-9-17 20:02
要是想合并的话不如一开始就用matrix如果一定要先ts的话：

谢谢！不过你有一个小错误哦，
dimnames()=list(c(),c())
你弄反啦，前面应该是行名，后面是列名