首页 > 解决方案 > R:为变异函数选择具有 NA 的列

问题描述

我正在尝试对我的数据框中的列进行子集化,以便仅在 mutate 函数中使用它们,作为具有 knitr::kable 和 kableExtra 的 HTML 表的条件格式的一部分。

#Conditional Formating function
highlights <- function(x) { cell_spec(x, background = ifelse( x != NA, "#C9FFE5","white")) }

#build table
ds.tab <- ds%>%
  mutate_if("column contains ANY NA values", funs(highlights(.)))%>% ...

我需要在 R 中的括号之间写入位(“列包含任何 NA 值”)。

谢谢!

标签: rnadplyr

解决方案


如果您使用any(is.na(.))以下内容,它应该可以工作:

ds.tab <- ds %>%
  mutate_if(function(x) any(is.na(x)), funs(highlights(.))) %>% ...

或者,如果您愿意,以下语法的工作方式相同

ds.tab <- ds %>%
  mutate_if(~any(is.na(.)), funs(highlights(.))) %>% ...

推荐阅读