【问题标题】:Replicate and append to dataframe in R复制并附加到 R 中的数据帧
【发布时间】:2019-06-20 18:04:01
【问题描述】:

我相信这相当简单,尽管我是使用 R 和代码的新手。我有一个数据集,每个啮齿动物陷阱站点都有一行。然而,在 4 年内有 8 次被诱捕。我想做的是扩展陷阱站点数据并为每一行附加一个数字 1 到 8。

然后我可以用陷阱访问标记它们,以便随后与获得的陷阱数据连接。

我已设法使用以下代码复制行。虽然数据框中的行扩展为 1、1.1...1.7、2、2.1...2.7 等,但我无法弄清楚如何将其转换为可用的基于列的 ID。

structure(list(TrapCode = c("IA1sA", "IA2sA", "IA3sA", "IA4sA", 
"IA5sA"), Y = c(-12.1355987315, -12.1356879776, -12.1357664998, 
-12.1358823313, -12.1359720852), X = c(-69.1335789865, -69.1335225279, 
-69.1334668485, -69.1333847769, -69.1333226532)), row.names = c(NA, 
5L), class = "data.frame")

gps_1 <– gps_1[rep(seq_len(nrow(gps_1)), 3), ]

给予

"IA5sA", "IA1sA", "IA2sA", "IA3sA", "IA4sA", "IA5sA", "IA1sA", 
"IA2sA", "IA3sA", "IA4sA", "IA5sA"), Y = c(-12.1355987315, -12.1356879776, 
-12.1357664998, -12.1358823313, -12.1359720852, -12.1355987315, 
-12.1356879776, -12.1357664998, -12.1358823313, -12.1359720852, 
-12.1355987315, -12.1356879776, -12.1357664998, -12.1358823313, 
-12.1359720852), X = c(-69.1335789865, -69.1335225279, -69.1334668485, 
-69.1333847769, -69.1333226532, -69.1335789865, -69.1335225279, 
-69.1334668485, -69.1333847769, -69.1333226532, -69.1335789865, 
-69.1335225279, -69.1334668485, -69.1333847769, -69.1333226532
)), row.names = c("1", "2", "3", "4", "5", "1.1", "2.1", "3.1", 
"4.1", "5.1", "1.2", "2.2", "3.2", "4.2", "5.2"), class = "data.frame")

我有一列 Trap_ID 当前是唯一标识符。我希望在复制之后,我可以在其中附加一个迭代编号,以将其保留为唯一 ID。

例如:

Trap_ID
IA1sA.1
IA1sA.2
IA1sA.3
IA2sA.1
IA2sA.2
IA2sA.3

【问题讨论】:

  • 一个最小的可重现示例将是一个很好的开始! stackoverflow.com/questions/5963269/…
  • ... 如果您希望将 1、...、8 作为另一列添加到数据帧 gps,然后尝试 ... gps$Trap_ID
  • @tino_ladino 这是数据框示例。 structure(list(TrapCode = c("IA1sA", "IA2sA", "IA3sA", "IA4sA", "IA5sA"), Y = c(-12.1355987315, -12.1356879776, -12.1357664998, -12.1358823313, -12.1359720852), X = c(-69.1335789865, -69.1335225279, -69.1334668485, -69.1333847769, -69.1333226532)), row.names = c(NA, 5L), class = "data.frame")

标签: r dataframe data-manipulation replicate


【解决方案1】:

只需使用交叉连接(即,不使用 by 列连接即可返回两组的笛卡尔积):

mdf <- merge(data.frame(Trap_ID = 1:8), trap_side_df, by=NULL)

【讨论】:

    猜你喜欢
    • 1970-01-01
    • 2015-04-05
    • 2021-11-15
    • 2021-12-12
    • 2016-01-31
    • 2018-06-29
    • 2017-06-20
    • 2017-10-21
    • 2020-08-20
    相关资源
    最近更新 更多