login
A008902
x->x/2 if x even, x->3x-1 if x odd.
1
99, 296, 148, 74, 37, 110, 55, 164, 82, 41, 122, 61, 182, 91, 272, 136, 68, 34, 17, 50, 25, 74, 37, 110, 55, 164, 82, 41, 122, 61, 182, 91, 272, 136, 68, 34, 17, 50, 25, 74, 37, 110, 55, 164, 82, 41, 122, 61, 182, 91
OFFSET
0,1
COMMENTS
The definition is similar to the definition of the Collatz (or 3x+1) sequence except that instead of 3x+1 it uses 3x-1. - Harvey P. Dale, Jan 20 2026
REFERENCES
R. K. Guy, Unsolved Problems in Number Theory, E16.
LINKS
Index entries for linear recurrences with constant coefficients, signature (0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1).
MATHEMATICA
NestList[If[EvenQ[#], #/2, 3#-1]&, 99, 50] (* Harvey P. Dale, Jan 20 2026 *)
PROG
(PARI) a(n)=if(n>2, 8900968659103151411668874298641981524835525\273^(n%18)%273, [99, 296, 148][n+1]) \\ Charles R Greathouse IV, May 31 2026
CROSSREFS
Sequence in context: A250779 A259995 A125820 * A008882 A156757 A027579
KEYWORD
nonn,easy
STATUS
approved