cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A117803 Triangular numbers for which the sum of the digits is a cube.

This page as a plain text file.
%I A117803 #15 Jan 08 2023 12:56:03
%S A117803 0,1,10,5778,5886,6786,7875,17766,17955,27495,29646,31878,36585,38781,
%T A117803 43956,46665,46971,49455,49770,55278,58653,61776,64980,68265,74691,
%U A117803 75078,78606,85491,85905,89253,93096,93528,97461,109278,109746,117855
%N A117803 Triangular numbers for which the sum of the digits is a cube.
%H A117803 Harvey P. Dale, <a href="/A117803/b117803.txt">Table of n, a(n) for n = 1..1000</a>
%e A117803 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 A117803 Select[Accumulate[Range[500]],IntegerQ[Power[Total[IntegerDigits[#]], (3)^-1]]&]  (* _Harvey P. Dale_, Dec 19 2010 *)
%t A117803 Select[Accumulate[Range[0,500]],IntegerQ[Surd[Total[IntegerDigits[#]],3]]&] (* _Harvey P. Dale_, Jan 08 2023 *)
%Y A117803 Intersection of A000217 and A059094.
%Y A117803 Cf. A000578, A007953.
%K A117803 nonn,base
%O A117803 1,3
%A A117803 Luc Stevens (lms022(AT)yahoo.com), Apr 29 2006
%E A117803 Corrected by _Harvey P. Dale_, Jan 08 2023