如何解决删除从第一列匹配正则表达式开始的列范围
我有以下数据框,它是 read_excel
的输出,在 excel 中缺少列名:
t <- tibble(A=rnorm(3),B=rnorm(3),"x"=rnorm(3),"y"=rnorm(3),Z=rnorm(3))
colnames(t)[3:4] <- c("..3","..4")
如何以灵活的动态方式选择列 ..3
到 Z
(不取决于数量或表格宽度)。我正在考虑以下方面:
t %>% select(-starts_with(".."):-last_col())
但这会发出警告,因为 starts_with
返回两个值。
解决方法
我们可以强制选择第一个:
t %>% select(-c(starts_with("..")[ 1 ]:last_col()))
# # A tibble: 3 x 2
# A B
# <dbl> <dbl>
# 1 0.889 0.505
# 2 0.655 -2.15
# 3 1.34 -0.290
或者“更整洁”的方式使用优先:
select(-first(starts_with("..")):-last_col())
,
您可以使用基础 R 来实现:
select *
into v_row
from group_matrix gm
where gm.group_code= p_group_code
and ( (p_code is null and gm.code is null)
or gm.code = p_code )
也可以与 t[cumsum(startsWith(names(t),"..")) == 0]
# # A tibble: 3 x 2
# A B
# <dbl> <dbl>
# 1 -1.56 -0.0747
# 2 -1.68 -0.847
# 3 -1.23 -1.20
一起使用:
select()
附注。不要在 R 中使用 t %>%
select(which(cumsum(startsWith(names(t),"..")) == 0))
作为变量名,因为它是一个函数名。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。