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 A107608 #12 Jun 08 2016 08:41:01 %S A107608 1,1,25,32,125,128,441,529,729,961,1089,1369,2025,2809,3375,4489,4900, %T A107608 4913,9216,10201,10404,12167,16384,17576,18225,20736,27889,31684, %U A107608 34596,35344,38416,38809,39601,40804,46656,47961,60516,61009,63504,65025 %N A107608 Perfect powers which have the form prime(n) - n for some n. %C A107608 Corresponding n's in A107607. %F A107608 a(n) = prime(A107607(n)) - A107607(n). %t A107608 f[n_] := Prime[n] - n; Select[f /@ Range[10^4], ! GCD @@ Last /@ FactorInteger[ # ] == 1 &] (* _Ray Chandler_, May 21 2005 *) %Y A107608 Cf. A001597 (perfect powers), A107605, A107606, A107607 (associated n). %K A107608 nonn %O A107608 1,3 %A A107608 _Zak Seidov_, May 17 2005 %E A107608 Extended by _Ray Chandler_, May 21 2005