r - 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 值”)。
谢谢!
解决方案
如果您使用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(.))) %>% ...
推荐阅读
- spring - 如何在spring boot中声明多个具有相同类但使用不同属性的对象
- java - 如何获取在 Android 的列表视图中单击的项目的字符串值
- xslt - 删除 XSLT 中两个字符串和节点之间的空格
- python - 如何获取每个标签值对应每个`user_id`的比例
- sql - Oracle SQL 我无法分组
- python - 如何将第 i 行的 numpy 数组的单个元素与第 i 行的另一个 numpy 数组的元素相乘?
- http - 如何处理python请求中的“无法建立新连接”错误
- groovy - Groovy 闭包中的字符串引用导致的内存使用
- python - 将现有的 Shell 代码转换为 Python 以进行文件移动
- mysql - 如何创建带有可选参数的 sql 语句