all_equal: Checks if all arguments are equal

In MyKo101/mutils: Various utility functions to make data processing smoother

Description

Uses identical() (or some other comparison function) to check if every argument is equal to one another.

Usage

all_equal(..., .check = identical)

check_all_equal(..., .check = identical)

Arguments

...	arguments to be compared
.check	alternative function to be used to compare the arguments

Examples

df <- tibble::tibble(x = runif(10), y = runif(10))
df2 <- df
df3 <- df
df4 <- df

# To ensure the three variables have been copied
df$z <- 1
df2$z <- 1
df3$z <- 1
df4$z <- 2

all_equal(df, df2, df3)
all_equal(df, df2, df4)

new_df <- check_all_equal(df, df2, df3)
## Not run: 
check_all_equal(df, df4)

## End(Not run)


x <- 1
y <- 1
z <- 1

all_equal(x, y, z, .check = magrittr::equals)

w <- check_all_equal(x, y, z, .check = magrittr::equals)
## Not run: 
check_all_equal(x, y, z, 2, .check = magrittr::equals)
check_all_equal(x, 2, .check = magrittr::equals)

## End(Not run)

MyKo101/mutils documentation built on July 28, 2020, 8:52 p.m.