|
Search: id:A077671
|
|
|
| A077671 |
|
Triangular numbers whose digit permutations yield at least one further triangular number. |
|
+0
4
|
|
| 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; listen)
|
|
|
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.
Adjacent sequences: A077668 A077669 A077670 this_sequence A077672 A077673 A077674
Sequence in context: A027270 A036334 A110957 this_sequence A117832 A117833 A068093
|
|
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
|
|
|
Search completed in 0.002 seconds
|
