Nothing
# context("normalization of Pareto front")
# test_that("normalizeFront works well", {
# pf = matrix(runif(20L, min = 5, max = 50), ncol = 10L)
# # now normalize
# pfn = normalizeFront(pf)
# # in each dimension there is one zero point
# expect_equal(sum(pfn == 0), 2L)
# # all point should be between 0 and 1
# expect_true(all(pfn >= 0 & pfn <= 1))
# })
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.