%I #24 Jan 24 2023 06:58:11
%S 1,3,14,37,72,115,178,247,338,441,540,683,840,997,1202,1363,1590,1819,
%T 2076,2341,2642,2977,3274,3635,4012,4375,4790,5223,5640,6097,6612,
%U 7137,7648,8185,8706,9331,9952,10605,11222,11899,12646,13337,14028,14811
%N a(n) = prime(n^2) - n^2.
%F a(n) = A014689(n^2) = A014689(A000290(n)). - _Michel Marcus_, Feb 02 2015
%e a(1) = prime(1^2) - 1^2 = prime(1) - 1 = 2 - 1 = 1;
%e a(2) = prime(2^2) - 2^2 = prime(4) - 4 = 7 - 4 = 3.
%t Table[n2=n^2;Prime[n2]-n2,{n,50}] (* _Harvey P. Dale_, Apr 20 2012 *)
%o (PARI) a(n) = prime(n^2) - n^2; \\ _Michel Marcus_, Feb 18 2021
%Y Cf. A000290, A014689.
%K nonn
%O 1,2
%A _Juri-Stepan Gerasimov_, Jul 31 2008
%E Corrected and extended by _D. S. McNeil_, Mar 21 2009
|