This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A111272 Where n-th prime occurs in A111267. 2
 3, 10, 2, 8, 17, 49, 4, 23, 41, 7, 39, 29, 6, 50, 79, 121, 30, 151, 38, 19, 267, 48, 174, 21, 287, 422, 240, 24, 94, 22, 16, 215, 861, 231, 143, 140, 396, 902, 18, 134, 340, 310, 269, 58, 12, 550, 479, 210, 229, 612, 221, 271, 194, 540, 145, 718, 168, 184, 90, 14, 272 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS MAPLE A111267 := proc(nmin) local a, k, qn, dvs; a := [1] ; qn := 5 ; while nops(a) < nmin do dvs := sort([op(numtheory[divisors](qn))]) ; for k from 1 to nops(dvs) do if not dvs[k] in a then a := [op(a), dvs[k]] ; qn := qn+ithprime(nops(a)+1) ; break ; fi ; od ; od; RETURN(a) ; end: A111272 := proc(nmin) local a, a111267, n, i; a := [] ; a111267 := A111267(nmin) ; n := 1; while member( ithprime(n), a111267, 'i') do a := [op(a), i] ; n := n+1 ; od; RETURN(a) ; end: A111272(1000) ; # R. J. Mathar, Aug 20 2007 CROSSREFS Cf. A111267, A111287. Sequence in context: A234935 A016450 A179397 * A124692 A091043 A321118 Adjacent sequences:  A111269 A111270 A111271 * A111273 A111274 A111275 KEYWORD nonn AUTHOR N. J. A. Sloane, Nov 03 2005 EXTENSIONS More terms from R. J. Mathar, Aug 20 2007 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 18 15:21 EDT 2019. Contains 328162 sequences. (Running on oeis4.)