A389083 Inverse map for A130789, where A130789 gives primes sorted according to decreasing ratio A001223(n)/A000040(n).

3, 1, 4, 2, 9, 5, 12, 7, 6, 21, 8, 14, 27, 16, 10, 13, 41, 15, 23, 44, 18, 26, 19, 17, 32, 61, 34, 64, 36, 11, 42, 29, 85, 20, 93, 33, 35, 48, 37, 39, 107, 25, 119, 58, 122, 22, 24, 69, 142, 71, 45, 152, 31, 50, 53, 54, 169, 57, 87, 174, 38, 28, 95, 187, 96, 30, 67, 43, 211, 104, 73, 56, 77, 80, 115, 82, 59, 124, 60

Offset

1,1

Links

Antti Karttunen, Table of n, a(n) for n = 1..2062

Index entries for primes, gaps between.

Index entries for sequences that are permutations of the natural numbers.

Prog

(PARI)
v130789 = readvec("b130789_to.txt"); \\ Prepared with gawk ' { print $2 } ' < b130789.txt > b130789_to.txt
A130789(n) = v130789[n];
invmap = Map(); for(i=1, #v130789, mapput(invmap, primepi(A130789(i)), i));
A389083(n) = mapget(invmap, n);

Crossrefs

Cf. A000040, A001223, A130789, A389084, A389085.

Sequence in context: A068028 A240058 A379065 * A275896 A340754 A163359

Adjacent sequences: A389080 A389081 A389082 * A389084 A389085 A389086

Keyword

nonn

Author

Antti Karttunen, Sep 24 2025

Status

approved