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.

A115673 Brilliant numbers (A078972) whose digit reversal is a cube.

This page as a plain text file.
%I A115673 #6 Jun 12 2014 09:04:47
%S A115673 10,70597,76121,211591,291149,616571,7272901,57337417,378806833,
%T A115673 789116813,823405771,888373133,1692598807,1939045681,4836390103,
%U A115673 15291850411,33665303431,37060704397,44784187919,46061286319,52604613989,52625529791,52651506241,57380319289
%N A115673 Brilliant numbers (A078972) whose digit reversal is a cube.
%H A115673 Harvey P. Dale, <a href="/A115673/b115673.txt">Table of n, a(n) for n = 1..1000</a>
%e A115673 76121=163*467 is brilliant and 12167=23^3.
%t A115673 bnQ[n_]:=Module[{f=Transpose[FactorInteger[n]]},Total[f[[2]]]==2&&Length[Union[ IntegerLength[f[[1]]]]]==1]; Join[{10},Select[Union[ FromDigits[ Reverse[ IntegerDigits[#]]]&/@ (Range[5000]^3)],bnQ]] (* _Harvey P. Dale_, Jun 12 2014 *)
%Y A115673 Cf. A078972, A115674.
%K A115673 nonn,base
%O A115673 1,1
%A A115673 _Giovanni Resta_, Jan 31 2006
%E A115673 a(7)-a(20) from _Donovan Johnson_, Mar 10 2010
%E A115673 More terms from _Harvey P. Dale_, Jun 12 2014