%I #6 Jan 27 2019 01:50:23

%S 1,3,3,9,7,9,7,9,11,19,17,15,9,15,13,29,23,27,33,23,29,21,31,31,35,25,

%T 27,27,41,89,57,67,51,63,49,49,49,43,39,51,39,63,47,65,45,75,95,71,67,

%U 79,59,61,59,73,61,65,77,73,75,63,95,81,87,71,103,107,85,85,101,87,71

%N Sum of the numbers in the n-th row of Gilbreath's triangle (A036261).

%p A036261 := proc(n,k) option remember ; if k = n then ithprime(n+1)-ithprime(n) ; else abs(procname(n,k+1)-procname(n-1,k)) ; end if; end proc: A173815 := proc(n) add(A036261(n,k),k=1..n) ; end proc: seq(A173815(n),n=1..90) ; # _R. J. Mathar_, Mar 01 2010

%Y Cf. A036261, A036262.

%K nonn

%O 1,2

%A _Juri-Stepan Gerasimov_, Feb 25 2010

%E a(10), a(22) etc. corrected and sequence extended by _R. J. Mathar_, Mar 01 2010