使用case_when和contains进行突变
我觉得应该有一种有效的方法使用case_when和contains使用dplyr来修改新列，但不能使其工作。
我知道在mutate中使用case_when“有点试验性”（就像在本文中一样），但如果有任何建议，我将不胜感激。
不起作用：
library(tidyverse)
set.seed(1234)
x <- c("Black", "Blue", "Green", "Red")
df <- data.frame(a = 1:20,
b = sample(x,20, replace=TRUE))
df <- df %>%
mutate(group = case_when(.$b(contains("Bl")) ~ "Group1",
case_when(.$b(contains("re", ignore.case=TRUE)) ~ "Group2")
)
共有1个答案
我们可以使用grep
df %>%
mutate(group = case_when(grepl("Bl", b) ~ "Group1",
grepl("re", b, ignore.case = TRUE) ~"Group2"))
# a b group
#1 1 Black Group1
#2 2 Green Group2
#3 3 Green Group2
#4 4 Green Group2
#5 5 Red Group2
#6 6 Green Group2
#7 7 Black Group1
#8 8 Black Group1
#9 9 Green Group2
#10 10 Green Group2
#11 1 Green Group2
#12 2 Green Group2
#13 3 Blue Group1
#14 4 Red Group2
#15 5 Blue Group1
#16 6 Red Group2
#17 7 Blue Group1
#18 8 Blue Group1
#19 9 Black Group1
#20 10 Black Group1
-
我有这样的调查数据。唯一的回答是“na”或“yes”。 我不得不对数据应用以下逻辑： null null 任何建议都非常感谢！我想我可能得用一个循环，但我不知道怎么用。如果我转换为数值并将所有4列求和，我可以使用类似…？
-
我有一个名称重复的数据集。如果名称重复，我想创建一个值为1（TRUE）或0（FALSE）的新列。 这是我使用的代码: 或者 然而，我得到了上面可以看到的错误。 另一个想法是使用group_by，然后计算计数。喜欢： 但是，它不能返回原始数据帧后group_by
-
我尝试获取标题中包含一些单词的链接，但不包含一些单词，我使用以下代码，但它表示这不是有效的XPath表达式。 请在此处找到我的代码： 任何帮助将不胜感激！
-
我想知道如何解决case_when中的整数和双向量问题。我需要double vector作为我的numericinput，然而，“case_when”总是给我抛出一个错误，比如“x必须是一个整数向量，而不是一个double vector”。 它只允许我在将“true~0”更改为“true~0L”时输入整数输入 由reprex包(v0.3.0)于2020-08-12创建
-
我已经更新了dplyr(现在是0.7.1)，我的很多旧代码都不能用了，因为mutate_each已经被弃用了。我曾经用mutate_each做类似这样的事情(代码如下),使用列索引。我会在数百个专栏中这样做。而我就是搞不清楚如何用mutate_at正确使用vars参数。我看到的所有例子都使用了列名...我不想这么做。我确信这是一个简单的答案，但是我已经花了太多的时间试图弄明白它，并且将非常感谢一些
-
我想在中使用，如以下示例所示： 使用调用中的code>也不起作用。 可以替换为第二个call，为简洁起见，我没有将其包括在内。