|
|
A126230
|
|
Odd interprimes divisible by 11.
|
|
8
|
|
|
99, 165, 231, 363, 473, 495, 759, 803, 825, 1089, 1243, 1485, 1551, 2277, 2453, 2475, 2541, 2585, 2783, 3399, 3465, 3531, 3795, 4521, 4587, 4697, 4785, 4807, 5093, 5203, 5577, 5841, 6831, 7007, 7315, 7381, 7425, 7689, 7755, 8437, 8635, 8679, 8855, 8877
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[If[OddQ[(Prime[n + 1] + Prime[n])/2] && Mod[(Prime[n + 1] + Prime[n])/2, 11] == 0, Print[(Prime[n + 1] + Prime[n])/2]], {n, 1, 3000}]
Select[Mean/@Partition[Prime[Range[2, 2000]], 2, 1], OddQ[#]&&Divisible[#, 11]&] (* Harvey P. Dale, Mar 14 2021 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|