args <- commandArgs(trailingOnly = TRUE) # 

for(i in 1:length(args)){
    print(sprintf("第%d个参数是：%s", i, args[i]))
}