expected <- eval(parse(text="c(-3.14159265358979, -2.14159265358979, -1.14159265358979, -0.141592653589793, 0.858407346410207, 1.85840734641021, 2.85840734641021)"));             
test(id=0, code={             
argv <- eval(parse(text="list(-3.14159265358979, 3.14159265358979)"));             
do.call(`:`, argv);             
}, o=expected);             

