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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A079068 Largest prime less than greatest prime factor of n but not dividing n, or 1 of no such prime exists. 3
1, 1, 2, 1, 3, 1, 5, 1, 2, 3, 7, 1, 11, 5, 2, 1, 13, 1, 17, 3, 5, 7, 19, 1, 3, 11, 2, 5, 23, 1, 29, 1, 7, 13, 3, 1, 31, 17, 11, 3, 37, 5, 41, 7, 2, 19, 43, 1, 5, 3, 13, 11, 47, 1, 7, 5, 17, 23, 53, 1, 59, 29, 5, 1, 11, 7, 61, 13, 19, 3, 67, 1, 71, 31, 2, 17, 5, 11, 73, 3, 2, 37, 79, 5, 13, 41, 23 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

LINKS

Alois P. Heinz, Table of n, a(n) for n = 1..20000

MAPLE

a:= proc(n) local p, s; s:= numtheory[factorset](n);

      if s={} then return 1

    else p:= max(s);

         do if p=2 then return 1 else p:= prevprime(p) fi;

            if not p in s then return p fi

         od

      fi

    end:

seq(a(n), n=1..100);  # Alois P. Heinz, Sep 03 2019

CROSSREFS

Cf. A079067, A006530.

Sequence in context: A101387 A117365 A116212 * A133021 A131208 A168008

Adjacent sequences:  A079065 A079066 A079067 * A079069 A079070 A079071

KEYWORD

nonn

AUTHOR

Reinhard Zumkeller, Dec 20 2002

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 October 16 20:23 EDT 2019. Contains 328103 sequences. (Running on oeis4.)