在R中使用ts()函数
我开始研究我的时间序列数据分析，我被告知在R中使用ts()数据函数，然而，我的时间序列数据并没有遵循一个直接的趋势。
例如，在线教程解释了如果您有月度、季度或年度趋势，如何创建时间序列。但是，我的记录时间是0、5、11、15、20、30和50。
我想知道是否有人会对如何解决这个问题有任何建议？非常感谢:)
回答 2
Stack Overflow用户
发布于 2020-06-09 17:51:22
关键问题是，ts系列有规则的间隔，而您的系列没有，但是有许多方法可以获得一个有规则间隔的ts类系列：
- 使用动物园包(可以直接表示这种序列)或在转换到动物园后使用
as.ts将原始表示形式保持为不规则间隔的时间序列。 - 忽略时间，只使用1、2、3的时间。而不是。在这种情况下，序列是有规律的间隔，所以我们可以使用ts。
，
- 将数据离散为有规律的间隔，使用区间中的最后一个值或平均值。在这种情况下，序列是有规律的间隔，所以我们可以使用ts。
- 在数据上拟合一个样条，并从数据中取出有规律的间隔点，给出一个有规则间隔的序列，可以用ts.
表示。
如果序列有一个自然的周期性，那么您可能需要修改这个序列是如何表示为ts的，以反映它的频率，但是由于这个问题没有给出任何有关这方面的信息，我们将在这里忽略它。
另外，根据确切的应用程序，可能有一些包具有特定于应用程序的方法，可以使用这些方法。请参阅https://cran.r-project.org/web/views/
例如,
# create some test data
set.seed(123)
m <- matrix(rnorm(35), 7)
tt <- c(0, 5, 11, 15, 20, 30, 50)
# 1. zoo series
library(zoo)
z <- zoo(m, tt)
ts1 <- as.ts(z) # make regularly spaced ts series but with many NAs
# 2. ignore times
ts2 <- ts(m)
# 3. discretize to regularly spaced grid - z is from #1
zd <- aggregate(z, 20 * ceiling(tt/20), tail, 1)
ts3 <- as.ts(zd)
# 4. spline
Ls <- apply(m, 2, spline, x = tt) # list of splines, one per column
zs <- zoo(sapply(Ls, "[[", "y"), Ls[[1]]$x) # as single zoo object
ts4 <- unname(as.ts(zs))Stack Overflow用户
发布于 2020-06-09 10:56:24
下面的代码使用一个内置在R中的名为AirPassengers的数据文件，而它是一个ts()，当对它进行变异以使其与GGPlot2很好地绘制时。我相信这个数据集是每月12年(144行)，但我们得到的是一个时间序列。
library(ggplot2)
library(reshape2)
dff <- melt(AirPassengers)
ggplot(data = dff, aes(x = 1:length(dff[[1]]), y = dff$value)) + geom_line() + labs(x = "Time", y = "Value")请注意
class(AirPassengers)
dff <- melt(AirPassengers)
class(dff)其中ts()变成一个data.frame。
https://stackoverflow.com/questions/62280645
复制相似问题
腾讯云开发者
Copyright © 2013 - 2026 Tencent Cloud. All Rights Reserved. 腾讯云 版权所有
深圳市腾讯计算机系统有限公司 ICP备案/许可证号：粤B2-20090059 
粤公网安备44030502008569号
腾讯云计算（北京）有限责任公司 京ICP证150476号 | 京ICP备11018762号