Dear R People:
Just in case anyone is interested, here is a particular solution to the
months on the horizontal axis question:
>mon1
[1] "J" "F" "M" "A" "M"
"J" "J" "A" "S" "O"
"N" "D">mon2 <- rep(mon1,2)
>mon2
[1] "J" "F" "M" "A" "M"
"J" "J" "A" "S" "O"
"N" "D" "J" "F" "M"
"A" "M" "J"
"J"
[20] "A" "S" "O" "N"
"D">ya.ts
Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec
2001 3.7 -0.8 0.3 -1.5 -0.2 -0.4 2.5 -1.0 -1.2 -1.2 0.4 -0.5
2002 0.5 0.0 -0.8 -1.0 0.6 0.8 -0.5 -2.4 1.3 1.4 -0.1
0.5>mon1
[1] "J" "F" "M" "A" "M"
"J" "J" "A" "S" "O"
"N" "D">mon2 <- rep(mon1,2)
>mon2
[1] "J" "F" "M" "A" "M"
"J" "J" "A" "S" "O"
"N" "D" "J" "F" "M"
"A" "M" "J"
"J"
[20] "A" "S" "O" "N"
"D">#I looked at the original plot
>plot(ya.ts)
>#Now I start cleaning things up
>plot(ya.ts,axes=F,ylab=" ",xlab="2001 -
2002",ylim=c(-3,4))
md1 <- ((0:23)/12)+2001>md1
[1] 2001.000 2001.083 2001.167 2001.250 2001.333 2001.417 2001.500 2001.583
[9] 2001.667 2001.750 2001.833 2001.917 2002.000 2002.083 2002.167 2002.250
[17] 2002.333 2002.417 2002.500 2002.583 2002.667 2002.750 2002.833
2002.917>axis(1,at=md1,labels=mon2,pos=-3)
>axis(2,pos=2001)
>title("Months on the Horizontal Axis")
>
Thanks for listening and thanks for the many kind responses.
Sincerely,
Laura
mailto: lauraholt_983 at hotmail.com