tests/testthat/test-extract.R
In mhahsler/arules: Mining Association Rules and Frequent Itemsets
library("arules")
library("testthat")
context("extract")
data("Adult")
expect_equal(Adult, c(Adult[1:100], Adult[-(1:100)]))
ec <- eclat(Adult,control=list(verb=FALSE))
expect_equal(ec, c(ec[1:100], ec[-(1:100)]))
i <- items(ec)
expect_equal(i, c(i[1:100,], i[-(1:100),]))
mhahsler/arules documentation built on March 19, 2024, 5:45 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.
library("arules")
library("testthat")
context("extract")
data("Adult")
expect_equal(Adult, c(Adult[1:100], Adult[-(1:100)]))
ec <- eclat(Adult,control=list(verb=FALSE))
expect_equal(ec, c(ec[1:100], ec[-(1:100)]))
i <- items(ec)
expect_equal(i, c(i[1:100,], i[-(1:100),]))
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.