|
|
A217357
|
|
Semiprimes p such that next semiprime after p is p+30.
|
|
3
|
|
|
32777, 88649, 91799, 113107, 165697, 273257, 310103, 322211, 326137, 460963, 466063, 468877, 480443, 483223, 506509, 509131, 553349, 564347, 565493, 587611, 616771, 623257, 624959, 625619, 739177, 766799, 777163, 826657, 832357, 834123, 845177, 860873, 916163
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Smallest difference between two consecutive terms occurs first at a(329) = 5861197 because a(330) = 5861227 and 5861227 - 5861197 = 30. Same difference for a(1212) = 16179703, a(1630) = 20611897 and a(1641) = 20703923.- Zak Seidov, Feb 14 2017
|
|
LINKS
|
|
|
EXAMPLE
|
|
|
MATHEMATICA
|
Select[Partition[Select[Range[10^6], PrimeOmega[#]==2&], 2, 1], #[[2]]-#[[1]] == 30&][[All, 1]] (* Harvey P. Dale, May 06 2022 *)
|
|
PROG
|
(Magma) IsSemiprime:=func<n | &+[d[2]: d in Factorization(n)] eq 2>; [n: n in [4..1000000] | IsSemiprime(n) and IsSemiprime(n+30) and forall{n+i: i in [1..29] | not IsSemiprime(n+i)}]; // Bruno Berselli, Oct 01 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|