A346592 Numbers k such that A006577(k^2) sets a new record.

2, 3, 5, 7, 10, 11, 22, 35, 45, 49, 51, 77, 123, 143, 269, 419, 429, 765, 1011, 1395, 1989, 2165, 3335, 3827, 7179, 9005, 18010, 36020, 41453, 82906, 92099, 184198, 268509, 272767, 469347, 563273, 1126546, 1224197, 2172433, 2303171, 2825329, 5650658, 9295309, 10741519

Offset

1,1

Links

Table of n, a(n) for n=1..44.

Prog

(PARI) a6577(n0)={my(n=n0, k=0); while(n>1, k++; n=if(n%2, 3*n+1, n/2)); k};
a346592(limit)={msteps=0; for(k=1, limit, my(m=a6577(k^2)); if(m>msteps, print1(k, ", "); msteps=m))};
a346592(1500000)

Crossrefs

Cf. A006577, A006877, A244638, A346591, A346593.

Sequence in context: A317407 A191211 A263133 * A254860 A144726 A123885

Adjacent sequences: A346589 A346590 A346591 * A346593 A346594 A346595

Keyword

nonn

Author

Hugo Pfoertner, Jul 28 2021

Status

approved