Точки графика только для каждого дня, такие как планки погрешностей

У меня есть данные, которые выглядят примерно так, как показано ниже. Я хочу создать временной ряд для каждой переменной A, B и C с датой по оси x и min_val , max_val и Mean_val по оси y.

mydata <- data.frame(date=c(as.Date("2015-01-07"),
                            as.Date("2015-01-07"),
                            as.Date("2015-01-07"),
                            as.Date("2015-01-08"),
                            as.Date("2015-01-08"),
                            as.Date("2015-01-08"),
                            as.Date("2015-01-07"),
                            as.Date("2015-01-07"),
                            as.Date("2015-01-07"),
                            as.Date("2015-01-08"),
                            as.Date("2015-01-08"),
                            as.Date("2015-01-08"),
                            as.Date("2015-01-07"),
                            as.Date("2015-01-07"),
                            as.Date("2015-01-07"),
                            as.Date("2015-01-08"),
                            as.Date("2015-01-08"),
                            as.Date("2015-01-08")),
                     var = c("Min_val_a","Max_val_a","Mean_val_a","Min_val_a",
                             "Max_val_a","Mean_val_a","Min_val_b","Max_val_b",
                             "Mean_val_b","Min_val_b","Max_val_b","Mean_val_b",
                             "Min_val_c","Max_val_c","Mean_val_c","Min_val_c",
                             "Max_val_c","Mean_val_c"),
                     val =c(0.01,0.05,0.03,0.04,0.08,0.06,0.06,0.08,0.07,0.06,0.10,0.08,
                            0.07,0.09,0.08,0.08,0.10,0.09),
                     fvar =c("A","A","A","A","A","A","B","B","B","B","B","B","C","C","C","C","C","C"))

Я хочу построить что-то вроде графика линии ошибки с кодом ниже

ggplot(mydata,aes(x=date,y=val))+
  geom_point()+
  #geom_line()+
  facet_wrap(~fvar)

Если добавить geom_line, то будет очень неряшливо. Есть ли способ соединить точки только для каждого дня?