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.

A067071 Numbers with no zeros in their cubes such that the products of the digits of their cubes are also cubes.

This page as a plain text file.
%I A067071 #18 Apr 13 2025 13:10:35
%S A067071 1,2,29,61,211,224,259,331,406,456,704,758,774,819,822,906,1578,1708,
%T A067071 1768,2246,2313,2332,2474,3409,3982,4006,4046,4331,4347,4348,4367,
%U A067071 4376,4608,4832,4865,4921,5226,5332,5477,5554,5692,5774,5971,6357,6408,6449
%N A067071 Numbers with no zeros in their cubes such that the products of the digits of their cubes are also cubes.
%D A067071 Felice Russo, A set of new Smarandache Functions, Sequences and conjectures in number theory, American Research Press, Lupton USA.
%e A067071 224 belongs to this sequence as 224^3 = 11239424 and the product of the digits = 1728 = 12^3.
%t A067071 Do[a = Apply[Times, IntegerDigits[n^3]]; If[ a != 0 && IntegerQ[a^(1/3)], Print[n]], {n, 1, 10^4} ]
%t A067071 Select[Range[7000],With[{c=Times@@IntegerDigits[#^3]},c>0&&IntegerQ[CubeRoot[c]]]&] (* _Harvey P. Dale_, Apr 13 2025 *)
%K A067071 nonn,base
%O A067071 1,2
%A A067071 _Amarnath Murthy_, Jan 05 2002
%E A067071 More terms from _Robert G. Wilson v_, Jan 15 2002
%E A067071 Offset changed by _Andrew Howroyd_, Sep 17 2024
%E A067071 Definition clarified by _Harvey P. Dale_, Apr 13 2025