cp's OEIS Frontend

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.

A088515 Values j of pairs (j,k) that generate A088319(n).

This page as a plain text file.
%I A088515 #15 Mar 05 2020 04:55:50
%S A088515 1,1,5,1,7,7,1,1,9,9,3,1,11,11,3,11,1,5,13,13,1,13,3,1,15,15,5,3,15,1,
%T A088515 5,17,17,7,17,17,1,5,7,3,19,19,19,19,5,1,19,3,21,21,7,1,21,21,7,5,23,
%U A088515 9,23,1,23,23,3,23,7,5,9,1,23,3,25,25,7,25,25,5,25,1,7,9,27,25,27,27,5,11,1
%N A088515 Values j of pairs (j,k) that generate A088319(n).
%H A088515 Ray Chandler, <a href="/A088515/b088515.txt">Table of n, a(n) for n = 1..10000</a>
%t A088515 terms = 1000; jmax = 100; kmax = 200;
%t A088515 Reap[Do[If[CoprimeQ[j, k], e = j^2 - j k + k^2/2; f = j k; If[e > f, Sow[{e^2 + f^2, j, k}]]], {j, 1, jmax}, {k, 2, kmax, 2}]][[2, 1]] // Sort // #[[;; terms, 2]]& (* _Jean-François Alcover_, Mar 05 2020 *)
%Y A088515 Cf. A088319, A088516, A088546, A089545-A089552, A089554-A089558.
%K A088515 nonn
%O A088515 1,3
%A A088515 _Lekraj Beedassy_, Nov 14 2003
%E A088515 Corrected and extended by _Ray Chandler_, Nov 16 2003