This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A093670 #3 Mar 30 2012 17:22:33
%S A093670 3,5,7,8,9,12,13,14,16,25,28,34,37,46,82,142
%N A093670 Numbers having a unique representation as ab+ac+bc, with 1 <= a <= b <= c.
%C A093670 Are there more terms?
%D A093670 See A025052
%e A093670 25 is on the list because 25 = 1*1 + 1*12 + 1*12.
%t A093670 oneSol={}; Do[lim=Ceiling[(n-1)/2]; cnt=0; Do[If[n>a*b && Mod[n-a*b, a+b]==0 && Quotient[n-a*b, a+b]>=b, cnt++; If[cnt>1, Break[]]], {a, 1, lim}, {b, a, lim}]; If[cnt==1, AppendTo[oneSol, n]], {n, 10000}]; oneSol
%Y A093670 Cf. A025052 (numbers not of the form ab+ac+bc, 1<=a<=b<=c).
%K A093670 nonn
%O A093670 1,1
%A A093670 _T. D. Noe_, Apr 08 2004