|
|
A114808
|
|
The numbers 5^n-1 written in groups of three digits, with leading zeros omitted.
|
|
2
|
|
|
424, 124, 624, 312, 415, 624, 781, 243, 906, 241, 953, 124, 976, 562, 448, 828, 124, 244, 140, 624, 122, 70, 312, 461, 35, 156, 243, 51, 757, 812, 415, 258, 789, 62, 476, 293, 945, 312, 438, 146, 972, 656, 241, 907, 348, 632, 812, 495, 367, 431, 640, 624, 476, 837, 158, 203, 124, 238, 418, 579
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
4, 24, 124, 624, 3124, 15624, ...
|
|
MAPLE
|
L := [] ;
for n from 1 to 30 do
dggs := ListTools[Reverse](convert(5^n-1, base, 10) );
L := [op(L), op(dggs)] ;
end do:
for k from 1 to nops(L)-3 by 3 do
op(k, L)*100+op(k+1, L)*10+op(k+2, L) ;
printf("%d, ", %) ;
|
|
MATHEMATICA
|
FromDigits[#] & /@ Partition[ Flatten@ IntegerDigits@ Table[5^n - 1, {n, 22}], 3] (* Robert G. Wilson v, Jun 23 2014 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,dumb,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|