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!)
A039503 Odd numbers from A039500. 1

%I

%S 1,3,11,15,29,39,43,53,57,59,65,69,71,77,79,85,87,95,97,101,103,105,

%T 113,115,127,129,135,137,141,145,151,155,157,169,171,173,183,189,193,

%U 201,205,207,211,217,227,231,235,245,249,253,259,269,273,275,283,289

%N Odd numbers from A039500.

%t colln[n_]:= NestWhile[If[EvenQ[#], #/2, 3#-1] &, n, FreeQ[{1, 5, 17}, #] &]; Select[Range[1, 289, 2], colln[#] == 1 &] (* _Jayanta Basu_, Jun 06 2013 *)

%Y Cf. A037084, A039500-A039505.

%K nonn,easy

%O 1,2

%A _Christian G. Bower_, Feb 15 1999

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 September 29 17:46 EDT 2022. Contains 357090 sequences. (Running on oeis4.)