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 A068487 #16 May 18 2025 02:14:38 %S A068487 5,13,73,41,61,157,113,233,181,269,317,313,569,421,709,617,613,853, %T A068487 761,929,1117,1013,1429,1201,1301,1637,1753,1873,1741,1861,2897,2113, %U A068487 2689,2381,2521,3697,2969,3469,3121,3449,3617,3613,4153,4337,4729,4517,4513 %N A068487 Smallest prime equal to n^2 + m^2 with n<m. %C A068487 All terms are congruent to 1 (mod 4). - _Carmine Suriano_, Mar 30 2011 %H A068487 Carmine Suriano, <a href="/A068487/b068487.txt">Table of n, a(n) for n = 1..872</a> %p A068487 for n from 1 to 100 do m := n+1:while(not isprime(n^2+m^2)) do m := m+1; end do:a[n] := n^2+m^2:end do:q := seq(a[i],i=1..100); %t A068487 Table[k = n + 1; While[p = n^2 + k^2; ! PrimeQ[p], k++]; p, {n, 100}] (* _T. D. Noe_, Mar 30 2011 *) %Y A068487 Cf. A089489 (values of m). %K A068487 nonn %O A068487 1,1 %A A068487 _Lekraj Beedassy_, Mar 11 2002 %E A068487 More terms from _Sascha Kurz_, Mar 17 2002