Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A111240
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A111240 Index at which n-th prime appears in A109890. +0
2
2, 3, 9, 23, 40, 22, 67, 49, 43, 48, 58, 89, 76, 151, 98, 24, 44, 59, 185, 100, 271, 122, 207, 178, 84, 217, 130, 31, 88, 145, 357, 119, 138, 309, 123, 47, 590, 150, 334, 684, 245, 39, 139, 81, 66, 70, 253, 642, 737, 227, 50, 144, 131, 422, 496, 479, 516, 389, 715 (list; graph; listen)
OFFSET

1,1

EXAMPLE

The 4th prime, 7, is A109890(23), so a(4) = 23.

MAPLE

A109890 := proc(nmin) local a, i, k, apsum; a := [1] ; apsum := 1 ; while nops(a) < nmin do k := 1; while k in a or not ( apsum mod k = 0 or k mod apsum = 0 ) do k := k+1 ; od ; a := [op(a), k] ; apsum := apsum+k ; od; RETURN(a) ; end: A111240 := proc(nmin) local a, a109890, n, i; a := [] ; a109890 := A109890(nmin) ; n := 1; while member( ithprime(n), a109890, 'i') do a := [op(a), i] ; n := n+1 ; od; RETURN(a) ; end: A111240(560) ; - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Aug 20 2007

CROSSREFS

Sequence in context: A057832 A089421 A151825 this_sequence A056198 A143742 A038523

Adjacent sequences: A111237 A111238 A111239 this_sequence A111241 A111242 A111243

KEYWORD

nonn

AUTHOR

N. J. A. Sloane (njas(AT)research.att.com), Oct 30 2005

EXTENSIONS

More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Aug 20 2007

More terms from David Wasserman (dwasserm(AT)earthlink.net), Jan 07 2009

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified December 13 23:45 EST 2009. Contains 170824 sequences.


AT&T Labs Research