奇怪的R随机成分

Question

我对R比较陌生，所以也许我错过了一些东西，但我自己却想不出来。

我有这样的数据集：DOWNLOAD .TXT，其中包含按周汇总的销售数据（两年51周，导致102个条目）。

这是我用来转换 timeserie 中的数据，绘图然后在主要组件中分解的代码

# creating a timeseries element, frequency sets the intervals of data collection, starts sets the data collection date
timeseries = ts(data, frequency = 51, start = c(2011))
plot.ts(timeseries, type = "o")

#TimeSeries decomposition in trend, seasonal and random-walk
plot(decompose(timeseries))

结果是一个非常奇怪的分解图，特别是随机部分。

这些是我的问题：

1. 为什么图表从2011.5开始，数据何时开始2011.1？
2. 为什么随机组件如此奇怪？

我缺少什么？