|
%I #7 Mar 01 2019 23:33:08
%S 0,0,2,2,5,4,7,6,9,6,10,8,13,12,15,12,18,16,20,17,20,18,23,20,27,23,
%T 26,25,28,27,36,29,34,32,38,34,38,34,39,36,42,40,46,42,45,44,51,41,49,
%U 48,51,48,52,48,56,52,58,56,60,57,60,56,68,61,64,63,72,64,72,68,71,68,75
%N Number on the positive y axis of the n-th horizontal component in the graph of the "mountain path" function for prime numbers.
%C Note that the n-th horizontal component is an edge with length equal to 1 (see the link: Graph of the mountain path function).
%C See A162201 for the first differences.
%H Omar E. Pol, <a href="http://www.polprimos.com/imagenespub/polmpfpn.jpg"> Graph of the mountain path function for prime numbers</a>
%H Omar E. Pol, <a href="http://www.polprimos.com/imagenespub/polmpca1.jpg"> Illustration: The mountain path of the primes</a>
%p A031131 := proc(n) ithprime(n+2)-ithprime(n) ; end: A052288 := proc(n) A031131(n)/2 ; end: A162201 := proc(n) if n <= 2 then 2*(n-1); elif n mod 2 = 0 then A052288(n-1) ; else 2-A052288(n-1) ; fi; end: A162200 := proc(n) add(A162201(j),j=1..n-1) ; end: seq(A162200(n),n=1..150) ; # _R. J. Mathar_, Jul 15 2009
%Y Cf. A000040, A006005, A008578, A162201, A162202, A162203, A162340, A162341, A162342, A162343, A162344.
%K easy,nonn
%O 1,3
%A _Omar E. Pol_, Jun 28 2009
%E Edited by _Omar E. Pol_, Jul 02 2009
%E More terms from _R. J. Mathar_, Jul 15 2009
|
