OFFSET
1,1
COMMENTS
Any two such triples are disjoint.
Complement appears to be {1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 15, 18}. - Robert Israel, Feb 10 2015
EXAMPLE
13=6+6+1=9+2+2, 6*6*1=9*2*2, so 13 is in the sequence.
MAPLE
N:= 100: # to get all entries <= N
for i from 1 to N do R[i]:= {} od:
A:= {}:
for a from 1 to floor(N/3) do
for b from a to floor((N-a)/2) do
for c from b to N-a-b do
p:= a*b*c;
s:= a+b+c;
if member(p, R[s]) then A:= A union {s}
else R[s]:= R[s] union {p}
fi;
od od od:
A;
# if using Maple 11 or earlier, uncomment the next line
# sort(convert(A, list)); # Robert Israel, Feb 10 2015
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Naohiro Nomoto, Mar 23 2001
EXTENSIONS
Name changed by Robert Israel, Feb 12 2015
STATUS
approved