login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A175650 a(n)=A066031(n)/sopf(A066031(n)). 0
3, 6, 5, 7, 9, 7, 12, 10, 15, 14, 18, 11, 13, 24, 21, 13, 27, 20, 11, 30, 21, 28, 25, 36, 45, 19, 26, 48, 35, 42, 26, 35, 33, 19, 54, 40, 22, 49, 60, 19, 17, 56, 33, 50, 39, 72, 49, 75, 63, 23, 81, 23, 90, 38, 52, 63, 96, 70, 84, 52, 66, 38, 108, 31, 80, 34, 44, 98, 120, 51, 34 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..71.

MATHEMATICA

Reap[Do[PFL=PrimeFactorList[n]; sopf=Plus@@PFL;

If[Length[PFL]>1&&Mod[n, sopf]==0, Sow[n/sopf]], {n, 2, 2000}]][[2, 1]]

CROSSREFS

A008472, A066031.

Sequence in context: A282581 A247581 A322887 * A272976 A113533 A330525

Adjacent sequences:  A175647 A175648 A175649 * A175651 A175652 A175653

KEYWORD

nonn

AUTHOR

Zak Seidov, Aug 02 2010

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
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 26 22:05 EST 2022. Contains 350601 sequences. (Running on oeis4.)