这是我的数据集的片段:
Date Open Max Min Close Volumen
1 AGORA 19990420 49.9 49.9 46.1 47.1 214339
2 AGORA 19990421 47.0 47.2 46.5 46.7 160604
3 AGORA 19990422 47.0 49.9 47.0 49.1 155640
4 AGORA 19990423 49.4 51.0 49.1 49.7 164435
5 AGORA 19990426 49.5 49.8 49.0 49.0 90323
我想用 Close(y 轴)和 Date(x 轴)制作图。这是我的代码:
datawykres=strptime(Data, format="%Y%m%d")[3450:3569]
plot(y=dane,x=datawykres,type="l",main="Wykres indeksu AGORA",ylab="Wartość AGORA",xlab="Data")
axis(1, Data[c(T,rep(F,20))], F) # interwał dat do ustalenia (teraz: co 20.)
text(x=datawykres[c(T,rep(F,20))], y=par("usr")[3]*.98, labels=datawykres[c(T,rep(F,20))],
xpd=T, srt=45, adj=c(1,0.5))
我想从波兰月的 x 轴名称中删除(lut,mar)和离开日期,如 2013-01-18。我没有任何想法,我该怎么做。任何人都可以帮助我吗?
非常感谢你 :)