%I #22 Sep 08 2022 08:44:46
%S 4,8,14,18,24,28,32,38,42,48,52,56,62,66,72,76,82,86,90,96,100,106,
%T 110,114,120,124,130,134,140,144,148,154,158,164,168,172,178,182,188,
%U 192,196,202,206,212,216,222,226,230,236,240,246,250,254,260
%N a(n) = B(n) + c(n) where B(n) is Beatty sequence [ n*sqrt(2) ] and c is the complement of B.
%H Clark Kimberling, <a href="/A022804/b022804.txt">Table of n, a(n) for n = 1..10000</a>
%H <a href="/index/Be#Beatty">Index entries for sequences related to Beatty sequences</a>
%F a(n) = 2*A003151(n) = 2*(n + floor(n*sqrt(2))).
%t Table[2 n + 2 Floor[n*Sqrt[2]], {n, 1, 200}]
%o (PARI) vector(100, n, 2*(n+floor(n*sqrt(2)))) \\ _G. C. Greubel_, Sep 08 2018
%o (Magma) [2*(n + Floor(n*Sqrt(2))): n in [1..100]]; // _G. C. Greubel_, Sep 08 2018
%K nonn
%O 1,1
%A _Clark Kimberling_