Scripting with R