A184813 n+[nr/s]+[nt/s], where r=sqrt(2), s=sqrt(3), t=sqrt(5), and []=floor.
2, 5, 8, 12, 15, 17, 21, 24, 27, 30, 33, 36, 39, 43, 46, 49, 51, 55, 58, 61, 65, 67, 70, 73, 77, 80, 83, 86, 89, 92, 96, 99, 101, 104, 108, 111, 114, 118, 120, 123, 126, 130, 133, 135, 139, 142, 145, 148, 152, 154, 157, 161, 164, 167, 170, 173, 176, 179, 183, 185, 188, 192, 195, 198
Offset: 1
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
(See A184812.)
-
PARI
a(n) = n + floor(n*sqrt(2/3)) + floor(n*sqrt(5/3)); \\ Michel Marcus, Jul 01 2017
Comments