#!/bin/sh

RIB_HOME="/home/caster/diplomka/rib"

cat $RIB_HOME/ribplot.R > defplot.R

$RIB_HOME/ribplot --param_combs

echo 'param_tbl <- read.table("rib.param_combs", header=TRUE)' >> defplot.R
echo "ribplot_default(param_tbl, result_names)" >> defplot.R

R --no-save --no-restore < defplot.R