Как я могу наложить коробчатую диаграмму на графики в r ggplot2

Question

Я хочу наложить прямоугольную диаграмму различных переменных одной и той же единицы (измеренной с каждой точкой данных) для дней 1 и 2 в моменты времени a и b (одна диаграмма коробки на подблок). Есть ли способ сделать это в ggplot2?

tdata <- import ("plant_temperature.csv")
tdata$Distance <- as.factor(tdata$Distance )

p <- ggplot(data = tdata, aes( y=Temp ,x=Distance,color=Type)) + 
  geom_point() +
  geom_boxplot( aes(y = Ambient))

p + facet_grid(cols = vars(Time),rows = vars(Day))

Примеры данных:

"Day","Time","Type","Temp","Distance","Ambient"
"1",1,"a","s",5,"1",4.4
"2",1,"a","f",3.1,"2",6.3
"3",1,"a","s",5.9,"3",3.1
"4",1,"a","f",8.4,"4",2.5
"5",1,"a","s",5.5,"1",7.7
"6",1,"b","f",9.9,"2",7.1
"7",1,"b","s",2.2,"3",2.1
"8",1,"b","f",6.9,"4",5.1
"9",1,"b","s",2.9,"1",9.4
"10",2,"b","f",8.8,"2",5.7
"11",2,"a","s",0.6,"3",6.3
"12",2,"a","f",2.2,"4",4.9
"13",2,"a","s",3.1,"1",0.8
"14",2,"a","f",1.4,"2",6.5
"15",2,"a","s",4,"3",2.1
"16",2,"b","f",8.4,"4",1.6
"17",2,"b","s",5.2,"1",4.4
"18",2,"b","f",2.2,"2",7.9
"19",2,"b","s",7.9,"3",5.3
"20",2,"b","f",2.7,"4",5.2

Температура, измеренная в дни 1 и 2 в моменты времени a и b датчиками f и s в расстояния с 1 по 4:

Температура, измеренная в дни 1 и 2 в моменты времени a и b датчиками f и s на расстояниях с 1 по 4

Если я попытаюсь добавить 1 коробчатую диаграмму на подблок, я получу 4 коробчатых диаграммы на подблок.

Answer 1

Похоже, лучше добавить коробчатую диаграмму для отдельного значения x:

Коробчатая диаграмма нескольких групп переменных

tdata$Distance <- as.factor(tdata$Distance )
p<-ggplot(data = tdata, aes( y=Temp ,x=Distance,color=Type))+geom_point() +geom_boxplot( aes(y = Ambient,x=5,color="Ambient"))
p+facet_grid(cols = vars(Time),rows = vars(Day))

Кто-нибудь знает, как я могу изменить символы легенды? Пожалуй, стоит задать отдельный вопрос.