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 A258264 #14 Jun 09 2015 12:35:03 %S A258264 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,18,20,21,22,24,25,27,28,29,30,34, %T A258264 36,37,38,39,43,45,48,49,50,53,55,57,58,60,61,64,65,66,67,69,70,73,78, %U A258264 79,83,84,87,88,90,91,92,93,97,99,100,101,102,105,108,110 %N A258264 Numbers having only one representation as a sum of the minimal number of triangular numbers, A000217. %C A258264 A258257(a(n)) = 1. %C A258264 Complement of A258265. %H A258264 Giovanni Resta, <a href="/A258264/b258264.txt">Table of n, a(n) for n = 1..10000</a> %t A258264 t[n_] := n (n + 1)/2; ok[n_] := Block[{k = 1, t, tt = t /@ Range[ Sqrt[2*n]]}, While[{} == (r = IntegerPartitions[n, {k}, tt]), k++]; Length@ r == 1]; Select[Range[100], ok] %Y A258264 Cf. A258257, A258265. %K A258264 nonn %O A258264 1,2 %A A258264 _Martin Renner_, May 25 2015