This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A085947 #18 Oct 26 2015 03:45:03 %S A085947 1,2,3,5,4,9,13,11,6,17,23,8,31,39,7,46,53,33,43,19,62,27,89,29,59,22, %T A085947 81,103,92,15,107,61,12,73,85,79,41,10,51 %N A085947 a(1) = 1, a(2) = 2 and a(n) = smallest number not included earlier that divides the sum of the two previous terms. %C A085947 The next term would have to divide 61, but 1 and 61 are both already used. - _Franklin T. Adams-Watters_, Oct 23 2015 %e A085947 After 46 and 53 the term is 33 and not 1,3,9 or 11 as they have already been included. 33 divides 46+53 = 99. %p A085947 a[1]:= 1: %p A085947 a[2]:= 2: %p A085947 for n from 3 do %p A085947 r:= min(numtheory:-divisors(a[n-1]+a[n-2]) minus {seq(a[i],i=1..n-1)}); %p A085947 if r = infinity then break fi; %p A085947 a[n]:= r %p A085947 od: %p A085947 seq(a[i],i=1..n-1); # _Robert Israel_, Oct 25 2015 %Y A085947 Cf. A085946. %K A085947 nonn,fini,full %O A085947 1,2 %A A085947 _Amarnath Murthy_ and Meenakshi Srikanth (menakan_s(AT)yahoo.com), Jul 14 2003 %E A085947 More terms from _David Wasserman_, Feb 14 2005 %E A085947 Name corrected by _Franklin T. Adams-Watters_, Oct 23 2015