我正在尝试绘制一些调查数据。我们收集了调查数据，其中每天对相同的大约20个人进行两次为期30天的调查。因此，在我的数据中，同一个人多次出现在不同的行中。我目前想形象化的变量是关于他们乘坐的第一条公交路线（每天两次的旅行）。因此，我希望能够查看他们选择了哪条公交路线，在哪一天，是哪个用户。到目前为止，我已经尝试了许多不同的方法，但是没有任何东西可以给我带来有效且易于理解的图形。 之前我尝试过：
t_1_bus_route_taken <- ethica_surveys_filter_final %>%
group_by(Name, pre_post) %>%
filter(!is.na(first_bus_route_taken))
ggplot(t_1_bus_route_taken, aes(x=response_time,
y=first_bus_route_taken, group=Name)) +
+ geom_line(colour="grey70") +
+ geom_point(aes(colour=Name), size=4) +
+ facet_grid(Name ~ .) +
+ scale_colour_brewer(palette="Set1")
但是看起来不正确。我也尝试过：
ggplot() +
+ geom_line(data=t_1_bus_route_taken, aes(x=response_time,
y=first_bus_route_taken, group=Name,
color=first_bus_route_taken), size=0.8, alpha=0.05)
该图确实很忙，很难阅读。 任何帮助，将不胜感激。 谢谢！