A004139 Odd primes excluding 5.
3, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97, 101, 103, 107, 109, 113, 127, 131, 137, 139, 149, 151, 157, 163, 167, 173, 179, 181, 191, 193, 197, 199, 211, 223, 227, 229, 233, 239, 241
Offset: 1
References
- John H. Conway, R. K. Guy, The Book of Numbers, Copernicus Press, p. 162.
Links
- Michael De Vlieger, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Prime@ Delete[Range[2, 53], {2}] (* Michael De Vlieger, Dec 15 2019 *)
-
PARI
a(n)=if(n>1,prime(n+2),3) \\ Charles R Greathouse IV, Aug 26 2011
Comments