A159462 - OEIS

%I #13 Jun 29 2022 12:30:14

%S 341075,423299,446423,542657,638144,661529,667163,786599,798899,

%T 828113,837719,841733,842921,861683,869513,879353,883595,887813,

%U 887819,905882,912176,912299,919676,923144,927926,928259,928298,943538,950216,954635

%N Numbers n with property that sod(n^3) = 5^3.

%C Numbers n with property that A007953(n^3) = 5^3.

%H Seiichi Manyama, <a href="/A159462/b159462.txt">Table of n, a(n) for n = 1..10000</a>

%e 341075^3 = 39677989979796875, 3+9+6+7+7+9+8+9+9+7+9+7+9+6+8+7+5 = 125 = 5^3.

%t Select[Range[10^6],Total[IntegerDigits[#^3]]==125&] (* _Harvey P. Dale_, Jun 29 2022 *)

%o (PARI) isok(n) = sumdigits(n^3) == 125; \\ _Michel Marcus_, Oct 16 2013

%Y Cf. A054966 Numbers that are congruent to {0, 1, 8} mod 9. A054966 Possible sums of digits of cubes. A067075 a(n) = smallest number m such that the sum of the digits of m^3 is equal to n^3. A007953 Digital sum (i.e. sum of digits) of n. A159463 Numbers n with property that sod(n^3) = 6^3.

%K base,nonn

%O 1,1

%A _Zak Seidov_, Apr 12 2009