login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A160264
Least prime of a 6-tuplet that contains both a prime quadruple and a sexy prime quadruple.
1
11, 1481, 1861, 5641, 88801, 165701, 266671, 284731, 326141, 402751, 626611, 661091, 855721, 959461, 1022501, 1068241, 1068701, 1118851, 1146781, 1155601, 1246361, 1461401, 1573921, 1830331, 1917731, 2674531, 2683771, 3058871
OFFSET
1,1
COMMENTS
Sequence is probably infinite.
LINKS
EXAMPLE
6-tuplet 5641 5647 5651 5653 5657 5659, contains sexy prime quadruple 5641 5647 5653 5659, and prime quadruple 5651 5653 5657 5659.
MATHEMATICA
stQ[n_]:=Module[{ss4=Subsets[n, {4}]}, AnyTrue[ss4, Differences[#]=={6, 6, 6}&] && AnyTrue[ss4, Differences[#]=={2, 4, 2}&]]; Select[Partition[Prime[ Range[ 221000]], 6, 1], stQ][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jun 24 2020 *)
CROSSREFS
Sequence in context: A286650 A377640 A015027 * A351597 A076168 A053884
KEYWORD
nonn
AUTHOR
Ki Punches, May 05 2009
EXTENSIONS
Extended by Ray Chandler, May 23 2009
STATUS
approved