|
|
A335200
|
|
Positions of difference 12 in A070195.
|
|
0
|
|
|
2, 14, 31, 47, 78, 83, 229, 242, 278, 294, 312, 341, 345, 350, 381, 401, 429, 441, 476, 617, 783, 796, 800, 812, 825, 849, 911, 921, 931, 940, 1054, 1087, 1103, 1142, 1146, 1210, 1291, 1340, 1391, 1397, 1447, 1556, 1594, 1804, 1828, 1855, 1857, 1877, 1953
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
12 is the minimal difference in A070195.
|
|
LINKS
|
|
|
EXAMPLE
|
|
|
MATHEMATICA
|
Position[Differences @ Select[Range[10^6], SquareFreeQ[#] && And @@ PrimeQ[# + {-1, 1}] &], 12] //Flatten (* Amiram Eldar, May 27 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|