|
|
A036513
|
|
Smallest square containing exactly n 6's.
|
|
4
|
|
|
16, 676, 46656, 1666681, 26666896, 4666665969, 26661664656, 616686666436, 12666666068676, 696626660666596, 16666569616666761, 64666665664666569, 666566667666656964, 16656666666663616576, 6466267667066666666596, 46366666666326666766276
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
|
|
MATHEMATICA
|
a[n_] := Block[{k=1}, While[DigitCount[k^2, 10, 6] != n, k++]; k^2]; Array[a, 6] (* Giovanni Resta, Jul 27 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|