如何解决R：如何遍历变量列表并创建具有动态名称的新变量？
我已经搜索了几个小时，但找不到一个很好的例子来说明我想做的事情。我知道如何在 SAS 中轻松地做到这一点，但我是 R 的新手。我有下面的代码可以创建两个变量。我必须重复这个才能创造更多类似的东西。图案是一样的。所有新变量都将以“EPL_”开头，并将使用具有相同后缀的名为“EP_”的变量创建。示例：
backtowide$EPL_VARTREE <- percent_rank(backtowide$EP_VARTREE)
backtowide$EPL_VARSKY <- percent_rank(backtowide$EP_VARSKY)
如何在循环中执行此操作而不必重复这行代码 20 次以上？
类似于：
for i in VARLIST {
backwide$EPL_i <- percent_rank(backtowide$EP_i)
}
解决方法
您可以使用 across 将 percent_rank 函数应用于以 'EP_' 开头的每一列，并使用 .names 分配名称。
library(dplyr)
backtowide <- backtowide %>%
mutate(across(starts_with('EP'),percent_rank,.names = '{sub("EP","EPL",.col)}'))
backtowide
# EP_VARTREE EP_VARSKY EPL_VARTREE EPL_VARSKY
#1 -0.56047565 1.7150650 0.00 1.00
#2 -0.23017749 0.4609162 0.25 0.75
#3 1.55870831 -1.2650612 1.00 0.00
#4 0.07050839 -0.6868529 0.50 0.25
#5 0.12928774 -0.4456620 0.75 0.50
或者用 lapply -
cols <- grep('^EP_',names(backtowide),value = TRUE)
backtowide[sub("EP",cols)] <- lapply(backtowide[cols],percent_rank)
数据
set.seed(123)
backtowide <- data.frame(EP_VARTREE = rnorm(5),EP_VARSKY = rnorm(5))
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。