OFFSET
1,1
COMMENTS
See A195770 for definitions of k-Pythagorean triple, primitive k-Pythagorean triple, and lists of related sequences.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
F:= proc(a)
sort(select(t -> subs(t, b) >= a and subs(t, c) > 0, [isolve](4*a^2 + 4*b^2 + a*b = 4*c^2)), (s, t) -> subs(s, b) <= subs(t, b))
end proc:
seq(op(map(t -> subs(t, c), F(a))), a=1..60); # Robert Israel, Dec 20 2024
MATHEMATICA
(See A196259.)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Sep 30 2011
STATUS
approved