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 A357529 #19 Nov 06 2022 14:51:44
%S A357529 0,1,6,10,15,45,55,66,91,120,136,231,276,300,406,435,496,561,595,630,
%T A357529 741,780,820,861,1081,1225,1326,1431,1830,2016,2080,2145,2211,2415,
%U A357529 2485,2701,2850,3240,3321,3486,3655,3916,4005,4465,4560,4950,5050,5356,5460,5565
%N A357529 Triangular numbers k such that 2*k cannot be expressed as a sum of two distinct triangular numbers.
%C A357529 Subset of even terms of A357505, divided by 2. - _Michel Marcus_, Nov 05 2022
%t A357529 TriangularQ[n_]:=IntegerQ[(Sqrt[1+8n]-1)/2]; A000217[n_]:=n(n+1)/2; a={}; For[k=0, k<=105, k++, ok=1; For[h=0, h<2k, h++, If[TriangularQ[2*A000217[k] - A000217[h]] && k!=h, ok=0]]; If[ok==1, AppendTo[a,k(k+1)/2]]]; a (* _Stefano Spezia_, Nov 05 2022 *)
%Y A357529 Cf. A000217 (supersequence), A002378.
%Y A357529 Half of the complement of A357504 in A020756.
%Y A357529 Half of the complement of A020757 in A357505.
%Y A357529 Subsequence of A008851.
%K A357529 nonn,easy
%O A357529 1,3
%A A357529 _Stefano Spezia_, Oct 02 2022