tests/testthat/test-dssCut.R
In IulianD/dsSwissKnifeClient: DataSHIELD Tools and Utilities - client side
test_that("dssCut works", {
dssSubset('iris2', 'iris', '1==1', datasources = opals["local1"])
dssCut('Sepal.Length', df = 'iris2', in.place = TRUE, breaks = 2, labels = c('low', 'high'), datasources = opals["local1"])
x <- dssShowFactors('iris2', datasources = opals["local1"])
expect_equal(x$local1$Sepal.Length, c('low', 'high'))
})
IulianD/dsSwissKnifeClient documentation built on June 23, 2020, 4:38 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.
test_that("dssCut works", {
dssSubset('iris2', 'iris', '1==1', datasources = opals["local1"])
dssCut('Sepal.Length', df = 'iris2', in.place = TRUE, breaks = 2, labels = c('low', 'high'), datasources = opals["local1"])
x <- dssShowFactors('iris2', datasources = opals["local1"])
expect_equal(x$local1$Sepal.Length, c('low', 'high'))
})
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.