tests/testthat/test-tee.r
In smbache/magrittr: A Forward-Pipe Operator for R
context("tee pipe")
test_that("Tee pipe related functionality works.", {
dim_message <- function(data.)
message(sprintf("Data has dimension %d x %d", NROW(data.), NCOL(data.)))
expect_that(iris %T>% dim_message, shows_message(dim_message(iris)))
expect_that(iris %T>% dim_message, is_identical_to(iris))
})
smbache/magrittr documentation built on March 18, 2023, 6:21 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
context("tee pipe")
test_that("Tee pipe related functionality works.", {
dim_message <- function(data.)
message(sprintf("Data has dimension %d x %d", NROW(data.), NCOL(data.)))
expect_that(iris %T>% dim_message, shows_message(dim_message(iris)))
expect_that(iris %T>% dim_message, is_identical_to(iris))
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.