This is Guo-bo's R function for easily submitting jobs to the cluster