> global<-read.table(file.choose(),header=T)
> global.ts<-ts(global)
> global.ts<-ts(global,st=1856,fr=12)
> global.decom<-decompose(global.ts)
> plot(global.decom)
错误于plotts(x = x, y = y, plot.type = plot.type, xy.labels = xy.labels,  :
  cannot plot more than 10 series as "multiple"
不知道为什么会有这样的错误。。。百度了也没有找到解决方法。。。求高人解答！！！
（折腾了一中午都没弄出来。。。。哭了！！！）