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

不知道大家有没有在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

  )

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