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 A140538 #14 Sep 08 2022 08:45:34 %S A140538 3,11,163,19,139,2593,1601,2731,1193,113,227,619,577,8537,73,43691, %T A140538 55681,209953,307,9697,388963,52057,1091,337,260417,304651,3011,4937, %U A140538 471521,1620001,691,5419,32491,46889,90947,25643,11057,15619,7499,7793 %N A140538 Greatest prime factor of 2*n^4 + 1. %H A140538 Vincenzo Librandi, <a href="/A140538/b140538.txt">Table of n, a(n) for n = 1..2000</a> %F A140538 a(n) = A006530(2n^4+1) = A076565(n^4). - _R. J. Mathar_, Aug 04 2008 %e A140538 a(2)= 11 because 2*2^4+1 = 33 = 3*11, greatest prime factor is 11. %t A140538 Table[Max[Transpose[FactorInteger[2 n^4 + 1]][[1]]], {n, 50}] (* _Vincenzo Librandi_, Feb 17 2015 *) %o A140538 (PARI) a(n) = f = factor(2*n^4+1); f[#f~,1]; \\ _Michel Marcus_, Aug 28 2013 %o A140538 (Magma) [#f eq 0 select 1 else f[ #f][1] where f is Factorization(2*n^4 + 1): n in [1..50]]; // _Vincenzo Librandi_, Feb 17 2015 %K A140538 easy,nonn %O A140538 1,1 %A A140538 _Donald S. McDonald_, Jul 06 2008 %E A140538 Extended from a(16) on by _R. J. Mathar_, Aug 04 2008