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.

Showing 1-2 of 2 results.

A100963 a(1)=1. a(n) = a(n-1) + sum of the triangular numbers which are among the first (n-1) terms of the sequence.

Original entry on oeis.org

1, 2, 3, 7, 11, 15, 34, 53, 72, 91, 201, 311, 421, 531, 641, 751, 861, 1832, 2803, 3774, 4745, 5716, 6687, 7658, 8629, 9600, 10571, 11542, 12513, 13484, 14455, 15426, 16397, 17368, 18339, 19310, 20281, 21252, 22223, 23194, 24165, 25136, 26107, 27078, 28049
Offset: 1

Views

Author

Leroy Quet, Jun 07 2007

Keywords

Crossrefs

Programs

  • Mathematica
    Nest[Append[#, Last@ # + Total@ Select[#, IntegerQ@ First@ Values@ Last@ Solve[x (x + 1)/2 == #, x] &]] &, {1}, 44] (* Michael De Vlieger, Sep 24 2017 *)
  • PARI
    vector(100, n, if(n==1, a_n_1=sum_=1, a_n_1+=sum_; if(ispolygonal(a_n_1, 3), sum_+=a_n_1)); a_n_1) \\ Colin Barker, Feb 19 2015

Extensions

More terms from Robert Gerbicz, Jun 10 2007

A255261 a(n) = a(n-1) + sum of the hexagonal numbers which are among the first (n-1) terms of the sequence, with a(1)=1.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 13, 20, 27, 34, 41, 48, 55, 62, 69, 76, 83, 90, 97, 104, 111, 118, 125, 132, 139, 146, 153, 313, 473, 633, 793, 953, 1113, 1273, 1433, 1593, 1753, 1913, 2073, 2233, 2393, 2553, 2713, 2873, 3033, 3193, 3353, 3513, 3673, 3833, 3993, 4153
Offset: 1

Views

Author

Colin Barker, Feb 20 2015

Keywords

Examples

			a(8) = 20 because a(7) = 13, hexagonal numbers already in the sequence are 1 and 6, and 13+1+6 = 20.
		

Crossrefs

Programs

  • PARI
    vector(100, n, if(n==1, a_n_1=sum_=1, a_n_1+=sum_; if(ispolygonal(a_n_1, 6), sum_+=a_n_1)); a_n_1)
Showing 1-2 of 2 results.