1,3

Antti Karttunen, Table of n, a(n) for n = 1..20879

Index entries for sequences related to 3x+1 (or Collatz) problem

(PARI)

A014682(n) = (if(n%2, 3*n+1, n)/2);

A334206(n) = if(1==n, n-1, if(isprime(n), 1+A334206(A014682(n)), my(f=factor(n)); (apply(A334206, f[, 1])~ * f[, 2])));

Cf. A014682.

Cf. also A064097, A334200.

Sequence in context: A202494 A112597 A257700 * A006666 A267830 A163334

Adjacent sequences: A334203 A334204 A334205 * A334207 A334208 A334209

nonn

Antti Karttunen, May 13 2020

approved