雖然原PO已經爬文解決問題了,
但是因為原PO的x-座標表示法長度比較長,
這邊還是提供一點小建議,
可以用 asp 參數來改座標的表示方向(才不會重疊),
並且可以用 mai 參數來調整圖跟邊界的距離!
以下為參考的範例程式碼:
df <- list()
df$x <- rnorm(1000)
my.at <- c(0:4*200+1) # location(index) where you draw x-label,
# must have same length as date.
date <- c("2012-10-02 19:39:42 CST", "2012-10-02 22:26:22 CST",
"2012-10-03 18:51:35 CST", "2012-10-03 21:38:15 CST",
"2012-10-04 14:15:35 CST" )
op <- par(mfrow=c(1,1), mai = par("mai")+c(1.5,0,0,0))
plot(df$x,col="olivedrab",type='l',lty=1,xaxt="n", xlab="", ylab="" )
axis(1, at=my.at, labels=date, las=2, asp=2 )
par(op)
?plot.default
?par
※ 引述《peiwinds (Macchiato Caramel)》之銘言：
: [問題類型]:
: 程式諮詢(我想用R 做某件事情，但是我不知道要怎麼用R 寫出來)
:
: [軟體熟悉度]:
: 入門(寫過其他程式，只是對語法不熟悉)
: [問題敘述]:
: http://ppt.cc/bWoC
: 如圖，我想將X軸的 0e+00這些紅色圈起來的數字
: 置換成我想要的日期
: 我現在已經創造的一個list date裡面放了這些日期
: date
: [1] "2012-10-02 19:39:42 CST" "2012-10-02 22:26:22 CST" "2012-10-03 18:51:35
: CST"
: [4] "2012-10-03 21:38:15 CST" "2012-10-04 14:15:35 CST"
: [程式範例]:
: plot(df$x ,col="olivedrab",type="l",lwd=1)
: 之後我開始使用 axis的功能可是一直失敗 Orz
: 請幫幫我吧 T_T
: 謝謝