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-5 of 5 results.

A152837 a(0)=-1; a(n)=Floor[n^a(n-1)-a(n-1)^n].

Original entry on oeis.org

-1, 2, 0, 1, 3, -118, -2699554153024, 1044826807337428519663920677057429215016680080584103502827667086054551857192770337767423
Offset: 0

Views

Author

Keywords

Examples

			a(1) = 1^(-1)-(-1)^1 = 2. - R. J. Mathar, Jan 08 2009
		

Crossrefs

Programs

  • Mathematica
    lst={};a=1;Do[a=n^a-a^n;AppendTo[lst,Floor[a]],{n,0,7}];lst

Extensions

Indices added to definition, offset corrected - R. J. Mathar, Jan 08 2009

A152838 a(0)=1; a(n)=Floor[a(n-1)^n-n^a(n-1)].

Original entry on oeis.org

1, 0, -1, -2, 3, 118, -199068134034785153195409370979964879499768447341765846329146257207125965412281784631240438088
Offset: 0

Views

Author

Keywords

Examples

			a(1) = 1^1-1^1 = 0. - R. J. Mathar, Jan 08 2009
		

Crossrefs

Programs

  • Mathematica
    lst={};a=1;Do[a=a^n-n^a;AppendTo[lst,Floor[a]],{n,0,6}];lst

Extensions

Indices added to definition, offset corrected - R. J. Mathar, Jan 08 2009

A152839 a(0) = 0; a(n) = n! - a(n-1)!.

Original entry on oeis.org

0, 0, 1, 5, -96
Offset: 0

Views

Author

Keywords

Crossrefs

Extensions

Indices added to definition, offset corrected - R. J. Mathar, Jan 08 2009
Definition corrected by Georg Fischer, Jun 03 2025

A152840 a(0) = -1; a(n) = n^(n+a(n-1)) - a(n-1)^(n+a(n-1)).

Original entry on oeis.org

-1, 0, 4, -14197
Offset: 0

Views

Author

Keywords

Crossrefs

Programs

  • Mathematica
    lst={};a=1;Do[a=n^(n+a)-a^(n+a);AppendTo[lst,a],{n,0,3}];lst

Extensions

Indices added to definition, offset corrected - R. J. Mathar, Jan 08 2009
Definition corrected by Georg Fischer, Jun 03 2025

A152841 a(0)=1; a(n)=Floor[n^(n+a(n-1))-a(n-1)^(n+a(n-1))].

Original entry on oeis.org

1, 0, -4, -1, -115, -1
Offset: 0

Views

Author

Keywords

Crossrefs

Programs

  • Mathematica
    lst={};a=1;Do[a=a^(n+a)-n^(n+a);AppendTo[lst,Floor[a]],{n,0,5}];lst

Extensions

Indices added to definition, offset corrected - R. J. Mathar, Jan 08 2009
Showing 1-5 of 5 results.