A241846 Numbers for which the cube of the sum of the digits is equal to the square of the product of their digits.
0, 1, 88, 333, 11248, 11284, 11428, 11482, 11824, 11842, 12148, 12184, 12418, 12481, 12814, 12841, 14128, 14182, 14218, 14281, 14812, 14821, 18124, 18142, 18214, 18241, 18412, 18421, 21148, 21184, 21418, 21481, 21814, 21841, 24118, 24181, 24811, 28114
Offset: 1
Examples
333 is in the sequence because (3+3+3)^3 = (3*3*3)^2 = 729. 11248 is in the sequence because (1+1+2+4+8)^3 = (1*1*2*4*8)^2 = 4096.
Links
- Michel Lagneau, Table of n, a(n) for n = 1..1419
Programs
-
Mathematica
Select[Range[30000], (Plus @@ IntegerDigits[ # ]^3) == (Times @@ IntegerDigits[ # ]^2) &]
Comments