小编dco*_*eon的帖子

在 R 中使用 lapply 和 ifelse 函数

我在 R 中遇到一个问题,我可以对列表中的元素运行 ifelse 语句,但是一旦我将 ifelse 语句放入 lapply 函数中,它就不再起作用。

这是我的例子。我正在使用三个数据框的列表:

> dflist
[[1]]
  ID1 tID1
1  m1    1
2  m2    2
3  m3    3
4  m4    4
5  m5    5

[[2]]
  ID2 tID2
1  m7    7
2  m8    8
3  m9    9
4 m10   10
5 m11   11

[[3]]
  ID3 tID3
1 m13   13
2 m14   14
3 m15   15
4 m16   16
5 m17   17
6 m18   18
Run Code Online (Sandbox Code Playgroud)

如果数据帧有奇数行,我希望 R 将其标记为“ODD”。如果数据帧有偶数行,我只希望 R 输出相同的数据帧。我希望输出是一个列表。

当我编写独立的 ifelse 语句时,这有效:

> ifelse(nrow(dflist[[1]])%%2==!0, "ODD", …
Run Code Online (Sandbox Code Playgroud)

if-statement r list lapply dataframe

5
推荐指数
1
解决办法
1万
查看次数

标签 统计

dataframe ×1

if-statement ×1

lapply ×1

list ×1

r ×1