cp's OEIS Frontend

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.

A120610 Sum of previous term and preceding non-divisors.

This page as a plain text file.
%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