A079654 Triangular numbers using only the straight digits 1, 4 and 7.
1, 171, 741, 1711, 117144471, 417417171, 7417744447141, 177141144447177414711441, 1417711714147441711474771771, 144114474147744777714441111111771711, 111411774474177744717747747477177774111
Offset: 1
Links
- Giovanni Resta, Tridigital Triangular Numbers.
Programs
-
Mathematica
Do[ If[ Union[ Join[ IntegerDigits[n(n + 1)/2], {1, 4, 7}]] == {1, 4, 7}, Print[n(n + 1)/2]], {n, 0, 3*10^7}]
Formula
Extensions
Edited and extended by Robert G. Wilson v, Jan 24 2003
More terms from Giovanni Resta, May 10 2006
a(10)-a(11) from Tyler Busby, Mar 22 2023
Comments