A196261 Positive integers c in (1/4)-Pythagorean triples (a,b,c) satisfying a<=b, in order of increasing a and then increasing b.
3, 6, 16, 33, 9, 71, 22, 193, 12, 32, 46, 15, 29, 66, 24, 18, 22, 48, 142, 222, 21, 44, 386, 37, 99, 886, 24, 64, 163, 27, 92, 213, 69, 30, 46, 58, 80, 132, 394, 66, 579, 33, 48, 107, 953, 232, 2083, 36, 44, 96, 284, 43, 165, 352, 39, 191, 444, 138, 42, 88, 112, 258, 772, 1104, 45, 74, 87, 198
Offset: 1
Keywords
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
Programs
-
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.)
Comments