OFFSET
1,1
LINKS
Colin Barker, Table of n, a(n) for n = 1..3000
Eric Weisstein's World of Mathematics, Tangent Circles
EXAMPLE
The first few triples are [6, 3, 2], [12, 4, 3], [15, 10, 6], [20, 5, 4].
PROG
(PARI)
a280680(amax) = {
my(L=List());
for(a=1, amax,
for(b=1, a-1,
c=(1/(1/a + 1/b))^2;
if(type(c)=="t_INT" && gcd([a^2, b^2, c])==1,
listput(L, [a, b, sqrtint(c)])
)
)
);
Vec(L)
}
concat(a280680(100))
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Colin Barker, Jan 07 2017
STATUS
approved