|
%I #18 Sep 08 2022 08:44:50
%S 5,29,59,89,127,163,197,239,277,317,367,409,449,491,547,593,631,673,
%T 727,769,823,863,919,971,1019,1061,1103,1163,1217,1277,1303,1373,1433,
%U 1481,1523,1571,1613,1667,1723,1783,1847,1889,1951,2003,2063
%N a(n) = prime(7*n - 4).
%H Ivan Panchenko, <a href="/A031394/b031394.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = A000040(7*n-4). - _Wesley Ivan Hurt_, Feb 24 2014
%p A031394:=n->ithprime(7*n - 4); seq(A031394(n), n=1..50); # _Wesley Ivan Hurt_, Feb 24 2014
%t Table[Prime[7 n - 4], {n, 50}] (* _Wesley Ivan Hurt_, Feb 24 2014 *)
%o (Magma) [ NthPrime(7*n-4): n in [1..1000] ]; // _Vincenzo Librandi_, Apr 10 2011
%Y Cf. A000040.
%K nonn
%O 1,1
%A _Jeff Burch_
|
