A227073 Positive numbers without the digit 0 such that sum of cubes of the digits equals the square of the sum of the digits.

1, 12, 21, 22, 123, 132, 213, 231, 312, 321, 333, 1224, 1234, 1242, 1243, 1324, 1342, 1422, 1423, 1432, 2124, 2134, 2142, 2143, 2214, 2241, 2244, 2314, 2341, 2412, 2413, 2421, 2424, 2431, 2442, 3124, 3142, 3214, 3241, 3412, 3421, 4122, 4123, 4132, 4212, 4213

Offset: 1

Author

T. D. Noe, Jul 27 2013

Keywords

• nonn
• base
• fini

Comments

There are a total of 320880755 numbers in this sequence.

Links

• T. D. Noe, Table of n, a(n) for n = 1..2987 (numbers less than 10^6)

Crossrefs

Cf. A225567 (primes in a related sequence), A227072.

Programs

Mathematica

(* let tx[[i]] be numbers computed in A227072 *) Sort[Flatten[
  Table[FromDigits /@ Permutations[IntegerDigits[tx[[n]]]], {n, 14}]]]