login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A094162 Where n first appears in A093320. 1
1, 6, 26, 78, 390, 2262, 7878, 30966, 154830, 890214, 3127566 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

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

MATHEMATICA

PrimeFactors[n_Integer] := Flatten[ Table[ # [[1]], {1}] & /@ FactorInteger[n]]; a[1] = 1; a[n_] := a[n] = (Plus @@ (a[ # ] & /@ PrimePi[ PrimeFactors[n]])); b = Table[0, {12}]; Do[c = a[n]; If[ b[[c]] == 0, b[[c]] = n]], {n, 11500000}]

CROSSREFS

Cf. A093320.

Sequence in context: A255870 A286188 A335648 * A229572 A316160 A224035

Adjacent sequences:  A094159 A094160 A094161 * A094163 A094164 A094165

KEYWORD

nonn

AUTHOR

Robert G. Wilson v, May 04 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
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 22 11:29 EDT 2020. Contains 337289 sequences. (Running on oeis4.)