login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A098838 Smith cubic numbers. 1
27, 729, 19683, 474552, 7077888, 7414875, 8489664, 62099136, 112678587, 236029032, 246491883, 257259456, 279726264, 345948408, 463684824, 567663552, 638277381, 721734273, 766060875, 988047936, 1177583616, 1412467848, 2131746903, 2493326016, 2714704875 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Donovan Johnson, Table of n, a(n) for n = 1..10000

EXAMPLE

a(1) = 27 because 27 is a Smith number as well as a cube.

MATHEMATICA

d[n_]:=IntegerDigits[n]; tr[n_]:=Transpose[FactorInteger[n]]; t={}; Do[If[!PrimeQ[n]&&Total[d[n]]==Total[d@tr[n][[1]]*tr[n][[2]], 2], AppendTo[t, n]], {n, Range[2, 1400]^3}]; t (* Jayanta Basu, Jun 04 2013 *)

CROSSREFS

Cf. A006753.

Sequence in context: A223571 A228973 A171301 * A268015 A009971 A046240

Adjacent sequences:  A098835 A098836 A098837 * A098839 A098840 A098841

KEYWORD

base,nonn

AUTHOR

Shyam Sunder Gupta, Oct 10 2004

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified February 22 14:58 EST 2017. Contains 282487 sequences.