f = tempname ();
fid = fopen (f, "w+");
fprintf (fid, "1\r\n2\r3\n4\r\n5\n6");
fseek (fid, 0, "bof");
c = textscan (fid, "%f %f", 4);
fclose (fid);
unlink (f);
assert (c, {[1;3], [2;4]});