2015-02-23 70 views
-2

我是R的新手。我有關於sap flux的每日時間序列數據,並且想要在R中繪製線圖並且想要爲日期格式化x軸.my數據文件就是這樣的;在R中繪製每日時間序列

Date G1T0 G1T1 G1T2 G1T3 
19-Jul-14 0.271081377 0.342416929 0.216215197 0.414495265 
20-Jul-14 0.849117059 0.778333568 0.555856888 0.375737302 
21-Jul-14 0.742855108 0.756373483 0.536025029 0.255169809 
22-Jul-14 0.728504928 0.627172734 0.506561041 0.244863511 
23-Jul-14 0.730702865 0.558290192 0.452253842 0.223213402 
24-Jul-14 0.62732916 0.461480279 0.377567279 0.180328992 
25-Jul-14 0.751401513 0.5404663 0.517567416 0.204342317 

請幫助我通過示例R腳本。

+0

這個問題制定得不好。請閱讀發佈指南以及如何製作一個好的[可重現的示例](http://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example)。 – 2015-02-23 08:45:05

回答

0

你可以試試這個:

# install.packages("ggplot2") 
# install.packages("scales") 
library(ggplot2) 
library(scales) 
data$Date <- as.Date(data$Date, format = "%d-%b-%y") 
ggplot(data = data, x = Date) + 
    geom_line(aes(x = Date, y = G1T0, col = "G1T0")) + 
    geom_line(aes(x = Date, y = G1T1, col = "G1T1")) + 
    geom_line(aes(x = Date, y = G1T2, col = "G1T2")) + 
    geom_line(aes(x = Date, y = G1T3, col = "G1T3")) + 
    scale_colour_discrete(name = "Group") + 
    labs(y = "Measurement", x = "Date") 

這樣做是加載了幾個包做的情節(當然,如果你沒有這些軟件包,安裝它們),那麼它格式化你的約會所以R知道它們是日期(我使用的格式參數與特定的字符串模式匹配),然後它調用ggplot函數來映射數據。

這是否適合您?

+0

非常感謝,其實我是通過這段代碼完成的;庫(動物園) g1 <-read.table(「group1-goto.csv」,header = T,sep =「,」) head(g1) summary (g1) g1 $ Date < - as.Date(g1 $ Date,'%m /%d /%Y') require(ggplot2) ggplot(data = g1,aes(Date))+ geom_line (y = G1T0,color =「black」,linetype =「dotte」,size =「5」))+ geom_line(aes(y = G1T1,color =「blue」))+ geom_line (「日期」)+ ylab(「Sap Flux」)+ ggtitle(「Group-1_Daily,color =」red「))+ geom_line(aes(y = G1T3,color =」green「))+ xlab Normalized Sap Flux「)+ theme(plot.title = element_text(size = 20,color =」blue「))現在我想要格式化圖表Tnx。 – Thilak 2015-02-23 09:28:14