|
| |
|
|
A104266
|
|
Largest n-digit square with no zero digits.
|
|
2
| |
|
|
9, 81, 961, 9216, 99856, 978121, 9998244, 99321156, 999887641, 9978811236, 99999515529, 999332111556, 9999995824729, 99978881115136, 999999961946176, 9999333211115556, 99999999356895225, 999978918111112681
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| a(3) = Max{...., 729, 784, 841, 961} = 961.
|
|
|
MATHEMATICA
| f[n_] := Block[{k = Floor[ Sqrt[10^n]]}, While[ Union[ IntegerDigits[ k^2]][[1]] == 0, k-- ]; k^2]; Table[ f[n], {n, 18}] (from Robert G. Wilson v Mar 03 2005)
|
|
|
CROSSREFS
| Cf. A104265, A104264, A052041.
Sequence in context: A113361 A180737 A068881 * A061433 A069659 A110853
Adjacent sequences: A104263 A104264 A104265 * A104267 A104268 A104269
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), Feb 26 2005
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Mar 03 2005
|
| |
|
|
