代码之家 › 专栏 › 技术社区 › asachet

dplyr选择辅助对象的交点

dplyr r

asachet · 技术社区 · 7 年前

dplyr xxxx_at .vars 论点但是我想选择我选择的交叉点。

[abc][abc][abc] .

df <- structure(list(aaa = 1L, baa = 2L, caa = 3L, aba = 4L, bba = 5L, 
    cba = 6L, aca = 7L, bca = 8L, cca = 9L, aab = 10L, bab = 11L, 
    cab = 12L, abb = 13L, bbb = 14L, cbb = 15L, acb = 16L, bcb = 17L, 
    ccb = 18L, aac = 19L, bac = 20L, cac = 21L, abc = 22L, bbc = 23L, 
    cbc = 24L, acc = 25L, bcc = 26L, ccc = 27L), class = "data.frame", row.names = c(NA, 
-1L))


# names(df)
# [1] "aaa" "baa" "caa" "aba" "bba" "cba" "aca" "bca" "cca" "aab" "bab" "cab" "abb" "bbb" "cbb" "acb" "bcb"
# [18] "ccb" "aac" "bac" "cac" "abc" "bbc" "cbc" "acc" "bcc" "ccc"

,列以开头 "a" 和 "c" . 为了将解决方案用于 mutate_at group_by_at , and_so_on_at ,它需要装入到单个调用中 vars

在中使用几个条件 瓦尔斯 取它们的并集,而不是交点。

df %>% 
select_at(vars(starts_with("a"), end_with("c"))) %>%
names

# [1] "aaa" "aba" "aca" "aab" "abb" "acb" "aac" "abc" "acc" "bac" "cac" "bbc" "cbc" "bcc" "ccc"

[1] "aac" "abc" "acc"

我有一种感觉 all_vars 是相关的,但我不知道如何使用它。

select 而不是 select_at 但我想说的是一般性的。我的实际用例是 .

2 回复 | 直到 7 年前

FloSchmo 7 年前

starts_with ends_with 两者都计算到列位置。因此,它们都返回表示列索引的数字。如果要同时应用这两个函数,则需要两个函数返回的列索引的交集。你可以通过打电话来做到这一点 intersect 从…开始 和

df %>% 
  select_at(vars(intersect(starts_with("a"), ends_with("c")))) %>%
  names

Andre Elrico 7 年前

grep("^a.*c$", names(df), value = TRUE)

#[1] "aac" "abc" "acc"

dplyr

df %>% 
    select_at(vars(matches("^a.*c$"))) %>%
    names

#[1] "aac" "abc" "acc"

推荐文章

Amp · 使用R ggplot2删除geom_radial中axis.line和panel.border之间的空格

1 年前

Hard_Course · 用另一列中的值替换行的最后一个非NA条目

1 年前

Mark R · 使用geom_sf()删除地球仪上不需要的网格线

1 年前

Joe · 根据对工作日和本周早些时候的日期的了解,找到一个日期

1 年前

Ben · 统计向量中的单词在字符串中出现的频率

1 年前

TheCodeNovice · R中符号格式的尾随零和其他问题[重复]

1 年前

katefull06 · 在R中使用terra修改范围时,会为单独的SpatRaster重写范围

1 年前

dez93_2000 · 在R管道子功能中引用管道对象的当前状态

1 年前

accibio · 在ggplot2中为同一变量创建两个连续的颜色渐变比例

1 年前

Mankka · 如何在Ggplot2中绘制均匀的径向图

1 年前