%I #6 Dec 19 2020 09:31:21
%S 3,8,20,50,122,290,674,1538,3462,7720,17104,37708,82768,180880,393488,
%T 851914,1835470,3935808,8402158,17865738,37858268,79991512,168605710,
%U 354649382,744605426,1560666296,3265699888,6822355756,14229565634
%N Binomial transform of odd primes.
%C 03 05 07 11 13 08 12 18 24 20 30 42 50 72 122
%t q=33;lst=Prime[Range[2,q]]; lst1={First[lst]};Do[lst=Table[Abs[lst[[n]]+lst[[n+1]]],{n,1,Length[lst]-1}];AppendTo[lst1,First[lst]],{k,q-2}];lst1
%t Differences[Table[Sum[Binomial[n-1, k-1]*Prime[k], {k, 1, n}], {n, 1, 30}]] (* _Vaclav Kotesovec_, Dec 19 2020 *)
%Y First differences of A007443.
%K nonn
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, May 21 2010