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 A013915 #22 Sep 08 2022 08:44:38 %S A013915 3,3,7,10,16,24,37,57,89,140,222,354,567,911,1467,2366,3820,6172,9977, %T A013915 16133,26093,42208,68282,110470,178731,289179,467887,757042,1224904, %U A013915 1981920,3206797,5188689,8395457,13584116,21979542,35563626,57543135 %N A013915 a(n) = F(n) + L(n) + n, where F(n) (A000045) and L(n) (A000204) are Fibonacci and Lucas numbers respectively. %H A013915 Vincenzo Librandi, <a href="/A013915/b013915.txt">Table of n, a(n) for n = 0..1000</a> %H A013915 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (3, -2, -1, 1). %F A013915 a(n) = a(n-1) + a(n-2) - n + 3. %F A013915 From _R. J. Mathar_, Nov 04 2009: (Start) %F A013915 a(n) = 3*a(n-1) - 2*a(n-2) - a(n-3) + a(n-4). %F A013915 G.f.: (-3 + 6*x - 4*x^2 + 2*x^3)/((x^2+x-1) * (x-1)^2). %F A013915 a(n) = n + A013655(n). (End) %t A013915 LinearRecurrence[{3,-2,-1, 1},{3,3,7,10},40] (* _Vincenzo Librandi_, Feb 14 2012 *) %o A013915 (Magma) I:=[3, 3, 7, 10]; [n le 4 select I[n] else 3*Self(n-1)-2*Self(n-2)-Self(n-3)+Self(n-4): n in [1..50]]; // _Vincenzo Librandi_, Feb 14 2012 %K A013915 nonn,easy %O A013915 0,1 %A A013915 _Mohammad K. Azarian_ %E A013915 More terms from _Erich Friedman_