小编jhy*_*eon的帖子

这是数据集。

library(data.table)

x <- structure(list(id = c("A", "B" ),
                    segment_stemming = c("[('Brownie', 'Noun'), ('From', 'Josa'), ('Pi', 'Noun')]", 
                                          "[('Dung-caroon-gye', 'Noun'), ('in', 'Josa'), ('innovation', 'Noun')]" )), 
               row.names = c(NA, -2L), 
               class = c("data.table", "data.frame" ))

x
# id                                                     segment_stemming
# 1:  A               [('Brownie', 'Noun'), ('From', 'Josa'), ('Pi', 'Noun')]
# 2:  B [('Dung-caroon-gye', 'Noun'), ('in', 'Josa'), ('innovation', 'Noun')]

我想将元组分成行。这是我的预期结果。

id             segment_stemming
A              ('Brownie', 'Noun')
A              ('From', 'Josa')
A              ('Pi', 'Noun')
B              ('Dung-caroon-gye', 'Noun')
B              ('in', 'Josa')
B              ('innovation', 'Noun')

我已经使用 R 搜索了元组格式，但找不到任何线索来得出结果。

我有这个数据

M1  M2  M3 UCL
1   2   3   1.5

我想在这种情况下创建新列：

如果M1大于UCL，MM1将为“UP”，否则为“NULL”

如果M2大于UCL，MM2将为“UP”，否则为“NULL”

如果M3大于UCL，MM3将为“UP”，否则为“NULL”

M1  M2  M3 UCL   | MM1  MM2 MM3
1   2   3   1.5  | NULL UP  UP

但我有几个M列（如M1~M1005），所以我想编写一些代码，如mutate_each和mutate_at。如何使用 mutate 和 ifelse 函数来在特定条件下创建新列？