diff --git a/Modules/R/R.slurm b/Modules/R/R.slurm
new file mode 100644
index 0000000..07aa45e
--- /dev/null
+++ b/Modules/R/R.slurm
@@ -0,0 +1,16 @@
+#!/bin/bash -l
+
+#SBATCH --nodes 1 
+#SBATCH --ntasks 1 
+#SBATCH --cpus-per-task 1
+#SBATCH --mem 60000
+#SBATCH --time 00:05:00
+ 
+echo STARTING AT `date`
+
+module purge 
+module load intel mkl
+module load R
+./easyscript.R
+ 
+echo FINISHED at `date`
diff --git a/Modules/R/easyscript.R b/Modules/R/easyscript.R
new file mode 100755
index 0000000..95b4302
--- /dev/null
+++ b/Modules/R/easyscript.R
@@ -0,0 +1,9 @@
+#!/usr/bin/env Rscript
+
+a=2+2
+
+write(a,"")
+save.image(file="4.Rdata")
+
+
+
diff --git a/Modules/R/snowfall.R b/Modules/R/snowfall.R
new file mode 100755
index 0000000..046b77e
--- /dev/null
+++ b/Modules/R/snowfall.R
@@ -0,0 +1,18 @@
+#!/usr/bin/env Rscript
+
+# package snowfall must be first installed with
+# install.packages("snowfall")
+# see http://scitas.epfl.ch/kb/Running+R+on+SCITAS+machines
+
+library(snowfall)
+
+# how many cpus do we have?
+
+ncpus <- Sys.getenv('SLURM_CPUS_ON_NODE')
+
+# we are running in parallel.
+# This will take by default all the available cores on a node
+
+sfInit(parallel=TRUE, cpus=ncpus, type="SOCK")
+
+sfStop()
diff --git a/Modules/R/snowfall.slurm b/Modules/R/snowfall.slurm
new file mode 100644
index 0000000..f27cd86
--- /dev/null
+++ b/Modules/R/snowfall.slurm
@@ -0,0 +1,17 @@
+#!/bin/bash -l
+
+#SBATCH --nodes 1-1
+#SBATCH --exclusive
+#SBATCH --mem 60000
+#SBATCH --time 00:05:00
+ 
+echo STARTING AT `date`
+
+module purge 
+module load intel mkl
+module load R
+srun R CMD BATCH ./snowfall.R
+
+srun env
+ 
+echo FINISHED at `date`