This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A076693 #8 Sep 30 2019 04:46:18 %S A076693 18,269,564,2020,2460,4821,10499,17583,25030,27154,34238,39583,82915, %T A076693 92295,107454,121248,142474,148961,159031,162482,233036,250923,342833, %U A076693 365844,427518,460792,467647,481615,741275 %N A076693 Numbers n such that the average of prime(n) and prime(n+1) is a perfect cube. %H A076693 Amiram Eldar, <a href="/A076693/b076693.txt">Table of n, a(n) for n = 1..500</a> %e A076693 The average of prime(18) and prime(19) is (61 + 67)/2 = 4^3, so 18 is a term of the sequence. %t A076693 Select[Range[10^6], IntegerQ[((Prime[ # ] + Prime[ # + 1])/2)^(1/3)] &] %Y A076693 Cf. A000578, A024675. %K A076693 easy,nonn %O A076693 1,1 %A A076693 _Joseph L. Pe_, Oct 25 2002