绘制时间序列

Question

我在三年的时间里研究了16个世界指数，并且我想从这16个指数中绘制一个图。

all<-read.table("C.../16indices.txt") 
dimnames(all)[[2]]<-c("Date","BEL 20","CAC 40","AEX","DAX","FTSE 100","IBEXx 35","ATX","SMI","FTSE MIB","RTX","HSI","NIKKEI 225","S&P 500","NASDAQ","Dow Jones","BOVESPA") 
attach(all) 

问题

1. 我的日期都写在表格 “2009-01-05”。我只想要“2009”出现，否则我会跳得很多。
2. 例如，BOVESPA的价格从40.000,15上涨到60.000,137。我如何获得好的y标签？例如40.000,45.000，...，60.000。
3. 我如何得到这些情节中的16个在一个漂亮的数字/情节？

我不习惯与R.我想是这样的，但没有工作，工作...

plot(all[1,],all[,2]) 

Answer 1

最大的问题是没有样本数据>这里是基于猜测的意见：

I tried something like this but that didn't work... plot(all[1,],all[,2]) 

您需要格式化你的日期值为R Date类。如果他们在YYYY-MM-DD格式，这将是简单：

all$Date <- as.Date(all.Date) 

为了您的具体问题：

1) My dates are written in the form "2009-01-05". I want only "2009" to appear otherwise i would have to many jumps. 

您需要抑制轴中的情节通话绘图，然后需要添加一个axis（）调用。

2) For example the prices from the BOVESPA go from 40.000,15 to 60.000,137. How do I get nice y-labels? For instance 40.000, 45.000,...,60.000. 

你似乎是在欧洲区域和意味着您最初的电话函数read.table可能错位数据输入，你需要阅读read.csv2，将妥善处理小数点和逗号逆转的文档数字数据的含义。你也应该使用colClasses。

3) How do i get 16 of these plots in one nice figure/plot? 

你或许应该从初始起点为每个系列计算比率，因此可以是用于显示器的公共比例。