Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A125718
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A125718 a(1)=1. a(n) = the smallest positive integer not occurring earlier in the sequence such that the n-th prime is congruent to a(n) (mod n). +0
1
1, 3, 2, 7, 6, 13, 10, 11, 5, 9, 20, 25, 15, 29, 17, 21, 8, 43, 48, 31, 52, 35, 14, 41, 22, 23, 49, 51, 80, 53, 34, 67, 38, 37, 44, 79, 46, 87, 50, 93, 56, 55, 19, 61, 62, 107, 70, 127, 129, 179, 131, 83, 82, 89, 92, 39, 98, 97, 100, 101, 161, 45, 118, 119, 183, 185, 63, 65 (list; graph; listen)
OFFSET

1,2

COMMENT

This sequence seems likely to be a permutation of the positive integers. It will be if every positive number appears in A004648 (cf. A127149, A127150).

LINKS

Ferenc Adorjan, Table of n,a(n) for n=1,10000

Leroy Quet, Home Page (listed in lieu of email address)

Ferenc Adorjan, Some characteristics of Leroy Quet's permutation sequences

Ferenc Adorjan, More about the structure of Leroy Quet's sequences A125715, A125717, A125718 & A125727

MATHEMATICA

f[l_List] := Block[{n = Length[l] + 1, k = Mod[Prime[n], n, 1]}, While[MemberQ[l, k], k += n]; Append[l, k]]; Nest[f, {1}, 70] (*Chandler*)

PROGRAM

(PARI) {Quet_p3(n)= /* Permutation sequence a'la Leroy Quet, A125718 */local(x=[1], k=0, w=1); for(i=2, n, if((k=prime(i)%i)==0, k=i); while(bittest(w, k-1)>0, k+=i); x=concat(x, k); w+=2^(k-1)); return(x)}

CROSSREFS

Cf. A004648.

Sequence in context: A122336 A122355 A058646 this_sequence A014841 A056476 A056481

Adjacent sequences: A125715 A125716 A125717 this_sequence A125719 A125720 A125721

KEYWORD

nonn

AUTHOR

Leroy Quet Feb 01 2007

EXTENSIONS

Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Feb 04 2007

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 17 13:29 EST 2009. Contains 170826 sequences.


AT&T Labs Research