login
A066174
First member of a prime sextet: p, (p-1)/2, (p-3)/4, (p-7)/8, (p-15)/16, (p-31)/32.
1
2879, 2029439, 4068479, 12968639, 25945919, 34214399, 35925119, 37715519, 42684479, 51158399, 57794879, 62663999, 69255359, 71850239, 74543039, 83394239, 91166399, 103721279, 106879679, 121094399, 126785279, 130844159
OFFSET
1,1
MATHEMATICA
f[n_]:=(n-1)/2; lst={}; Do[p=Prime[n]; If[PrimeQ[a=f[p]], If[PrimeQ[b=f[a]], If[PrimeQ[c=f[b]], If[PrimeQ[d=f[c]], If[PrimeQ[e=f[d]], AppendTo[lst, p]]]]]], {n, 11!}]; lst (* Vladimir Joseph Stephan Orlovsky, Mar 10 2010 *)
CROSSREFS
Sequence in context: A286526 A081427 A101999 * A175750 A179703 A260369
KEYWORD
nonn
AUTHOR
Vladeta Jovovic, Dec 15 2001
EXTENSIONS
More terms from Don Reble, Dec 17 2001
STATUS
approved