login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A064473 Where the odd terms appear in A064413 (if it begins at 2). 1

%I

%S 4,5,9,10,13,14,19,20,21,23,24,27,28,32,33,36,37,38,42,43,49,50,52,53,

%T 56,57,60,61,66,67,68,73,74,75,77,80,81,83,84,88,89,92,95,96,99,100,

%U 106,107,108,110,111,114,115,117,118,123,124,127,128

%N Where the odd terms appear in A064413 (if it begins at 2).

%H J. C. Lagarias, E. M. Rains and N. J. A. Sloane, <a href="http://arXiv.org/abs/math.NT/0204011">The EKG sequence</a>, Exper. Math. 11 (2002), 437-446.

%H <a href="/index/Ed#EKG">Index entries for sequences related to EKG sequence</a>

%t ekg[s_] := Block[{m = s[[-1]], k = 3}, While[MemberQ[s, k] || GCD[m, k] == 1, k++]; Append[s, k]];

%t EKG = Nest[ekg, {1, 2}, 200] // Rest;

%t Position[EKG, _?OddQ] // Flatten (* _Jean-Fran├žois Alcover_, Feb 07 2019, after _Robert G. Wilson v_ in A064413 *)

%Y Cf. A064413. See A064957 for better version.

%K nonn

%O 1,1

%A _N. J. A. Sloane_, Oct 05 2001

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 15 18:47 EDT 2019. Contains 327083 sequences. (Running on oeis4.)