|
%I #25 Mar 25 2019 07:10:54
%S -3,-1,1,5,7,11,13,17,23,25,31,35,37,41,47,53,55,61,65,67,73,77,83,91,
%T 95,97,101,103,107,121,125,131,133,143,145,151,157,161,167,173,175,
%U 185,187,191,193,205,217,221,223,227,233,235,245,251,257,263,265,271,275,277,287,301,305,307,311,325,331,341,343,347
%N a(n) = A000040(n+1) - 6.
%F a(n) = A000040(n+1) - 6. - _Jon Maiga_, Mar 21 2019
%t Table[Prime[n + 1] - 6, {n, 200}] (* _Jon Maiga_, Mar 21 2019 *)
%Y Cf. A000040.
%K sign,less
%O 1,1
%A _Roger L. Bagula_, May 06 2006
%E Edited by _N. J. A. Sloane_, Oct 01 2006
%E Offset set to 1 by _Alois P. Heinz_, Mar 21 2019
%E New name using formula from _Jon Maiga_ entered by _Joerg Arndt_, Mar 25 2019
|
