%I#8 2019年2月13日08:02:07
%S 1,2,3,6,4,5,9,7,12,8,10,11,15,14,13,18,16,17,21,19,20,22,23,24,25,26,
%电话:27,28,30,35,29,33,31,36,32,34,37,39,38,40,41,42,44,43,45,50,46,47,48,
%U 49,52,51,54,53,57,55,56,58,59,60,65,61,63,70,62,64
%N A064413的偶数子序列除以2。
%H J.C.Lagarias、E.M.Rains和N.J.A.Sloane,<A href=“http://arXiv.org/abs/math.NT/0204011“>心电图序列,《实验数学》11(2002),437-446。
%H<a href=“/index/Ed#EKG”>与EKG序列相关的序列的索引条目</a>
%t nmax=120;
%tekg[s_]:=块[{m=s[[-1]],k=3},而[MemberQ[s,k]||GCD[m,k]==1,k++];追加[s,k]];
%t EKG=巢[EKG,{1,2},nmax];
%t选择[EKG,EvenQ]/2(*_Jean-François Alcover_,2019年2月13日,在A064413*中的_Robert G.Wilson v_之后)
%Y参考A064413。
%K nonn公司
%O 1,2号机组
%A _N.J.A.Sloane,2001年10月5日
|