Cpp While Loop Syntax In R