#!/usr/bin/env Rscript a=2+2 write(a,"") save.image(file="4.Rdata")