# R CMD BATCH --no-save --no-restore '--args a=1 b=c(2,5,6)' test.r test.out &
args <- commandArgs(TRUE)
if(length(args)==0)
{
print("No arguments supplied.")
##supply default values
a = 1
b = c(1,1,1)
}else
{
for(i in 1:length(args))
{
print(args[i])
print(parse(text=args[[i]]))
print(eval(parse(text=args[[i]])))
}
}
args <- commandArgs(TRUE)
if(length(args)==0)
{
print("No arguments supplied.")
##supply default values
a = 1
b = c(1,1,1)
}else
{
for(i in 1:length(args))
{
print(args[i])
print(parse(text=args[[i]]))
print(eval(parse(text=args[[i]])))
}
}