- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我有一个 tibble
列 foo
包含 tibble 中另一列的名称。我想根据 foo
中命名的列进行过滤:
mtcars %>%
mutate(foo = c(rep("carb", 16), rep("gear", 16))) %>%
filter(!!sym(foo) == 4)
#> Error in is_symbol(x): object 'foo' not found
它似乎在全局环境中寻找 foo
,所以我想我需要一种方法来指定 foo
应该在 tibble 的上下文中进行评估。
期望的结果与运行相同:
rbind(
mtcars[1:16,] %>% mutate(foo = "carb") %>% filter(carb == 4),
mtcars[17:32,] %>% mutate(foo = "gear") %>% filter(gear == 4)
)
#> mpg cyl disp hp drat wt qsec vs am gear carb foo
#> 1 21.0 6 160.0 110 3.90 2.620 16.46 0 1 4 4 carb
#> 2 21.0 6 160.0 110 3.90 2.875 17.02 0 1 4 4 carb
#> 3 14.3 8 360.0 245 3.21 3.570 15.84 0 0 3 4 carb
#> 4 19.2 6 167.6 123 3.92 3.440 18.30 1 0 4 4 carb
#> 5 17.8 6 167.6 123 3.92 3.440 18.90 1 0 4 4 carb
#> 6 10.4 8 472.0 205 2.93 5.250 17.98 0 0 3 4 carb
#> 7 10.4 8 460.0 215 3.00 5.424 17.82 0 0 3 4 carb
#> 8 32.4 4 78.7 66 4.08 2.200 19.47 1 1 4 1 gear
#> 9 30.4 4 75.7 52 4.93 1.615 18.52 1 1 4 2 gear
#> 10 33.9 4 71.1 65 4.22 1.835 19.90 1 1 4 1 gear
#> 11 27.3 4 79.0 66 4.08 1.935 18.90 1 1 4 1 gear
#> 12 21.4 4 121.0 109 4.11 2.780 18.60 1 1 4 2 gear
最佳答案
如果 'foo' 已经是一个以 "am"为字符串的列,选择 'foo' 的第一个元素,将其转换为 sym
bol,计算 (!!
) 并过滤
那些'am'值为1的行
library(dplyr)
library(rlang)
mtcars %>%
mutate(foo = "am") %>%
filter(!! sym(foo[1]) == 1)
# mpg cyl disp hp drat wt qsec vs am gear carb foo
#1 21.0 6 160.0 110 3.90 2.620 16.46 0 1 4 4 am
#2 21.0 6 160.0 110 3.90 2.875 17.02 0 1 4 4 am
#3 22.8 4 108.0 93 3.85 2.320 18.61 1 1 4 1 am
#4 32.4 4 78.7 66 4.08 2.200 19.47 1 1 4 1 am
#5 30.4 4 75.7 52 4.93 1.615 18.52 1 1 4 2 am
#6 33.9 4 71.1 65 4.22 1.835 19.90 1 1 4 1 am
#7 27.3 4 79.0 66 4.08 1.935 18.90 1 1 4 1 am
#8 26.0 4 120.3 91 4.43 2.140 16.70 0 1 5 2 am
#9 30.4 4 95.1 113 3.77 1.513 16.90 1 1 5 2 am
#10 15.8 8 351.0 264 4.22 3.170 14.50 0 1 5 4 am
#11 19.7 6 145.0 175 3.62 2.770 15.50 0 1 5 6 am
#12 15.0 8 301.0 335 3.54 3.570 14.60 0 1 5 8 am
#13 21.4 4 121.0 109 4.11 2.780 18.60 1 1 4 2 am
如果每一行都不同,那么一个有效的选择是行/列索引
df1 <- mtcars %>%
mutate(foo = c(rep("carb", 16), rep("gear", 16)))
i1 <- cbind(seq_len(nrow(df1)), match(df1$foo, names(df1)))
subset(df1, df1[-ncol(df1)][i1] == 4)
# mpg cyl disp hp drat wt qsec vs am gear carb foo
#1 21.0 6 160.0 110 3.90 2.620 16.46 0 1 4 4 carb
#2 21.0 6 160.0 110 3.90 2.875 17.02 0 1 4 4 carb
#7 14.3 8 360.0 245 3.21 3.570 15.84 0 0 3 4 carb
#10 19.2 6 167.6 123 3.92 3.440 18.30 1 0 4 4 carb
#11 17.8 6 167.6 123 3.92 3.440 18.90 1 0 4 4 carb
#15 10.4 8 472.0 205 2.93 5.250 17.98 0 0 3 4 carb
#16 10.4 8 460.0 215 3.00 5.424 17.82 0 0 3 4 carb
#18 32.4 4 78.7 66 4.08 2.200 19.47 1 1 4 1 gear
#19 30.4 4 75.7 52 4.93 1.615 18.52 1 1 4 2 gear
#20 33.9 4 71.1 65 4.22 1.835 19.90 1 1 4 1 gear
#26 27.3 4 79.0 66 4.08 1.935 18.90 1 1 4 1 gear
#32 21.4 4 121.0 109 4.11 2.780 18.60 1 1 4 2 gear
或者一个选项是 get
with rowwise
df1 %>%
rowwise %>%
filter(get(foo) == 4)
或者在filter
中使用行/列索引
df1 %>%
filter(.[cbind(row_number(), match(foo, names(.)))] == 4)
关于在过滤器中使用 tidyeval 引用另一列,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/56051857/
我有一个对象数组,我想在键传入“filter”过滤器时提取值。下面是我尝试过的 Controller 代码片段,但我得到的响应类型未定义。请帮我找出哪里出错了。 var states = [{"HI
如果任何 J2EE 应用程序直接访问 servlet,然后 servlet 将相同的请求转发到某个 .jsp 页面。 request.getRequestDispatcher("Login.jsp")
我有一个带有图像缩略图的表单,可以通过复选框进行选择以进行下载。我想要一个包含 jQuery 中图像的数组,用于 Ajax 调用。 2个问题: - 表格顶部有一个复选框,用于切换我想要从映射中排除的所
我必须从服务器转储数据库,将 .sql 传输到另一台服务器,然后运行以下脚本以使用此语法删除某些行: DELETE wp_posts FROM wp_posts INNER JOIN wp_postm
我想从目录中过滤掉特定类型的文件,但收到错误“ token 语法错误,删除这些 token ”: File dir = new File("c:/etc/etc"); File[] f
几乎所有的 Web 应用程序都依赖外部的输入。这些数据通常来自用户或其他应用程序(比如 web 服务)。通过使用过滤器,您能够确保应用程序获得正确的输入类型。 您应该始终对外部数据进行过滤! 输
我正在开发一个由 OData 服务提供支持的搜索功能。它将返回一个或一列标题对象作为结果。我们需要搜索的许多字段不在标题对象中。它们仅在子对象(导航属性)中。能够针对子字段执行 OData 搜索并仍然
假设我有以下模型,它有一个方法 variants(): class Example(models.Model): text = models.CharField(max_length=255)
我有一个默认的列表列表,但我基本上想这样做: myDefaultDict = filter(lambda k: len(k)>1, myDefaultDict) 除了它似乎只适用于列表。我能做什么?
我正在使用 django-filter 来输出我的模型的过滤结果。那里没有问题。下一步是添加一个分页器……尽管现在已经苦苦挣扎了好几天。 views.py: def funds_overview(re
我正在做一个概念证明,我正在试验一种奇怪的行为。 我有一个按日期字段按范围分区的表,如果我设置固定日期或由 SYSDATE 创建的日期,查询的成本会发生很大变化。 这些是解释计划: SQL> SELE
如果一个或另一个值匹配,是否可以制作一个过滤器,例如一个中性的 PropertyFilter(并传递给链中的下一个过滤器)?就像是: value1 val
我是 VBA 初学者,正在尝试根据单元格值过滤数据,经过一番谷歌搜索后,我编写了一个有效的代码 Sub FilterDepartment_Sales() Sheet6.Activate
假设我在 excel 数据透视表中有两个过滤器。 两者最初都会显示筛选列的选定范围内的所有值。 当我仅在过滤器 1 中选择几个值时,过滤器 2 仍会继续显示基础数据中所选范围内特定过滤器列中的所有值。
是否可以定义自定义 build-ins (名称不再适合)在 ftl? 由于语义前提,我不想让它成为一个函数,而是一个内置的。 最佳答案 这是不可能的,?语法是为内置函数保留的。 (顺便说一句,这意味着
我试图在 Edit | 之外添加一个链接通过插件删除wordpress管理员>用户>所有用户列表中的链接..这是我第一次尝试通过查看其他插件或搜索google来制作wordpress插件.. 我添加了
我正在尝试按照以下教程使用 django 过滤器进行分页,但该教程似乎缺少某些内容,而且我无法使用基于函数的 View 方法显示分页。 https://simpleisbetterthancomple
由于我是 Powershell 新手,因此寻求最佳实践方面的帮助, 我有一个 csv 文件,我想过滤掉 csv 中的每一行,除了包含“未安装”的行 然后,我想根据包含计算机列表的单独 csv 文件过滤
我正在尝试创建一个搜索查询,它会告诉我我作为审阅者添加到其中的打开更改,但我还没有提交最新补丁集的代码审查。这应该包括其他人已经评论过的更改,但我没有。 我能找到的最接近的是 is:reviewer
在我的 Web 应用程序中,我有 3 个主要部分 1. 客户 2. 供应商 3. 管理员 我正在使用 java session 过滤器来检查用户 session 并允许访问网站的特定部分。 因此客户只
我是一名优秀的程序员,十分优秀!