我正在创建一个Shiny应用程序，允许用户选择几个不同的商店选项来显示。每次检查新商店时，我都会尝试显示两个折线图 - 按时间访问的儿童数量和成人数量。使用ggplot2这相对简单，我只需添加两个geom_lines -
base_E <- ggplot(data=store) + geom_line(aes(x=time, y=child_use, group=branch, colour=branch, linetype="Child")) + geom_line(aes(x=time, y=adult_use, group=branch, colour=branch, linetype="Adult"))
base_E <- base_E + xlab("Time of Day") + ylab("Num visitors") + scale_linetype_manual(name="", values=c("Child" = 1, "Adult"=2)) + scale_colour_discrete(name="Branch") + ggtitle("title") + scale_x_datetime(breaks=date_breaks("1 hour"), labels=date_format("%H:%M")) + ylim(0,100)
然而，当我尝试使用RCharts和hplot重新创建它时，我发现无法进行两级分组。我希望每个分支都是不同的颜色，有一条实线和一条虚线。
任何想法都会非常感激。