expected <- eval(parse(text="c(-1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA, -1.74520963996789, -1.58308930128988, NA)"));            
test(id=0, code={            
argv <- eval(parse(text="list(c(-1.74520963996789, -1.58308930128988, NA), 100L)"));            
.Internal(rep.int(argv[[1]], argv[[2]]));            
}, o=expected);            

