|
%I #18 Aug 10 2017 23:34:31
%S 3,7,11,28,31,140,239,600,6476,33172,64375,65287,79051,97864,105099,
%T 421335,710147,1464192,3946972,5423007,5822348,6150008,6297183,
%U 20801744,22375360,79009771,197449588,266929040,537524972,5929856931,6365146483,7274986071,7983314176,19034311884,198776542655,1773302419915
%N Numbers n such that A005210(n) = 0.
%D Popular Computing (Calabasas, CA), Z-Sequences, Vol. 4 (No. 42, Sep 1976), pp. 12-16.
%H Popular Computing (Calabasas, CA), <a href="/A005210/a005210.pdf">Z-Sequences, continued.</a> Annotated and scanned copy of pages 14, 15, 16, 18 of Vol. 5 (No. 56, Nov 1977).
%p t1:=[];
%p M:=200000:
%p a:=1: b:=1:
%p for n from 3 to M do c:=abs(2*a+b-n);
%p if c=0 then t1:=[op(t1),n]; fi;
%p a:=b; b:=c; od:
%p [seq(t1[n],n=1..nops(t1))]; # _N. J. A. Sloane_, Apr 16 2015
%o (Python)
%o A051202_list, a2, a1 = [], 1, 1
%o for n in range(3,10**13):
%o ....a = abs(a1+2*a2-n)
%o ....if a == 0:
%o ........A051202_list.append(n)
%o ....a1, a2 = a, a1 # _Chai Wah Wu_, Apr 19 2015
%Y Cf. A005210.
%K nonn
%O 1,1
%A _David W. Wilson_
%E a(31)-a(34) from _Chai Wah Wu_, Apr 19 2015
%E a(35)-a(36) from _Chai Wah Wu_, May 07 2015
|
