%I #25 Sep 08 2022 08:45:55
%S 1,6,22,46,118,166,286,358,526,838,958,1366,1678,1846,2206,2806,3478,
%T 3718,4486,5038,5326,6238,6886,7918,9406,10198,10606,11446,11878,
%U 12766,16126,17158,18766,19318,22198,22798,24646,26566,27886,29926,32038,32758,36478
%N a(n) = prime(n)^2-3.
%H Vincenzo Librandi, <a href="/A182200/b182200.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = A061725(n)-5 = A066872(n)-4 = A001248(n)-3 = A084920(n)-2 = A049001(n)-1 = A166010(n)+1. [Formulas revised and extended by _Bruno Berselli_, Oct 15 2012]
%p A182200:=n->ithprime(n)^2-3; seq(A182200(k),k=1..50); # _Wesley Ivan Hurt_, Oct 11 2013
%t Table[Prime[n]^2 - 3, {n, 43}]
%o (Magma) [NthPrime(n)^2-3: n in [1..43]];
%Y Cf. A001248, A049001, A061725, A066872, A084920, A166010.
%K nonn,easy
%O 1,2
%A _Bruno Berselli_, Apr 17 2012
|