x=read.table("F:/R/3.txt",header=FALSE,na.strings=".")
y=ts(x,start=c(2010),end=c(2015,14),frequency=52)
数据是周数据 不知道这样写对不对
生成的y和x的差别很大
原数据
       V1
1   1,214
2   1,082
3   1,045
4     976
5     914
6     963
7     927
8     948
9     940
10    912
11    922
12    923
13    749
14    949
15    968
16    898
17    912
18    818
19    910
20    888

y
V1
  [1,]  30
  [2,]  21
  [3,]  14
  [4,] 166
  [5,] 126
  [6,] 160
  [7,] 136
  [8,] 149
  [9,] 146
[10,] 125
[11,] 131
[12,] 132
[13,]  38
[14,] 150
[15,] 163
[16,] 114
[17,] 125
[18,]  56
[19,] 123
[20,] 106

因为论文要用 临时学的R语言 没什么基础 求大神指点改进方法