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 A265822 #8 Jan 19 2016 17:26:56 %S A265822 0,1,2,3,5,5,10,7,17,24,41,11,52,13,65,78,143,17,160,19,179,198,377, %T A265822 23,400,423,823,1246,2069,29,2098,31,2129,2160,4289,6449,10738,37, %U A265822 10775,10812,21587,41,21628,43,21671,21714,43385,47,43432,43479,86911,130390,217301,53,217354,217407,434761 %N A265822 If n is 0, 1, or prime, a(n) = n; else a(n) = a(n-1) + a(n-2). %F A265822 See the name. %e A265822 a(9) = a(8) + a(7) %e A265822 = a(7) + a(6) + 7 %e A265822 = a(5) + a(4) + 14 %e A265822 = a(3) + a(2) + 19 %e A265822 = 24 %t A265822 a[0] = 0; a[1] = 1; a[n_] := a[n] = If[PrimeQ@ n, n, a[n - 1] + a[n - 2]]; Table[a@ n, {n, 0, 56}] (* _Michael De Vlieger_, Dec 15 2015 *) %K A265822 nonn,easy %O A265822 0,3 %A A265822 _Nicholas Drozd_, Dec 15 2015 %E A265822 More terms from _Michael De Vlieger_, Dec 15 2015