A365717 a(n) is the least k such that A003961^i(k) = A356867(1+n) for some i >= 0, where A003961^i denotes the i-th iterate of prime shift, and A356867 is Sycamore's Doudna variant D(3).

1, 2, 2, 2, 4, 6, 10, 8, 4, 2, 14, 6, 4, 20, 12, 50, 16, 18, 6, 28, 30, 8, 40, 24, 100, 32, 8, 2, 22, 10, 10, 44, 42, 70, 56, 12, 4, 98, 18, 12, 140, 60, 250, 80, 36, 18, 196, 150, 16, 200, 48, 500, 64, 54, 6, 110, 30, 20, 88, 84, 350, 112, 90, 8, 490, 54, 24, 280, 120, 1250, 160, 72, 36, 392, 300, 32, 400, 96, 1000

Offset

0,2

Links

Antti Karttunen, Table of n, a(n) for n = 0..19683

Formula

a(n) = A348717(A356867(1+n)).

Prog

(PARI)
A348717(n) = if(1==n, 1, my(f = factor(n), k = primepi(f[1, 1])-1); for (i=1, #f~, f[i, 1] = prime(primepi(f[i, 1])-k)); factorback(f));
A365717(n) = A348717(A356867(1+n)); \\ Needs also program from A356867.

Crossrefs

Cf. A348717, A356867, A365718 (rgs-transform), A365719, A365721, A365722.

Sequence in context: A272371 A191651 A010558 * A060827 A188288 A064355

Adjacent sequences: A365714 A365715 A365716 * A365718 A365719 A365720

Keyword

nonn

Author

Antti Karttunen, Sep 17 2023

Status

approved