

A031157


Numbers that are both lucky and prime.


10



3, 7, 13, 31, 37, 43, 67, 73, 79, 127, 151, 163, 193, 211, 223, 241, 283, 307, 331, 349, 367, 409, 421, 433, 463, 487, 541, 577, 601, 613, 619, 631, 643, 673, 727, 739, 769, 787, 823, 883, 937, 991, 997, 1009, 1021, 1039, 1087, 1093, 1117, 1123
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

A010051(a(n))*A145649(a(n)) = 1. [Reinhard Zumkeller, Oct 19 2008]


LINKS

T. D. Noe, Table of n, a(n) for n=1..10000
Wikipedia, Lucky prime


MATHEMATICA

luckies = Range[1, 1248, 2]; i = 2; While[ i <= (len = Length@luckies) && (k = luckies[[i]]) <= len, luckies = Drop[luckies, {k, len, k}]; i++ ]; Select[luckies, PrimeQ@# &] (* Robert G. Wilson v, May 12 2006 *)


CROSSREFS

Cf. A000959, A055728.
Sequence in context: A249378 A136060 A023227 * A049488 A136051 A100750
Adjacent sequences: A031154 A031155 A031156 * A031158 A031159 A031160


KEYWORD

nonn


AUTHOR

Patrick De Geest


STATUS

approved



