|
| |
|
|
A069708
|
|
Triangular numbers with property that swapping first and last digits also gives a triangular number.
|
|
2
| |
|
|
1, 3, 6, 10, 55, 66, 120, 153, 171, 190, 300, 351, 595, 630, 666, 820, 1081, 1431, 1711, 1891, 3003, 3403, 5050, 5460, 5565, 5995, 6216, 6786, 8128, 8778, 10011, 10731, 11781, 12561, 13041, 13861, 15051, 15931, 16471, 17020, 17391, 17578, 18721
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| 820 and 028 = 28 both are triangular numbers hence both are members.
|
|
|
MATHEMATICA
| Do[t = IntegerDigits[n(n + 1)/2]; u = t; u[[1]] = t[[ -1]]; u[[ -1]] = t[[1]]; t = FromDigits[u]; u = Floor[ Sqrt[2t]]; If[ u(u + 1)/2 == t, Print[n(n + 1)/2]], {n, 1, 300}]
|
|
|
CROSSREFS
| Cf. A069706, A069707.
Sequence in context: A048089 A081975 A160965 * A061455 A068071 A067269
Adjacent sequences: A069705 A069706 A069707 * A069709 A069710 A069711
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Apr 08 2002
|
|
|
EXTENSIONS
| Edited, corrected and extended by Robert G. Wilson v
Edited by N. J. A. Sloane (njas(AT)research.att.com), Jan 20 2009
|
| |
|
|
