inst/tinytest/test_colon.R

test_colon <- function() {

  d <- data.frame(t = 1:2)
  r <- d %.>% extend(., u = 4:5)
  expect_equal(data.frame(t = 1:2, u = 4:5), r)

  invisible(NULL)
}

test_colon()

Try the rqdatatable package in your browser

Any scripts or data that you put into this service are public.

rqdatatable documentation built on Aug. 21, 2023, 9:10 a.m.