|
|
A076693
|
|
Numbers n such that the average of prime(n) and prime(n+1) is a perfect cube.
|
|
1
|
|
|
18, 269, 564, 2020, 2460, 4821, 10499, 17583, 25030, 27154, 34238, 39583, 82915, 92295, 107454, 121248, 142474, 148961, 159031, 162482, 233036, 250923, 342833, 365844, 427518, 460792, 467647, 481615, 741275
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
The average of prime(18) and prime(19) is (61 + 67)/2 = 4^3, so 18 is a term of the sequence.
|
|
MATHEMATICA
|
Select[Range[10^6], IntegerQ[((Prime[ # ] + Prime[ # + 1])/2)^(1/3)] &]
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|