login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A336994 Entries of A336938 without duplicates. 0
0, 4, 16, 52, 160, 9232, 13120, 39364, 41524, 250504, 1276936, 6810136, 8153620, 27114424, 50143264, 106358020, 121012864, 593279152, 1570824736, 2482111348, 2798323360, 17202377752 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
Is this (apart from the first 2 entries) the same as A006885? - R. J. Mathar, Aug 16 2020
LINKS
PROG
(PARI) firstMiss(A) = { my(i); if(#A == 0 || A[1] > 0, return(0)); for(i = 1, A[#A] + 1, if(!setsearch(A, i), return(i))); };
iter(A) = { my(a = firstMiss(A)); while(!setsearch(A, a), A = setunion(A, Set([a])); a = if(a % 2, 3*a+1, a/2)); A; };
makeVec(m) = { my(v = [], A = Set([0]), i); for(i = 1, m, if (length(v) == 0 || v[length(v)] != A[#A], v = concat(v, A[#A])); if (i < m, A = iter(A))); v; };
makeVec(10000)
CROSSREFS
Cf. A336938.
Sequence in context: A197132 A266943 A100774 * A107767 A319775 A220936
KEYWORD
nonn,more
AUTHOR
Markus Sigg, Aug 10 2020
EXTENSIONS
a(16)-a(22) from Jinyuan Wang, Aug 13 2020
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 11 01:12 EDT 2024. Contains 372388 sequences. (Running on oeis4.)