|
| |
|
|
A025624
|
|
Numbers of form 5^i*9^j, with i, j >= 0.
|
|
1
| |
|
|
1, 5, 9, 25, 45, 81, 125, 225, 405, 625, 729, 1125, 2025, 3125, 3645, 5625, 6561, 10125, 15625, 18225, 28125, 32805, 50625, 59049, 78125, 91125, 140625, 164025, 253125, 295245, 390625, 455625, 531441, 703125, 820125, 1265625, 1476225, 1953125
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
MATHEMATICA
| f[upto_]:=Module[{maxi=Ceiling[Log[5, upto]], maxj=Ceiling[Log[9, upto]], s}, s=Union[Flatten[Outer[Times, 5^Range[0, maxi], 9^Range[0, maxj]]]]; Select[s, #<=upto&]]; f[2000000] (* From Harvey P. Dale, Mar 27 2011 *)
|
|
|
CROSSREFS
| Sequence in context: A024825 A147074 A147192 * A147496 A147383 A127976
Adjacent sequences: A025621 A025622 A025623 * A025625 A025626 A025627
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| David W. Wilson (davidwwilson(AT)comcast.net)
|
| |
|
|
