Search: id:A031157 Results 1-1 of 1 results found. %I A031157 %S A031157 3,7,13,31,37,43,67,73,79,127,151,163,193,211,223,241,283,307,331, %T A031157 349,367,409,421,433,463,487,541,577,601,613,619,631,643,673,727, %U A031157 739,769,787,823,883,937,991,997,1009,1021,1039,1087,1093,1117,1123 %N A031157 Numbers that are both lucky and prime. %C A031157 A010051(a(n))*A145649(a(n)) = 1. [From Reinhard Zumkeller (renhard.zumkeller(AT)gmail.com), Oct 19 2008] %H A031157 Wikipedia, Lucky prime %t A031157 lst = Range[1, 1248, 2]; i = 2; While[ i <= (len = Length@lst) && (k = lst[[i]]) <= len, lst = Drop[lst, {k, len, k}]; i++ ]; Select[lst, PrimeQ@# &] (from Robert G. Wilson v (rgwv(at)rgwv.com), May 12 2006) %Y A031157 Cf. A000959. %Y A031157 Sequence in context: A062700 A136060 A023227 this_sequence A049488 A136051 A100750 %Y A031157 Adjacent sequences: A031154 A031155 A031156 this_sequence A031158 A031159 A031160 %K A031157 nonn %O A031157 1,1 %A A031157 Patrick De Geest (pdg(AT)worldofnumbers.com) Search completed in 0.002 seconds