Upload cost only R script