Displaying 2 results from an estimated 2 matches for "missed_exercise".
2023 Oct 31
0
Missing shapes in legend with scale_shape_manual
...E, TRUE, TRUE)
b2 <- data.frame(Date, Time, bg, missed_meds, no_exercise)
b2$Date <- as.Date(b2$Date)
# add "status" columns, could also be defined as factor.
b2$medStat <- c("missed_meds",NA, NA, NA, NA, NA, "missed_meds")
b2$exercise <- c(NA, NA, "missed_exercise",NA,"missed_exercise", "missed_exercise", "missed_exercise")
Then your ggplot call would be like this:
ggplot(data = b2, aes(x = Date, y = bg)) +
geom_line() +
geom_point(aes(shape = medStat), size = 3)+
geom_point(aes(shape = exercise),size = 3)+
scale_...
2023 Oct 31
0
Missing shapes in legend with scale_shape_manual
...data.frame(Date, Time, bg, missed_meds, no_exercise)
>
> b2$Date <- as.Date(b2$Date)
> # add "status" columns, could also be defined as factor.
> b2$medStat <- c("missed_meds",NA, NA, NA, NA, NA, "missed_meds")
> b2$exercise <- c(NA, NA, "missed_exercise",NA,"missed_exercise",
> "missed_exercise", "missed_exercise")
>
> Then your ggplot call would be like this:
>
> ggplot(data = b2, aes(x = Date, y = bg)) +
> ? geom_line() +
> ? geom_point(aes(shape = medStat), size = 3)+
> ? geom_point(a...