OFFSET
1,2
COMMENTS
The subsequence of prime terms is A006450.
EXAMPLE
a(7) = 17 because prime(7) = 17 is prime.
a(8) = 1 because 8 is not prime.
MATHEMATICA
Table[If[! PrimeQ[n], 1, Prime[n]], {n, 100}]
PROG
(Magma) [IsPrime(n) select NthPrime(n) else 1: n in [1..100]];
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Jun 20 2015
STATUS
approved