|
%I #19 Sep 08 2022 08:45:51
%S 6,7,9,11,15,17,21,23,27,33,35,41,45,47,51,57,63,65,71,75,77,83,87,93,
%T 101,105,107,111,113,117,131,135,141,143,153,155,161,167,171,177,183,
%U 185,195,197,201,203,215,227,231,233,237,243,245,255,261,267,273,275
%N a(n) = prime(n) + 4.
%H G. C. Greubel, <a href="/A175221/b175221.txt">Table of n, a(n) for n = 1..10000</a>
%F a(n) = A000040(n) + 4 = A008864(n) + 3 = A052147(n) + 2 = A113395(n) + 1.
%F a(n) = A175222(n) - 1 = A139049(n) - 2 = A175223(n) - 3.
%F a(n) = A175224(n) - 4 = A140353(n) - 5 = A175225(n) - 6.
%t Prime[Range[60]]+4 (* _Harvey P. Dale_, Jan 01 2013 *)
%o (Magma)[(p+4):p in PrimesUpTo(500)] // _Vincenzo Librandi_, Dec 04 2010
%o (PARI) {a(n) = prime(n) + 4}; \\ _G. C. Greubel_, May 20 2019
%o (Sage) [nth_prime(n) + 4 for n in (1..60)] # _G. C. Greubel_, May 20 2019
%o (GAP) Filtered([1..300], k-> IsPrime(k) ) + 4 # _G. C. Greubel_, May 20 2019
%K nonn
%O 1,1
%A _Jaroslav Krizek_, Mar 06 2010
%E More terms from _Vincenzo Librandi_, Mar 14 2010
|
