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.

A352196 a(n) = number of steps for the standard mod-n Ackermann function to stabilize to a set consisting of only one value, or -1 if it does not stabilize.

Original entry on oeis.org

0, 2, 4, 3, 5, 4, 6, 3, 6, 5, 6, 4, 6, 4, 4, 4, 6, 4, 7, 4, 4, 5, 6, 4, 8, 4, 6, 4, 7, 4, 6, 5, 7, 6, 4, 4, 7, 6, 4, 4, 7, 4, 5, 5, 4, 5, 6, 4, 6, 5, 5, 4, 9, 5, 8, 4, 6, 6, 6, 4, 7, 5, 4, 5, 4, 5, 8, 5, 8, 4, 7, 4, 6, 6, 7, 6, 7, 4, 7, 4, 9, 6, 8, 4, 5, 5, 7, 5, 9, 4, 4, 5, 5, 5, 6, 5, 5, 6, 6, 5, 8, 5, 7, 4, 4, 6, 5, 5, 8, 6, 7, 4, 8, 5, 7, 5, 4, 7, 6
Offset: 1

Views

Author

N. J. A. Sloane, Mar 23 2022

Keywords

Comments

This was Stan Wagon's Problem of the Week #1340, from March 2022, which in turn was based on a 1993 Monthly problem of Jon Froemke and Jerrold Grossman.
Stan Wagon mentions that Mark Rickert has found the first 8 million terms (see link), and the only one that does not stabilize is n = 1969 where it becomes periodic with period 2 after 8 steps. So a(1969) = -1.
[Needs program(s), b-file. - N. J. A. Sloane, May 25 2025]

Crossrefs

Cf. A085119.

Extensions

"Standard" added to definition by N. J. A. Sloane, May 25 2025 to be consistent with the Froemke-Grossman (1993) article.

A383460 13 X oo array read by antidiagonals, giving the values of the standard mod 13 Ackermann function.

Original entry on oeis.org

1, 2, 2, 3, 3, 3, 5, 5, 4, 4, 0, 0, 7, 5, 5, 5, 5, 3, 9, 6, 6, 9, 9, 6, 9, 11, 7, 7, 9, 9, 5, 2, 8, 0, 8, 8, 9, 9, 9, 9, 3, 6, 2, 9, 9, 9, 9, 9, 9, 5, 9, 2, 4, 10, 10, 9, 9, 9, 9, 9, 9, 11, 7, 6, 11, 11, 9, 9, 9, 9, 9, 9, 5, 1, 4, 8, 12, 12
Offset: 0

Views

Author

N. J. A. Sloane, May 30 2025

Keywords

Comments

The sixth and later columns consist of all 9's, and so the antidiagonals beyond that point also consist of all 9's.

Examples

			The first few antidiagonals are:
  1,
  2, 2,
  3, 3, 3,
  5, 5, 4, 4,
  0, 0, 7, 5, 5,
  5, 5, 3, 9, 6, 6,
  9, 9, 6, 9, 11, 7, 7,
  9, 9, 5, 2, 8, 0, 8, 8,
  9, 9, 9, 9, 3, 6, 2, 9, 9,
  ...
		

Crossrefs

Cf. A085119.

Programs

  • Mathematica
    n=12;a[i_,j_]:=a[i,j]=If[i==0,Mod[j+1,13],If[j==0,a[i-1,1],a[i-1,a[i,j-1]]]]; Flatten@Table[Diagonal[Reverse@Table[a[i,j],{i,0,n},{j,0,n}],k-n-1],{k,n}] (* Giorgos Kalogeropoulos, May 31 2025 *)

Extensions

More terms from Giorgos Kalogeropoulos, May 31 2025
Showing 1-2 of 2 results.