|
|
A219665
|
|
One more than the partial sums of A219661.
|
|
8
|
|
|
1, 2, 4, 9, 28, 111, 539, 3150, 21623, 172349, 1549897, 15401145, 168011253, 2003304294, 25928878273, 361788001016, 5411160126368, 86353882249912, 1464841397585336, 26323224850512720, 499551889319197566
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Are there any cases after n>2, for which A219666(a(n)) = n! instead of n!+1 ? (At least for all terms a(3) - a(14) that number is n!+1.)
Compare to the conjecture given at A213710.
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Accumulate@ Table[Length@ NestWhileList[# - Total@ IntegerDigits[#, MixedRadix[Reverse@ Range[2, 120]]] &, (n + 1)! - 1, # > n! - 1 &] - 1, {n, 0, 8}] + 1 (* Michael De Vlieger, Jun 27 2016, Version 10.2 *)
|
|
PROG
|
|
|
CROSSREFS
|
Cf. also A213710 (analogous sequence for base-2).
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|