A098066 Duplicate of A096436.
1, 2, 3, 1, 2, 3, 4, 2, 1, 2, 3, 3, 2, 3, 4, 4, 3, 2, 3, 4, 4, 3, 4, 5
Offset: 1
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.
a(5) = 12 since 12 = 1*2*4 + 4.
a005831 n = a005831_list !! n a005831_list = 0:1:zipWith (*) (tail a005831_list) (map succ a005831_list) -- Reinhard Zumkeller, Mar 19 2011
a=0;b=1;lst={a,b};Do[c=a*b+b;AppendTo[lst,c];a=b;b=c,{n,18}];lst (* Vladimir Joseph Stephan Orlovsky, Sep 13 2009 *) RecurrenceTable[{a[0]==0,a[1]==1,a[n]==a[n-1](a[n-2]+1)},a,{n,15}] (* Harvey P. Dale, Aug 17 2013 *)
a(6) = 20 because 20 = a(5) + a(4) + a(3) = 11 + 6 + 3 a(8) = 71 because 71 = a(7) + a(6) + a(5) + a(2) = 38 + 20 + 11 + 2
A141435 := proc(n) option remember; local a,i; if n <= 3 then RETURN(n); else a :=0 ; for i from 1 to n-1 do if n-procname(i) < 1 then RETURN(a); else a := a+procname(n-procname(i)) ; fi; od; RETURN(a); fi; end: for n from 1 to 80 do printf("%d,",A141435(n)) ; od: # R. J. Mathar, Nov 03 2008
def A141435(terms): seq = [1, 2] for n in range(3, terms): s = 0 for m in seq: if (n - m) > 0: s += seq[n - m - 1] #fix for python indexing seq.append(s) return seq print(A141435(40)) # Andres Cruz y Corro A, Jun 19 2019
Comments