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 A120610 #9 Oct 07 2024 15:28:09 %S A120610 2,3,5,10,13,33,63,126,187,442,869,1753,3506,5257,12269,24538,36805, %T A120610 85876,171755,343507,687019,1374038,2061055,4809126,9618252,14427378, %U A120610 28854567,62518388,125036840,250073665,500147342,1000294687,2000589376 %N A120610 Sum of previous term and preceding non-divisors. %H A120610 Michael De Vlieger, <a href="/A120610/b120610.txt">Table of n, a(n) for n = 1..3428</a> %F A120610 a(1) = 2, a(2) = 3, for n>=2, a(n+1) = a(n) + sum_{1<=k<n, a(k) does not divide a(n)} a(k). %t A120610 s={2,3};Do[sum=s[[-1]];Do[If[!Divisible[s[[-1]],s[[j]]],sum=sum+s[[j]] ],{j,k-1}];AppendTo[s,sum] ,{k,2,32}];s (* _James C. McMahon_, Oct 07 2024 *) %Y A120610 Cf. A120611. %K A120610 nonn %O A120610 1,1 %A A120610 _Franklin T. Adams-Watters_, Jun 16 2006