%I #14 Jan 21 2019 19:01:55
%S 2,24,3120,823536,285311670600,302875106592240,827240261886336764160,
%T 1978419655660313589123960,20880467999847912034355032910544,
%U 2567686153161211134561828214731016126483440
%N Prime(n)^prime(n)-prime(n).
%H Vincenzo Librandi, <a href="/A101339/b101339.txt">Table of n, a(n) for n = 1..50</a>
%F a(n) = A051674(n)-A000040(n). - R. J. Mathar, Apr 26 2007
%t #^#-#&/@Prime[Range[20]] (* _Harvey P. Dale_, Jul 24 2011 *)
%o (PARI) for(x=1,16,print( prime(x)^prime(x)-prime(x)))
%K nonn
%O 1,1
%A _Jorge Coveiro_, Dec 24 2004
%E A-number in formula padded with a zero by _R. J. Mathar_, Jul 22 2009
|