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 A066018 #8 Jun 16 2018 19:00:20 %S A066018 3,8,27,64,125,216,343,474,43,781,1331,1728,2197,1807,3375,4096,4913, %T A066018 1600,807,8000,9261,10648,12167,13824,7353,17576,6721,21952,24389, %U A066018 27000,29791,32768,35937,39304,42875,46656,50653,4015,59319,20723 %N A066018 a(n) is the smallest k such that (k^4 + 1)/(n^4 + 1) is an integer > 1. %H A066018 Harry J. Smith, <a href="/A066018/b066018.txt">Table of n, a(n) for n = 1..250</a> %t A066018 Do[k = 1; While[m = (k^4 + 1)/(n^4 + 1); m < 2 || !IntegerQ[m], k++ ]; Print[k], {n, 1, 40} ] %o A066018 (PARI) { for (n=1, 250, f=n^4 + 1; a=n + 1; while (frac((a^4 + 1)/f) !=0, a++); write("b066018.txt", n, " ", a) ) } \\ _Harry J. Smith_, Nov 06 2009 %Y A066018 Cf. A065964. %K A066018 easy,nonn %O A066018 1,1 %A A066018 _Robert G. Wilson v_, Dec 11 2001