This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A226061 #21 Jun 29 2016 00:08:06
%S A226061 0,1,3,8,27,110,538,3149,21622,172348,1549896,15401144,168011252,
%T A226061 2003304293,25928878272,361788001015,5411160126367,86353882249911,
%U A226061 1464841397585335,26323224850512719,499551889319197565
%N A226061 Partial sums of A219661.
%C A226061 a(n) tells the position of (n!)-1 in A219666.
%F A226061 a(n) = a(n-1) + A219661(n-1) with a(1) = 0.
%F A226061 a(n) = A219652(n!-1).
%F A226061 a(n) = A219665(n) - 1.
%t A226061 Accumulate@ Table[Length@ NestWhileList[# - Total@ IntegerDigits[#,
%t A226061 MixedRadix[Reverse@ Range[2, 120]]] &, (n + 1)! - 1, # > n! - 1 &] - 1, {n, 0, 8}] (* _Michael De Vlieger_, Jun 27 2016, Version 10.2 *)
%o A226061 (Scheme, with definec-macro from _Antti Karttunen_'s IntSeq-library):
%o A226061 (definec (A226061 n) (cond ((= 1 n) 0) (else (+ (A226061 (- n 1)) (A219661 (- n 1))))))
%Y A226061 One less than A219665.
%Y A226061 Cf. A219661, A219666.
%Y A226061 Analogous sequence for binary system: A218600.
%Y A226061 Cf. also A230410, A231719.
%K A226061 nonn
%O A226061 1,3
%A A226061 _Antti Karttunen_, May 28 2013
%E A226061 Terms a(16) - a(21) computed from the new terms of A219661 by _Antti Karttunen_, Jun 27 2016