OFFSET
1,1
COMMENTS
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..10000
MATHEMATICA
Table[Prime[n] +1 +Boole[n==1], {n, 100}] (* G. C. Greubel, Aug 06 2024 *)
PROG
(Magma) [n eq 1 select 4 else NthPrime(n) +1: n in [1..100]]; // G. C. Greubel, Aug 06 2024
(SageMath)
def A175216(n): return nth_prime(n) +1 +int(n==1)
[A175216(n) for n in range(1, 101)] # G. C. Greubel, Aug 06 2024
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Jaroslav Krizek, Mar 06 2010
STATUS
approved