tests/testthat/test-is_integer.R

test_that("is_integer works", {
  expect_equal(is_integer(3), TRUE)
  expect_equal(is_integer(-3), TRUE)
  expect_equal(is_integer(3L), TRUE)
  expect_equal(is_integer(3.1), FALSE)
  expect_equal(is_integer("3"), FALSE)
})
flrd/ggpointless documentation built on July 25, 2024, 7:15 p.m.