R语言中%||%是什么意思？

Posted 2021-04-18 生信交流平台

不知道大家有没有在R代码中见到过这样的运算符号%||%，看上去有点像或，却又不是。

%||%实际上是rlang这个包中的一个函数，我们来看看它的定义

rlang::`%||%`function (x, y) { if (is_null(x))  y else x}

看到这个定义我相信大多数人都能够明白了，也就是这个函数有两个参数，当第一个参数x不为NULL的时候，返回的值就是x，如果x为NULL那么就会返回第二个参数y的值。有点三目运算符的味道。我们来看一个具体的例子

library(rlang)1 %||% 2#[1] 1
NULL %||% 2#[1] 2

其实在其他的一些R包里面这个函数用到的也很多，比如ggplot2这个包里面就用到了

 function (data, params) { hjust <- params$hjust %||% 0.5 vjust <- params$vjust %||% 0.5 w <- resolution(data$x, FALSE) h <- resolution(data$y, FALSE) datax - w * (1 - hjust) datax + w * hjust datay - h * (1 - vjust) datay + h * vjust data}

还有分析单细胞测序数据的Seurat这个包里面也用到了

DimHeatmap <- function( object, dims = 1, nfeatures = 30, cells = NULL, reduction = 'pca', disp.min = -2.5, disp.max = NULL, balanced = TRUE, projected = FALSE, ncol = NULL, fast = TRUE, raster = TRUE, slot = 'scale.data', assays = NULL, combine = TRUE) { ncol <- ncol %||% ifelse(test = length(x = dims) > 2, yes = 3, no = length(x = dims)) plots <- vector(mode = 'list', length = length(x = dims)) assays <- assays %||% DefaultAssay(object = object) disp.max <- disp.max %||% ifelse( test = slot == 'scale.data', yes = 2.5, no = 6 )

长按二维码发现惊喜

独阅乐不如众阅乐