A107988 Numbers of the form (4^i)*(11^j), with i, j >= 0.

1, 4, 11, 16, 44, 64, 121, 176, 256, 484, 704, 1024, 1331, 1936, 2816, 4096, 5324, 7744, 11264, 14641, 16384, 21296, 30976, 45056, 58564, 65536, 85184, 123904, 161051, 180224, 234256, 262144, 340736, 495616, 644204, 720896, 937024, 1048576

Offset: 1

Author

Douglas Winston (douglas.winston(AT)srupc.com), Jun 12 2005

Keywords

• nonn

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Crossrefs

Subsequence of A003596.

Cf. A025617, A025618, A025619, A025620, A025621, A107462, A003597, A003598, A003599, A108090.

Programs

Haskell

import Data.Set (singleton, deleteFindMin, insert)
a107988 n = a107988_list !! (n-1)
a107988_list = f $ singleton (1,0,0) where
   f s = y : f (insert (4 * y, i + 1, j) $ insert (11 * y, i, j + 1) s')
         where ((y, i, j), s') = deleteFindMin s
-- Reinhard Zumkeller, May 15 2015

Mathematica

n = 10^6; Flatten[Table[4^i*11^j, {i, 0, Log[4, n]}, {j, 0, Log[11, n/4^i]}]] // Sort (* Amiram Eldar, Sep 24 2020 *)

Formula

Sum_{n>=1} 1/a(n) = (4*11)/((4-1)*(11-1)) = 22/15. - Amiram Eldar, Sep 24 2020

a(n) ~ exp(sqrt(2*log(4)*log(11)*n)) / sqrt(44). - Vaclav Kotesovec, Sep 24 2020