我创建了一个函数,该函数生成一个带有新变量的数据框。该函数采用两个方面:数据帧和字符值。我想在一个字符向量上迭代(通常大约100个元素长)。我目前正在使用(我在myvectorofchars中)。有没有办法将我的for循环转换为purrr的map函数?这是我的(简化)代码:
create_dummyvar <- function(mydata, code) {
myvar <- paste0("prefix_", code)
mydata[[myvar]] <- 0
mydata[[myvar]][mydata$somevar %in% code] <-1
mydata
}
for(i in allcodes) { myfile <- create_dummyvar(myfile, i) }