|
| |
|
|
A077671
|
|
Triangular numbers whose digit permutations yield at least one further triangular number.
|
|
3
| |
|
|
10, 105, 120, 153, 190, 210, 253, 300, 325, 351, 496, 630, 780, 820, 946, 1035, 1378, 1485, 1830, 1891, 2080, 2145, 2415, 2701, 2850, 3081, 3160, 3570, 3655, 3741, 3916, 4005, 4095, 4371, 4560, 4851, 4950, 5050, 5356, 5460, 5565, 5778, 6105, 6555, 7021
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
EXAMPLE
| 153 and 190 are members yielding 351 and 091. But 66, 666 are not members.
|
|
|
MATHEMATICA
| trl=Rest[FoldList[Plus, 0, Range[2000]]]; okQ[n_] := Module[{p=Complement[FromDigits/@Permutations[IntegerDigits[n]], {n}]}, Length[Intersection[p, trl]]>0]; Select[Take[trl, 100], okQ]
|
|
|
CROSSREFS
| Cf. A069674, A095869, A095870.
Sequence in context: A163309 A163165 A110957 * A117832 A117833 A068093
Adjacent sequences: A077668 A077669 A077670 * A077672 A077673 A077674
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Nov 16 2002
|
|
|
EXTENSIONS
| More terms from Harvey P. Dale (hpd1(AT)nyu.edu), Nov 22 2002
Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Jun 29 2004
|
| |
|
|
