合并 R 中有一个 NA 值的特定行答案

【问题标题】：Merging specific rows in R where there is a NA value in one合并 R 中有一个 NA 值的特定行
【发布时间】：2023-01-12 09:03:40
【问题描述】：

我有向下合并的数据，但在每个小时标记上，我的数据中有一行带有高程值，而我的数据中有一行带有 NA。我希望能够将这些行合并在一起，或者换句话说，取出具有 NA 值的行。表中的所有其他值都是 NA 也没关系。

这是我的数据：

> dput(stackoverflow[1:100,])
structure(list(Time = structure(c(1432425600, 1432426500, 1432427400, 
1432428300, 1432429200, 1432430100, 1432431000, 1432431900, 1432432800, 
1432433700, 1432434600, 1432435500, 1432436400, 1432437300, 1432438200, 
1432439100, 1432440000, 1432440900, 1432441800, 1432442700, 1432443600, 
1432444500, 1432445400, 1432446300, 1432447200, 1432448100, 1432449000, 
1432449900, 1432450800, 1432450800, 1432451700, 1432452600, 1432453500, 
1432454400, 1432454400, 1432455300, 1432456200, 1432457100, 1432458000, 
1432458000, 1432458900, 1432459800, 1432460700, 1432461600, 1432461600, 
1432462500, 1432463400, 1432464300, 1432465200, 1432465200, 1432466100, 
1432467000, 1432467900, 1432468800, 1432468800, 1432469700, 1432470600, 
1432471500, 1432472400, 1432472400, 1432473300, 1432474200, 1432475100, 
1432476000, 1432476000, 1432476900, 1432477800, 1432478700, 1432479600, 
1432479600, 1432480500, 1432481400, 1432482300, 1432483200, 1432483200, 
1432484100, 1432485000, 1432485900, 1432486800, 1432486800, 1432487700, 
1432488600, 1432489500, 1432490400, 1432490400, 1432491300, 1432492200, 
1432493100, 1432494000, 1432494000, 1432494900, 1432495800, 1432496700, 
1432497600, 1432498500, 1432499400, 1432500300, 1432501200, 1432502100, 
1432503000), tzone = "UTC", class = c("POSIXct", "POSIXt")), 
    Turtle = structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
    1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
    1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
    1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
    1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
    1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
    1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
    1L), levels = c("R3L1", "R3L11", "R3L12", "R3L2", "R3L4", 
    "R3L8", "R3L9", "R4L8", "R8L1", "R8L4", "R8NAT123"), class = "factor"), 
    elevation = c(NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, 
    NA, NA, 282.27, NA, NA, NA, NA, 283.21, NA, NA, NA, NA, 282.14, 
    NA, NA, NA, NA, 281.63, NA, NA, NA, NA, 281.63, NA, NA, NA, 
    NA, 281.63, NA, NA, NA, NA, 282.63, NA, NA, NA, NA, 281.63, 
    NA, NA, NA, NA, 282.14, NA, NA, NA, NA, 281.63, NA, NA, NA, 
    NA, 282.14, NA, NA, NA, NA, 281.36, NA, NA, NA, NA, 282.14, 
    NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA)), row.names = c(NA, 
-100L), class = c("tbl_df", "tbl", "data.frame"))

这也是我想要合并的行示例的图片。

如果您有任何问题，请告诉我。

【问题讨论】：

标签： r

【解决方案1】：

我们可能会使用

i1 <- which(!is.na(df1$elevation)) 
df1$elevation[i1 +1] <- df1$elevation[i1]
df2 <- unique(df1)
> dim(df2)
[1] 87  3

【讨论】：