cp's OEIS Frontend

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.

User: Irene Sermon

Irene Sermon's wiki page.

Irene Sermon has authored 4 sequences.

A230725 Digital sum of tribonacci numbers with a(0)=a(1)=a(2)=1.

Original entry on oeis.org

1, 1, 1, 3, 5, 9, 8, 4, 12, 6, 13, 13, 14, 4, 13, 13, 21, 20, 18, 32, 25, 21, 33, 25, 43, 20, 16, 25, 16, 21, 53, 36, 38, 46, 48, 51, 46, 64, 44, 55, 46, 46, 48, 41, 45, 53, 58, 57, 60, 49, 58, 59, 67, 58, 76, 57, 65, 72, 77, 61
Offset: 0

Author

Irene Sermon, Oct 28 2013

Keywords

Examples

			In the tribonacci sequence with initial values a(0)=a(1)=a(2)=1, the 30th term is 37895489. Its digital sum is 53.
		

Crossrefs

Cf. A000213.

Programs

  • Mathematica
    Total[IntegerDigits[#]]&/@LinearRecurrence[{1,1,1},{1,1,1},60] (* Harvey P. Dale, Mar 18 2025 *)
  • Sage
    L=[1,1,1]
    n=100 #change for more terms
    for i in [3..n]:
        L.append(L[i-3]+L[i-2]+L[i-1])
    [sum(x.digits(base=10)) for x in L] # Tom Edgar, Nov 09 2013

Formula

a(n) = A007953(A000213(n)).

A230724 Digital sum of tribonacci numbers with a(0)=a(1)=0, a(2)=1.

Original entry on oeis.org

0, 0, 1, 1, 2, 4, 7, 4, 6, 8, 9, 14, 13, 9, 18, 13, 13, 26, 16, 19, 25, 15, 14, 18, 20, 34, 36, 36, 25, 34, 32, 37, 40, 46, 42, 47, 45, 35, 37, 36, 45, 37, 55, 47, 58, 43, 49, 42, 62, 63, 41, 58, 45, 63, 67, 76, 71, 43, 73, 70, 60, 86, 63, 83, 61, 72, 99, 88, 61
Offset: 0

Author

Irene Sermon, Oct 28 2013

Keywords

Examples

			In the tribonacci series with initial terms a(0)=a(1)=0 and a(2)=1, the 30th term is 15902591. Its digital sum is 32.
		

Crossrefs

Cf. A000073.

Programs

  • Mathematica
    t = LinearRecurrence[{1, 1, 1}, {0, 0, 1}, 60]; Total /@ IntegerDigits /@ t (* T. D. Noe, Oct 30 2013 *)

Formula

a(n) = A007953(A000073(n)).

A227881 Sum of digits of 17^n.

Original entry on oeis.org

1, 8, 19, 17, 19, 35, 37, 35, 55, 71, 55, 62, 64, 80, 91, 80, 109, 98, 91, 98, 82, 116, 136, 143, 109, 152, 163, 152, 145, 152, 172, 170, 172, 170, 208, 215, 199, 197, 226, 233, 217, 206, 271, 224, 244, 242, 253, 287, 244, 305, 271, 269, 298, 305, 325, 314
Offset: 0

Author

Irene Sermon, Oct 25 2013

Keywords

Examples

			For n = 8, 17^8 = 6975757441 and the digit sum is 55.
		

Crossrefs

Programs

  • Mathematica
    Table[Total[IntegerDigits[17^n]], {n, 0, 100}] (* T. D. Noe, Oct 28 2013 *)

Formula

a(n) = A007953(A001026(n)).

A227871 Sum of digits of 14^n.

Original entry on oeis.org

1, 5, 16, 17, 22, 29, 37, 23, 52, 44, 67, 65, 73, 68, 52, 80, 85, 83, 100, 122, 106, 116, 130, 137, 118, 140, 124, 152, 166, 173, 136, 158, 178, 179, 202, 128, 199, 176, 187, 206, 220, 227, 244, 230, 232, 224, 256, 272, 253, 275, 268, 278, 301, 272, 298, 257
Offset: 0

Author

Irene Sermon, Oct 25 2013

Keywords

Examples

			For n=9, 14^9=20661046784 and the sum of the digits is 44.
		

Crossrefs

Programs

  • Mathematica
    Total[IntegerDigits[#]]&/@(14^Range[0,60]) (* Harvey P. Dale, Jul 18 2019 *)

Formula

a(n) = A007953(A001023(n)).