OFFSET
1,1
COMMENTS
LINKS
Wikipedia, Integer triangle
EXAMPLE
33 appears in the sequence because there exists a primitive 120-degree triangle with sides 7, 33 and 37.
PROG
(PARI)
\\ Gives values of B not exceeding bmax
\\ e.g. pt120b(80) gives [5, 8, 16, 24, 33, 35, 39, 45, 51, 56, 57, 63, 77, 80]
pt120b(bmax) = {
s=[];
for(m=1, (bmax-1)\2,
for(n=1, m-1,
if((m-n)%3!=0 && gcd(m, n)==1,
a=m*m-n*n;
b=n*(2*m+n);
if(a>b, b=a);
if(b<=bmax, s=concat(s, b))
)
)
);
vecsort(s, , 8)
}
CROSSREFS
KEYWORD
nonn
AUTHOR
Colin Barker, Oct 06 2013
STATUS
approved