OFFSET
0,3
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..10000
FORMULA
MAPLE
a:= n-> (s-> parse(cat(s[-i]$i=1..length(s))))(""||(n*(n+1)/2)):
seq(a(n), n=0..60); # Alois P. Heinz, Apr 09 2015
MATHEMATICA
Table[FromDigits[Reverse[IntegerDigits[n (n + 1) / 2]]], {n, 0, 50}] (* Vincenzo Librandi, Jan 21 2016 *)
PROG
(Magma) [Seqint(Reverse(Intseq(Binomial((n+1), 2)))): n in [0..60]]; // Vincenzo Librandi, Jan 21 2016
CROSSREFS
KEYWORD
AUTHOR
EXTENSIONS
Initial 0 and terms after a(46) from Eric M. Schmidt, Apr 04 2014
STATUS
approved