A132989 Inverse permutation to sequence A132988.

1, 2, 3, 4, 8, 5, 6, 9, 7, 10, 14, 15, 27, 13, 17, 11, 19, 16, 12, 22, 23, 29, 33, 20, 35, 42, 28, 34, 40, 24, 18, 31, 32, 26, 70, 41, 21, 30, 51, 46, 38, 39, 55, 56, 57, 50, 60, 43, 25, 87, 97, 64, 47, 83, 85, 48, 49, 69, 71, 52, 93, 84, 54, 76, 77, 45, 79, 58, 144, 81, 61, 72

Offset

1,2

Links

Klaus Brockhaus, Table of n, a(n) for n = 1..10000

Index entries for sequences that are permutations of the natural numbers

Example

A132988(11) = 16, hence a(16) = 11; A132988(15) = 12, hence a(12) = 15.

Prog

(PARI) {m=150; v=vector(m); w=vectorsmall(4*m); for(n=1, m, k=1; while(w[k]||(prime(n)+1)%k>0, k++); v[n]=k; w[k]=1); u=vector(m); for(j=1, m, a=v[j]; if(0<a&&a<=m, u[a]=j)); j=1; while(j<=m&&u[j]>0, print1(u[j], ", "); j++)}

Crossrefs

Cf. A132988.

Sequence in context: A366656 A175060 A138773 * A283814 A360597 A114881

Adjacent sequences: A132986 A132987 A132988 * A132990 A132991 A132992

Keyword

nonn

Author

Klaus Brockhaus, Sep 14 2007

Status

approved