|
| |
|
|
A070216
|
|
Squares of hypotenuses of right triangles having integer side lengths.
|
|
9
|
|
|
|
2, 5, 8, 10, 13, 18, 17, 20, 25, 32, 26, 29, 34, 41, 50, 37, 40, 45, 52, 61, 72, 50, 53, 58, 65, 74, 85, 98, 65, 68, 73, 80, 89, 100, 113, 128, 82, 85, 90, 97, 106, 117, 130, 145, 162, 101, 104, 109, 116, 125, 136, 149, 164, 181, 200, 122, 125, 130, 137, 146, 157
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
T(n,k) = (A215630(n,k) + A215631(n,k)) / 2, 1 <= k <=n. - Reinhard Zumkeller, Nov 11 2012
|
|
|
LINKS
|
_Reinhard Zumkeller_, Rows n = 1..120 of triangle, flattened
|
|
|
FORMULA
|
a(n, k)=n^2+k^2, 1<=k<=n
|
|
|
EXAMPLE
|
a(3,2)=13 because 3^2+2^2=13
|
|
|
PROG
|
(Haskell)
a070216 n k = a070216_tabl !! (n-1) !! (k-1)
a070216_row n = a070216_tabl !! (n-1)
a070216_tabl = zipWith (zipWith (\u v -> (u + v) `div` 2))
a215630_tabl a215631_tabl
-- Reinhard Zumkeller, Nov 11 2012
|
|
|
CROSSREFS
|
Permutation of sequence A000404.
Cf. A002522 (left edge), A001105 (right edge), A219054 (row sums).
Sequence in context: A172000 A096691 A202057 * A100829 A030713 A219222
Adjacent sequences: A070213 A070214 A070215 * A070217 A070218 A070219
|
|
|
KEYWORD
|
easy,nonn,tabl
|
|
|
AUTHOR
|
Charles Northup (cnorthup(AT)esc6.net), May 07 2002
|
|
|
EXTENSIONS
|
More terms from Larry Reeves (larryr(AT)acm.org), Sep 25 2002
|
|
|
STATUS
|
approved
|
| |
|
|
