小编leb*_*noz的帖子

我正在尝试控制ggplot2图中的行数：

我尝试将 a 添加+ guides(fill = guide_legend(nrow = 1))到我的ggplot，但这显然仅适用于缩放图例（如果我错了，请纠正我）。这是我的示例代码：

library(ggplot2)
library(lubridate) # because my dates are Date objects

df = structure(list(date = structure(c(16829, 16860, 16891, 16920, 16952, 16982, 17011, 17044, 17074, 17105, 17135, 17165, 17197, 17225, 17256, 17284, 16829, 16860, 16891, 16920, 16952, 16982, 17011, 17044, 17074, 17105, 17135, 17165, 17197, 17225, 17256, 17284, 16829, 16860, 16891, 16920, 16952, 16982, 17011, 17044, 17074, 17105, 17135, 17165, 17197, 17225, 17256, 17284, 16829, 16860, 16891, 16920, …

我有关于产品销售的每日时间序列,我的系列从2016年1月1日至2017年8月31日开始.

考虑到它是一个为期六天的星期(我的星期一星期一开始,星期六结束)星期日没有数据,我知道在运行Arima模型之前我需要先填写缺失值.这是我需要帮助的地方:我读过我可以用na.approx或填写缺失的值NA,但我不知道该怎么做.

你可以在这里看到我的系列:

https://drive.google.com/file/d/0BzIf8XvzKOGWSm1ucUdYUVhfVGs/view?usp=sharing

如您所见,周日没有数据.我需要知道如何填充缺失值以运行Arima模型并能够预测2017年的剩余时间.

我正在尝试在ggplot2图中绘制一个半透明的矩形:

library(ggplot2)
min_date = min(df1$date) # dput(df1) below
max_date = max(df1$date)
ggplot(df1) +
    geom_rect(aes(xmin = min_date, xmax = max_date, ymin = -Inf, ymax = 3), fill = "palegreen", alpha = 0.2) +
    geom_line(aes(x = date, y = pb, colour = "P/B")) +
    geom_line(aes(x = date, y = return_index, colour = "return"))

然而,与我所做的其他一些图表(从Hadley Wickham的书中复制)不同,绿色矩形是完全不透明的:我看不到背景中浅灰色的阴影线.这是它的样子:

此外,如果我更改图层的顺序(通过放置geom_line 之前 geom_rect),矩形会隐藏线条.

我犯了什么微妙的错误？如何使绿色矩形离散地融入背景？

这是我的df1:

df1 = structure(list(date = structure(c(1335744000, 1380499200, 1464652800,
1356912000, 1485820800, 1490918400, 1383177600, 1461888000, 1454025600,
1367280000, 1343692800, 1401408000, 1330473600, 1391126400, …

在es集群中，数据规模较大，我们使用spark来计算数据，但是采用的elasticsearch-hadoop是https://www.elastic.co/guide/en/elasticsearch/hadoop/current/spark.html

我们必须读取索引的完整列。有什么帮助吗？