怎样生成这样的时间序列图？

data=read.csv('C:\\Users\\acer\\Desktop\\x1.csv',head=T)
par(mfrow=c(3,2),mar=c(0,8,0,2), oma = c(3, 0, 3, 0),cex.axis=1,cex.lab=2,mex=0.5)
attach(data)
plot(y1,xaxt="n", xlab = "", type = "l")
plot(y2,xaxt="n", xlab = "", type = "l")
plot(y3,xaxt="n", xlab = "", type = "l")
plot(y4,xaxt="n", xlab = "", type = "l")
plot(y5, axes=F,type='l',xlab='year')
axis(1, 1:12, year-2000)
axis(2)
box()
plot(y7, axes = F, type = "l",xlab='year')
axis(1, 1:12, year-2000)
axis(2)
box()
text(-1,-1,'year')
mtext("Big Title", outer = TRUE, cex = 1)

调节mar和mex即可，但是具体调多少，还是你自己尝试

kk22boy 发表于 2012-3-14 22:08
怎样才能让y轴标题离y轴近一点呢
另外，小王子你发现没有x轴刻度10没有哦我运行了你的代码也没出现10，这 ...

调节mar和mex即可，但是具体调多少，还是你自己尝试
data=read.csv('C:\\Users\\acer\\Desktop\\x1.csv',head=T)
par(mfrow=c(3,2),mar=c(0,8,0,2), oma = c(3, 0, 3, 0),cex.axis=1,cex.lab=2,mex=0.5)
attach(data)
plot(y1,xaxt="n", xlab = "", type = "l")
plot(y2,xaxt="n", xlab = "", type = "l")
plot(y3,xaxt="n", xlab = "", type = "l")
plot(y4,xaxt="n", xlab = "", type = "l")
plot(y5, axes=F,type='l',xlab='year')
axis(1, 1:12, year-2000)
axis(2)
box()
plot(y7, axes = F, type = "l",xlab='year')
axis(1, 1:12, year-2000)
axis(2)
box()
text(-1,-1,'year')
mtext("Big Title", outer = TRUE, cex = 1)

firelife 发表于 2012-3-14 20:50
#读入数据
ds

> my.melt <- melt(ds,id="year",measure=c("y1","y2","y3","y4","y5","y7"))
错误: 没有"melt"这个函数

这是为什么？

耕耘使者 发表于 2012-3-14 23:26
> my.melt

melt是ggplot2里面的函数。

reshape包里面也有melt函数
a <- array(1:24, c(2,3,4))
melt(a)

学习了

qoiqpwqr 发表于 2012-3-14 23:56
melt是ggplot2里面的函数。

我又重新安装的ggplot2,仍然和上次一样，提示找不到my.melt。
我怀疑是出在了参数：id="year"上。因为这是一个时间序列，应该用ts()生成，但我却没有用，不会用，只是用excel硬生生地输入了year。
版主，是否是这个问题呢？

耕耘使者 发表于 2012-3-16 09:55
我又重新安装的ggplot2,仍然和上次一样，提示找不到my.melt。
我怀疑是出在了参数：id="year"上。因为这 ...

可以啊，不知道你的是怎么回事
library(ggplot2)
data=read.csv('C:\\Users\\acer\\Desktop\\x1.csv',head=T)
my.melt <- melt(data,id="year")

吉林小王子 发表于 2012-3-16 10:25
可以啊，不知道你的是怎么回事
library(ggplot2)
data=read.csv('C:\\Users\\acer\\Desktop\\x1.csv' ...

找到原因了：我用最新的R.2.14.2做，才出了问题。
刚才用2.14做，就没有问题了。
不过更不解了，最新的R2.14.2有毛病？？
多谢版主和各位朋友热情相助！

请问在R中如何改变线条的颜色。谢谢！