如何解决为什么在尝试replace_with_na_all时我的标题中出现了列名,所以我没有得到识别?
我正在尝试将R中带有tidyverse的小标题中的NA分配给某些类别值。 但是,我的列名没有被提取。
这是我的虚假数据:
structure(list(id = c("1","2","3","4","5","6","7","9","8","10","11","12","13","14","15","16","17","18","19","20"),health_care_worker = c("No","No","Yes","No"),how_unwell = c(1,6,1,1),Comorbidity_one = structure(c(5L,5L,3L,1L,2L,4L),.Label = c("Asthma (managed with an inhaler)","Diabetes Type 2","High Blood Pressure (hypertension)","None"),class = "factor"),Comorbidity_two = structure(c(NA,NA,1L),.Label = c("No","Obesity"),Comorbidity_three = c(NA,Comorbidity_four = c(NA_character_,NA_character_,NA_character_),Comorbidity_five = c(NA_character_,Comorbidity_six = c(NA_character_,Comorbidity_seven = c(NA_character_,Comorbidity_eight = c(NA_character_,Comorbidity_nine = c(NA_character_,NA_character_)),row.names = c(NA,-20L),class = c("tbl_df","tbl","data.frame"))
这是我为获得所需输出而编写的代码:
na_strings <- c("Diarrhoea","Long Standing Health Issues","0","Self-Isolating With No Symptoms","Showing Symptoms But Not Tested","Mild","Moderate")
data_replace_na <- fake_data %>%
replace_with_na_all(condition = ~.Comorbidity_one %in% na_strings,condition = ~.Comorbidity_two %in% na_strings,condition = ~. Comorbidity_three %in% na_strings)
这是我得到的第一个错误:
Error: unexpected symbol in:
" condition = ~.Comorbidity_two %in% na_strings,condition = ~. Comorbidity_three"
如果我删除第二个条件和第三个条件,则会出现此错误:
Error in .Comorbidity_one %in% na_strings :
object '.Comorbidity_one' not found
有人知道我为什么不能成功吗?这似乎是两个问题。首先,它不会显示我的列名,其次,然后我如何才能成功地将这些变量的类别分配给NA?
解决方法
condition
遍历每一列,因为它根据文档采用了匿名功能
condition-设置NA所需的条件为TRUE。在此,条件使用以下语法指定了公式:〜.x {condition}。例如,写〜.x
另外,根据文档,它正在获取整个数据集,并且没有提供列的子集
此函数采用一个数据帧,并按照特殊语法替换满足指定为NA值的条件的所有值。
通过检查源代码,它在所有列上使用map
进行循环
...
purrr::map_dfc(data,~na_set(.x,condition))
...
因此,除非我们select
之前的列,否则它将在所有列上执行
fake_data %>%
replace_with_na_all(condition = ~.x %in% na_strings)
如果我们只需要替换选定的列,则将mutate
与across
library(dplyr)
fake_data %>%
mutate(across(starts_with('Comorbidity'),~ replace(.,. %in% na_strings,NA)))
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。