Skip to contents

[Maturing]

Tar inn to logiske vektorer a og b, og gir ut en logisk vektor som elementvis sier om a = TRUE er ekvivalent med b = TRUE.

Usage

ekviv(a, b)

a %ekviv% b

Arguments

a

Logisk vektor som elementvis skal sjekkes mot b.

b

Logisk vektor som elementvis skal sjekkes mot a.

Value

Logisk vektor som elementvis sier om a = TRUE er ekvivalent med b = TRUE.

Details

Funksjonen tar inn to logiske vektorer a og b, sjekker elementvis om a = TRUE er ekvivalent med b = TRUE.

Den gir ut en logisk vektor som er TRUE for hvert elementpar fra a og b der både a og b = TRUE, eller både a og b = FALSE eller NA, og FALSE ellers. Den gir altså ut FALSE for elementpar som motstrider at a = TRUE er ekvivalent med b = TRUE.

Funksjonen tilsvarer altså a == b, men håndterer NA som FALSE.

Hvis a og b har ulik lengde blir den korteste brukt på ny nødvendig antall ganger, likt som for logiske operatorer. Se base::Logic for detaljer.

Functions

  • a %ekviv% b: ekviv() som infiks-operator

Examples

library(tibble)

d = tribble(
  ~pas_id, ~operert, ~komplikasjoner,
  1, "Ja", "Nei",
  2, "Ja", "Nei",
  3, "Nei", NA,
  4, "Nei", NA,
  5, "Ja", "Ja"
)

er_operert = d$operert == "Ja"
komplikasjoner_registrert = !is.na(d$komplikasjoner)

# Sjekk om alle som er operert har ein verdi
# registrert i variabelen komplikasjoner
ekviv(er_operert, komplikasjoner_registrert)
#> [1] TRUE TRUE TRUE TRUE TRUE

# Eller som infiks-operator
er_operert %ekviv% komplikasjoner_registrert
#> [1] TRUE TRUE TRUE TRUE TRUE