Table[n + Ceiling[(n - 3+0.001)/3] , {n, 0, 10}]