Content - f0b37f9a410cdb2cc308c15fc8abfa19552da12c - e0767e0/R/backports.R

swh:1:snp:cadb242f1f2b536450c3e647ffb173ab4a173342

Tip revision: ebb4d406af6a7168582caf0094830bc559b472a7 authored by Dominique Makowski on 02 May 2022, 06:40:03 UTC
version 0.12.1

Tip revision: ebb4d40

backports.R

isTRUE <- function(x) {
  is.logical(x) && length(x) == 1L && !is.na(x) && x
}


isFALSE <- function(x) {
  is.logical(x) && length(x) == 1L && !is.na(x) && !x
}