OFFSET
2,1
COMMENTS
Note that if we treated 31 like the other primes, we would enter the infinite loop 31, 47, 71, 107, 161, 81, 41, 31. Are there any remaining infinite loops?
PROG
(PARI) pxp1(m) = { for(x=2, m, n=x; while(n > 1, if(isprime(n), n=n*3+1, if(n%2<>0, n++)); while(n%2==0, n/=2); print1(n", "); if(n==1 || n==31, break); ) ) }
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Aug 02 2003
EXTENSIONS
Edited by Sam Alexander, Jan 05 2005
STATUS
approved