OFFSET
0,1
COMMENTS
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
MATHEMATICA
Table[If[PrimeQ[n], n, 2 n + 3], {n, 0, 150}]
PROG
(Magma) [IsPrime(n) select n else 2*n+3: n in [0..80]];
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, May 02 2016
STATUS
approved