A086080 Number of 9's in decimal expansion of triangular number n(n+1)/2.
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0
Offset: 0
Links
- Antti Karttunen, Table of n, a(n) for n = 0..65537 [shifted by _Georg Fischer_, Apr 28 2021]
Crossrefs
Programs
-
Mathematica
DigitCount[Accumulate[Range[0, 100]], 10, 9] (* Paolo Xausa, May 05 2024 *)
-
PARI
A086080(n) = length(select(d -> (9==d),digits(binomial(n+1,2)))); \\ Antti Karttunen, Sep 27 2018; corrected by Georg Fischer Apr 28 2021
Extensions
Zero at the beginning inserted by Antti Karttunen, Sep 27 2018
Zero at the beginning removed by Georg Fischer, Apr 28 2021