小编Gui*_*167的帖子

我有一张地图,上面画着8个点:

library(ggplot2)
library(ggmap)
data = data.frame(
    ID = as.numeric(c(1:8)),
    longitude = as.numeric(c(-63.27462, -63.26499, -63.25658, -63.2519, -63.2311, -63.2175, -63.23623, -63.25958)),
    latitude = as.numeric(c(17.6328, 17.64614, 17.64755, 17.64632, 17.64888, 17.63113, 17.61252, 17.62463))
)

island = get_map(location = c(lon = -63.247593, lat = 17.631598), zoom = 13, maptype = "satellite")
islandMap = ggmap(island, extent = "panel", legend = "bottomright")
RL = geom_point(aes(x = longitude, y = latitude), data = data, color = "#ff0000")
islandMap + RL + scale_x_continuous(limits = c(-63.280, -63.21), expand = c(0, …

我无法解决这个问题,我有一个带有计数数据列表的DF.例如这样的事情:

 DATE        TIME     ID
 2014-02-14  15:02    1
 2014-02-15  15:12    1
 2014-02-16  08:34    2
 2014-02-17  02:02    2
 2014-02-19  11:02    1
 2014-02-20  15:42    1
 2014-02-22  16:02    2
 2014-02-25  15.02    1
 ....

现在我想创建一个测量连续几天的长度的函数,但我希望函数能够设置允许日期分开的天数(默认值= 1天).输出应该是DF,每个ID有多行(因为它们表示存在多个活动周期),并且每个连续的周期应显示该周期所包含的天数.输出示例应为:

 ID        periodID     days
 1         1            2
 2         1            2
 1         2            2
 ....

所以第一个问题是,我如何构建这样的DF？其次,我如何扩展这一点,以便我可以在函数中输入一个输入,确保相隔2天或4天的日期包含在同一时间段内(因此不是连续日期,但日期允许> 1分开一天)？

编辑这是我正在处理的原始数据集的片段(请注意,同一天有多个数据点,但时间被忽略,只有日期很重要).

    date    time    ID
24-10-14    10:47:36    1
24-10-14    10:52:19    1
24-10-14    10:56:47    1
24-10-14    10:58:57    1
24-10-14    11:39:18    1
24-10-14    12:03:27    1
24-10-14    12:19:22    1
24-10-14    12:43:22    2
24-10-14    12:44:42    2
24-10-14    12:55:47 …

我想解决以下问题.我使用ggplot2绘制一个岛屿的地图:

island = get_map(location = c(lon = -63.247593, lat = 17.631598), zoom = 14, maptype = "satellite")
islandMap = ggmap(island, extent = "panel", legend = "bottomright")
RL = geom_point(aes(x = longitude, y = latitude), data = data, size = 4, color = "#ff0000")
islandMap + RL

RL点的坐标:

data = data.frame(
    ID = as.numeric(c(1:8)),
    longitude = as.numeric(c(-63.27462, -63.26499, -63.25658, -63.2519, -63.2311, -63.2175, -63.23623, -63.25958)),
    latitude = as.numeric(c(17.6328, 17.64614, 17.64755, 17.64632, 17.64888, 17.63113, 17.61252, 17.62463))
)

现在的问题是,当我使用zoom = 13时,岛上的岛太小了,当我使用zoom = 14时,它完全居中.但是当我绘制RL点时,两个被切断,因为它对东方太多而另一个对西方来说太过分了.我使用边界框查看了一些类似下面的解决方案.但是,我必然会使用卫星图像,因此绑定到谷歌,它不支持边界框解决方案.

lon …

为了显示多个图,我使用多色图(http://www.cookbook-r.com/Graphs/Multiple_graphs_on_one_page_(ggplot2)/),现在我有两个共享相同x轴范围并绘制在彼此上方的图:

multiplot(plot1, plot2)

我使用以下方法删除了x轴标签和标题:

xlab(NULL) + theme(axis.text.x=element_blank(),axis.ticks.x=element_blank())

但两个地块之间仍有一个白色边缘.如何缩小或删除此边距？

是否可以在 ggplot boxplot 中使用平均值而不是中位数？我问的原因是在我的数据中，中位数 = 0.0，平均值 = 0.40，我对平均值感兴趣。