cp's OEIS Frontend

A240052 2nd arithmetic derivative of products of 2 successive prime numbers (A006094).

%I A240052 #25 Apr 16 2014 05:52:32
%S A240052 1,12,16,21,44,31,60,41,56,92,72,71,124,123,140,240,244,448,121,384,
%T A240052 236,297,176,161,249,284,247,540,191,608,221,272,380,912,520,380,1024,
%U A240052 371,428,912,852,508,1472,433,696,297,293,705,860,493,716,1456,668,512,924,636,1188,552,669,764,2112,1340,521,1504,951,1836,672,1176,1300,1107,1076,737,908,1520,641,776,661,821,1647,1416,1828
%N A240052 2nd arithmetic derivative of products of 2 successive prime numbers (A006094).
%C A240052 The first arithmetic derivative of products of 2 successive prime numbers (A006094) is the sum of 2 successive prime numbers (A001043). A001043 = (A006094)’. The second arithmetic derivative is a(n)=( A001043)’ = (A006094)’’.
%H A240052 Freimut Marschner, <a href="/A240052/b240052.txt">Table of n, a(n) for n = 1..429</a>
%H A240052 Wikipedia, <a href="http://en.wikipedia.org/wiki/Arithmetic_derivative">Arithmetic derivative</a>
%H A240052 Wikipedia, <a href="http://en.wikipedia.org/wiki/P-derivation">p-derivation</a>
%F A240052 a(n) = (A006094(n))''.
%F A240052 a(n) = A068346(A006094(n))= A003415(A003415(A006094(n))).
%e A240052 (2*3)’ = 1*3+2*1 = 5; (5)’ = 1; (2^2)’ = 2*2^1 = 2*2 = 4.
%p A240052 with(numtheory); P:=proc(q) local a,b,c,p,n;
%p A240052 for n from 1 to q do a:=ithprime(n)*ithprime(n+1);
%p A240052 b:=a*add(op(2,p)/op(1,p),p=ifactors(a)[2]);
%p A240052 c:=b*add(op(2,p)/op(1,p),p=ifactors(b)[2]);
%p A240052 print(c); od; end: P(10^3); # _Paolo P. Lava_, Apr 01 2014
%o A240052 (Haskell)
%o A240052 a240052 = a068346 . a006094  -- _Reinhard Zumkeller_, Apr 15 2014
%Y A240052 Cf. A006094, A001043.
%Y A240052 Cf. A003415 (1st derivative), A068346(2nd derivative).
%K A240052 nonn
%O A240052 1,2
%A A240052 _Freimut Marschner_, Mar 31 2014