

A051211


Numbers of the form x^29^y >= 0.


2



0, 3, 7, 8, 15, 16, 19, 24, 27, 35, 40, 48, 55, 63, 72, 80, 88, 91, 99, 112, 115, 120, 135, 143, 144, 160, 163, 168, 171, 175, 187, 195, 208, 216, 224, 232, 243, 247, 255, 280, 288, 295, 315, 319, 323, 328, 352, 360, 391, 399, 403, 427, 432, 440, 448, 475, 483
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


LINKS

Table of n, a(n) for n=1..57.


MATHEMATICA

max = 500; Clear[f]; f[m_] := f[m] = Select[Table[x^2  9^y, {y, 0, m}, {x, Floor[9^(y/2)], Ceiling[Sqrt[9^y + max]]}] // Flatten // Union, 0 <= # <= max &]; f[1]; f[m = 2]; While[f[m] != f[m  1], m++]; Print["m = ", m]; A051211 = f[m] (* JeanFrançois Alcover, May 14 2017 *)


CROSSREFS

Sequence in context: A309745 A002381 A131559 * A105173 A309197 A076683
Adjacent sequences: A051208 A051209 A051210 * A051212 A051213 A051214


KEYWORD

nonn


AUTHOR

David W. Wilson


STATUS

approved



