|
|
A048348
|
|
a(n)^2 is the smallest square containing exactly n 3's.
|
|
2
|
|
|
6, 56, 586, 1156, 11547, 57735, 559769, 1197219, 6582806, 36514844, 350903624, 1798230611, 1825769244, 48304278624, 11547014044, 577333277556, 1527394295306, 6582576498844, 57465931849517
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
a[n_] := Block[{k=1}, While[DigitCount[k^2, 10, 3] != n, k++]; k]; Array[a, 6] (* Giovanni Resta, Jul 27 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|