使用ggplot绘制折线图

Question

我有一个包含日期和值的csv文件，日期格式化为20150612。 我想绘制一个代表一段时间内变化的折线图。值应在Y轴上，日期在X上。

到目前为止我所拥有的是：

data <- read.csv("commit.csv") days <- as.Date(as.character(data$Day), "%Y%m%d") change <- (data$Commit)

正如你所看到我设法转换日期所以我现在得到2015-06-12，这允许我使用scale_x_date所以我可以将日期显示为年/月。我该怎么办呢？

数据如下所示：

20150607,4.10014657 ......等等，大约2000行。

Answer 1

这会有帮助吗？

随机示例

sDate <- as.Date("20150603", format="%Y%m%d") #Start date
intervals <- seq(sDate,by="days", length.out=30) #Create a random time series
data <- 10 + runif(30, -1,2)

timeSeries <- zoo(data.frame(data=data),intervals) #Create a zoo class timeseries

ggplot(timeSeries, aes(x=Index,y=data))+ #x axis and y axis 
  geom_line(color="red", size=2, alpha=0.2) # Control color, size of line and opacity