#!/usr/bin/env Rscript
# make_data.R
# usage is Rscript make_data.R datamaker.R seed scenario
arguments <- commandArgs(trailingOnly=TRUE)
filename = arguments[1]
seed = as.integer(arguments[2])
scenario=arguments[3]
indexlist = list(seed=seed,scenario=scenario)
library("dscr")
source(filename) #filename should define a function parammaker
dir.create(data_subdir(indexlist),recursive=TRUE)
do.call(datamaker,list(indexlist))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.