Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #15 Jan 08 2023 12:56:03
%S 0,1,10,5778,5886,6786,7875,17766,17955,27495,29646,31878,36585,38781,
%T 43956,46665,46971,49455,49770,55278,58653,61776,64980,68265,74691,
%U 75078,78606,85491,85905,89253,93096,93528,97461,109278,109746,117855
%N Triangular numbers for which the sum of the digits is a cube.
%H Harvey P. Dale, <a href="/A117803/b117803.txt">Table of n, a(n) for n = 1..1000</a>
%e 5778 is in the sequence because (1) it is a triangular number and (2) the sum of its digits 5+7+7+8=27 is a cube.
%t Select[Accumulate[Range[500]],IntegerQ[Power[Total[IntegerDigits[#]], (3)^-1]]&] (* _Harvey P. Dale_, Dec 19 2010 *)
%t Select[Accumulate[Range[0,500]],IntegerQ[Surd[Total[IntegerDigits[#]],3]]&] (* _Harvey P. Dale_, Jan 08 2023 *)
%Y Intersection of A000217 and A059094.
%Y Cf. A000578, A007953.
%K nonn,base
%O 1,3
%A Luc Stevens (lms022(AT)yahoo.com), Apr 29 2006
%E Corrected by _Harvey P. Dale_, Jan 08 2023