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 A182739 #19 Feb 21 2017 02:38:06 %S A182739 2,1,4,8,41,45,196,193,765,3310,2277,14795,22946,18678,61493,205177, %T A182739 501889,289685,1558184,2017516,1488484,7662961,9489819,26657456, %U A182739 83235005,81250196,56767824,159900439,110796851,309430388,3062487667,2050675209,5133105512 %N A182739 First differences of the partition numbers of the primes. %C A182739 This is the first prime 2, followed by the first differences of the partition numbers of primes. %H A182739 Alois P. Heinz, <a href="/A182739/b182739.txt">Table of n, a(n) for n = 1..1000</a> %F A182739 a(1) = 2; a(n) = A000041(A000040(n)) - A000041(A000040(n-1)) for n>1. %e A182739 a(5) = A000041(A000040(5)) - A000041(A000040(4)) = A000041(11) - A000041(7) = 56 - 15 = 41. %p A182739 with(combinat): %p A182739 a:= n-> `if`(n=1, 2, (x->x[1]-x[2])(map(numbpart@ithprime, [n, n-1]))): %p A182739 seq(a(n), n=1..40); # _Alois P. Heinz_, Jan 27 2011 %t A182739 Range[40] // Prime // PartitionsP // Differences // Prepend[#, 2]& (* _Jean-François Alcover_, Feb 21 2017 *) %Y A182739 Cf. A000040, A000041, A058698. %K A182739 nonn %O A182739 1,1 %A A182739 _Omar E. Pol_, Jan 27 2011 %E A182739 More terms from _Alois P. Heinz_, Jan 27 2011