R ggplot facet_wrap输出难以辨认

Question

我在使用facet_wrap以清晰易读的方式输出图表时遇到了一些麻烦。我不太确定是否有办法设置每个图表以适应数据。我的数据框是一整天在不同时间拍摄的一组权重，但每个日期可能会有一些结果，或许多结果。

head（df）结果：

  Date Time   SKU Weight
1 1/6/2016 9:37 10142  28.70
2 1/6/2016 9:38 10142  27.45
3 1/6/2016 9:38 10142  30.60
4 1/6/2016 9:39 10142  30.60
5 1/6/2016 9:39 10142  35.30
6 1/6/2016 9:40 10142  28.25

数据持续6个月，我想在一个折线图中表示每个日期。我的方法是ggplot和facet_wrap。也许这不是我应该采取的方法，所以我愿意接受建议。

     p10142 <- ggplot(wtData10142, aes(x = Time, y = Weight))
     (p10142 + geom_line() + facet_wrap(~ Date, ncol = 10))

非常感谢任何帮助。

Answer 1

试试这个

if (device.mobile()) {
  mobile(req, res, next)
} else {
  desktop(req, res, next)
}

Answer 2

您设置scales = "free_y"：

的内容如何？

 p10142 <- ggplot(wtData10142, aes(x = Time, y = Weight)) +
   geom_line() + facet_wrap(~ Date, ncol = 10, scales = "free_y"))

这将允许您的y轴在每个方面独立地展开。也许您还可以使用scale_x_continuous()设置某种类型的限制。有助于获得用于绘图的完整数据集......