Nothing
context ("stacked.offsets")
test_that("BARBITURATES", {
spc <- do.call (collapse, barbiturates [1:4])
stacked.offsets (spc)
})
test_that("add", {
spc <- new ("hyperSpec", spc = matrix (c (0, 0, 2, 1 : 3), nrow = 3))
stacked.offsets (spc, add.factor = 0)
stacked.offsets (spc, add.factor = 1)
stacked.offsets (spc, add.sum = 1)
})
test_that("zero", {
stacked.offsets (flu, min.zero = TRUE)
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.