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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A066296 a(n) = floor(n^(1/omega[n])), small-omega-root of n. 2
2, 3, 4, 5, 2, 7, 8, 9, 3, 11, 3, 13, 3, 3, 16, 17, 4, 19, 4, 4, 4, 23, 4, 25, 5, 27, 5, 29, 3, 31, 32, 5, 5, 5, 6, 37, 6, 6, 6, 41, 3, 43, 6, 6, 6, 47, 6, 49, 7, 7, 7, 53, 7, 7, 7, 7, 7, 59, 3, 61, 7, 7, 64, 8, 4, 67, 8, 8, 4, 71, 8, 73, 8, 8, 8, 8, 4, 79, 8, 81, 9, 83, 4, 9, 9, 9, 9, 89, 4, 9, 9 (list; graph; refs; listen; history; text; internal format)
OFFSET

2,1

LINKS

Harry J. Smith, Table of n, a(n) for n=2..1000

FORMULA

a(n) = floor(n^(1/omega[n])) = floor(n^(1/A001221(n))).

EXAMPLE

a(n) = n if n is a power of prime.

MATHEMATICA

Table[Floor[n^(1/PrimeNu[n])], {n, 2, 50}] (* G. C. Greubel, May 08 2017 *)

PROG

(PARI) { for (n=2, 1000, a=floor(n^(1/omega(n))); write("b066296.txt", n, " ", a) ) } \\ Harry J. Smith, Feb 08 2010

CROSSREFS

Cf. A001221, A000040, A002808.

Sequence in context: A034684 A028233 A216972 * A162961 A145255 A053626

Adjacent sequences:  A066293 A066294 A066295 * A066297 A066298 A066299

KEYWORD

nonn

AUTHOR

Labos Elemer, Dec 12 2001

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 October 21 19:27 EDT 2018. Contains 316428 sequences. (Running on oeis4.)