|
%I #27 Sep 08 2022 08:45:51
%S 7,8,10,12,16,18,22,24,28,34,36,42,46,48,52,58,64,66,72,76,78,84,88,
%T 94,102,106,108,112,114,118,132,136,142,144,154,156,162,168,172,178,
%U 184,186,196,198,202,204,216,228,232,234,238,244,246,256,262,268,274,276
%N a(n) = prime(n) + 5.
%C a(n) = A000040(n) + 5 = A008864(n) + 4 = A052147(n) + 3 = A113395(n) + 2 = A175221 (n) + 1 = A139049(n) - 1 = A175223(n) - 2 = A175224(n) - 3 = A140353(n) - 4 = A175225(n) - 5.
%H Vincenzo Librandi, <a href="/A175222/b175222.txt">Table of n, a(n) for n = 1..1000</a>
%t Prime[Range[120]]+5 (* _Vladimir Joseph Stephan Orlovsky_, Nov 21 2010 *)
%o (Magma) [p+5: p in PrimesUpTo(500)]; // _Vincenzo Librandi_, Dec 04 2010
%o (PARI) {a(n) = prime(n) + 5}; \\ _G. C. Greubel_, May 20 2019
%o (Sage) [nth_prime(n) + 5 for n in (1..100)] # _G. C. Greubel_, May 20 2019
%o (GAP) Filtered([1..300], k-> IsPrime(k) ) + 5 # _G. C. Greubel_, May 20 2019
%Y Cf. A000040, A008864, A052147, A086801, A113395, A113935, A139049, A140353, A175221, A175223, A175224, A175225.
%K nonn,easy
%O 1,1
%A _Jaroslav Krizek_, Mar 06 2010
%E More terms from _Vincenzo Librandi_, Mar 14 2010
|
