在GGplot2中创建日期为X轴的折线图

Question

我有一个包含三个变量，日期和数字格式的数据框。

我正在尝试绘制一个折线图，其中Xaxis为日期，Y轴为变量2。

我尝试了以下代码，但在X轴上我可以看到整数而不是日期。

dataframe <- data.frame(Var1, var2, var3)
var1 <- c("22.01.2018" , "10.01.2018", "2.02.2018", "01.03.2018")
var2 <- c("0.98", "0.05", "0.98", "0.51")
dataframe$var1 <- as.Date(dataframe$var1 , format = "%dd/%mm/%yyyy" )

# plotting the graph
ggplot(data=dataframe, aes(x=dataframe$var1, y=dataframe$var3, group=1)) +
  geom_line() +
  geom_point()

ggplot(data=dataframe, aes(x=dataframe$dat1, y=dataframe$var3, group=1)) +
  geom_line(linetype="dashed") +
  geom_point()

ggplot(data=dataframe, aes(x=dataframe$dat1, y=dataframe$var3, group=1)) +
  geom_line(color="red") +
  geom_point()

当我检查我的var1时，转换为日期格式后，我可以看到＆＃34; 22/01/20＆＃34;。

任何人都可以帮助我如何使用日期格式的x轴和带有var3的y轴进行绘图？