如果为空,则向列添加时间顺序编号
Add chronological number to a column if empty
我有一个数据框,其中有一列名为 's_nummer'。此列有时为 NA,在这种情况下,我想自己添加一个范围从 700001 到 800000 的数字。因此在这种情况下,第 3 行和第 4 行不包含 s_nummer 列中的值,并且我想将值 700001 添加到第 3 行,将 700002 添加到第 4 行。
输出:
structure(list(s_nummer = c(599999, 599999, NA, NA), eerste_voornaam = c("Debbie",
"Debbie", "Debbie", "Debbie"), tussenvoegsel = c(NA, NA, NA,
NA), geslachtsnaam = c("Oomen", "Oomen", "Oomen", "Oomen")), row.names = c(NA,
-4L), class = c("tbl_df", "tbl", "data.frame"))
希望能帮到你!
提前致谢
您可以使用 which
和 is.na
来获取 x$s_nummer 中带有 NA
的行并覆盖它们700000 + seq_along
.
i <- which(is.na(x$s_nummer))
x$s_nummer[i] <- 700000 + seq_along(i)
# s_nummer eerste_voornaam tussenvoegsel geslachtsnaam
#1 599999 Debbie NA Oomen
#2 599999 Debbie NA Oomen
#3 700001 Debbie NA Oomen
#4 700002 Debbie NA Oomen
我有一个数据框,其中有一列名为 's_nummer'。此列有时为 NA,在这种情况下,我想自己添加一个范围从 700001 到 800000 的数字。因此在这种情况下,第 3 行和第 4 行不包含 s_nummer 列中的值,并且我想将值 700001 添加到第 3 行,将 700002 添加到第 4 行。
输出:
structure(list(s_nummer = c(599999, 599999, NA, NA), eerste_voornaam = c("Debbie",
"Debbie", "Debbie", "Debbie"), tussenvoegsel = c(NA, NA, NA,
NA), geslachtsnaam = c("Oomen", "Oomen", "Oomen", "Oomen")), row.names = c(NA,
-4L), class = c("tbl_df", "tbl", "data.frame"))
希望能帮到你!
提前致谢
您可以使用 which
和 is.na
来获取 x$s_nummer 中带有 NA
的行并覆盖它们700000 + seq_along
.
i <- which(is.na(x$s_nummer))
x$s_nummer[i] <- 700000 + seq_along(i)
# s_nummer eerste_voornaam tussenvoegsel geslachtsnaam
#1 599999 Debbie NA Oomen
#2 599999 Debbie NA Oomen
#3 700001 Debbie NA Oomen
#4 700002 Debbie NA Oomen