Add a nontrivial test for Rscript