OFFSET
1,2
COMMENTS
Any one of these terms can have an arbitrary number of 0's in between any two digits. Thus, the numbers with 0's have been omitted as trivial.
PROG
(PARI) istri(n)=for(k=0, n+1, if(k*(k+1)/2==n, return(1))); 0
for(n=1, 10^3, d=digits(n); if(vecsort(d, , 8)[1], s=0; for(i=1, #d, s+=d[i]*(d[i]+1)/2); if(istri(s), print1(n, ", "))))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Derek Orr, Feb 11 2015
STATUS
approved