This site is supported by donations to The OEIS Foundation.

 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.

Last modified October 16 20:23 EDT 2019. Contains 328103 sequences. (Running on oeis4.)