#! /usr/bin/Rscript
cat(Sys.getpid())
suppressPackageStartupMessages(library(RzmqJobQueue))
library(RzmqJobQueue)
argv <- commandArgs(trailingOnly=TRUE)
init_worker(argv[1], argv[2])
while(TRUE) {
do_job(argv[1], argv[2])
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.