Nothing
library(COSNet)
test_generate_labels <- function() {
nitems <- 1000
pos.rate <- 0.2;
labels <- generate_labels(nitems, pos.rate);
checkEquals(length(labels), nitems)
checkTrue(min(labels) == -1 || min(labels) == 1);
checkTrue(max(labels) == -1 || max(labels) == 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.