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.

A259532 Triangular array: row k shows the discriminant of sqrt(j) + sqrt(k) for j=1..k.

This page as a plain text file.
%I A259532 #32 Jul 20 2015 14:04:14
%S A259532 1,8,8,12,8,12,1,2304,2304,1,5,8,12,8,5,24,1600,12,12,1600,24,28,2304,
%T A259532 3600,1,3600,2304,28,8,12544,2304,5,5,2304,12544,8,1,8,7056,24,5,24,
%U A259532 7056,8,1,40,8,2304,28,14400,14400,28,2304,8,40,44,1600,12,8
%N A259532 Triangular array:  row k shows the discriminant of sqrt(j) + sqrt(k) for j=1..k.
%H A259532 Clark Kimberling, <a href="/A259532/b259532.txt">Table of n, a(n) for n = 1..1000</a>
%e A259532 First seven rows:
%e A259532 1
%e A259532 8   8
%e A259532 12  8     12
%e A259532 1   2304  2304   1
%e A259532 5   8     12     8   5
%e A259532 24  1600  12     12  1600  24
%e A259532 28  2304  3600   1   3600  2304  28
%t A259532 t = Table[NumberFieldDiscriminant[Sqrt[j] + Sqrt[k + 1 - j]], {k, 1, 16}, {j, 1, k}]
%t A259532 TableForm[t] (* A259532 array *)
%t A259532 Flatten[t]   (* A259532 sequence *)
%Y A259532 Cf. A259911, A259912, A259913.
%K A259532 nonn,easy,tabl
%O A259532 1,2
%A A259532 _Clark Kimberling_, Jul 20 2015