login
A356302
The least k >= 0 such that n and A276086(n+k) are relatively prime, where A276086 is the primorial base exp-function.
12
0, 0, 0, 3, 0, 0, 0, 0, 0, 3, 20, 0, 0, 0, 0, 15, 0, 0, 0, 0, 10, 3, 0, 0, 0, 5, 0, 3, 0, 0, 0, 0, 0, 3, 0, 175, 0, 0, 0, 3, 20, 0, 168, 0, 0, 15, 0, 0, 0, 161, 10, 3, 0, 0, 0, 5, 154, 3, 0, 0, 0, 0, 0, 147, 0, 0, 0, 0, 0, 3, 140, 0, 0, 0, 0, 15, 0, 2233, 0, 0, 10, 3, 0, 0, 126, 5, 0, 3, 0, 0, 0, 119, 0, 3, 0, 0, 0, 0, 112
OFFSET
0,4
COMMENTS
For all nonzero terms, adding a(n) to n in primorial base generates at least one carry. See the formula involving A329041.
FORMULA
a(n) = A356309(n) - n.
If a(n) > 0, then A000035(a(n)) = A000035(n) and A329041(n, a(n)) > 1.
PROG
(PARI)
A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
A356302(n) = { my(k=0); while(gcd(A276086(n+k), n)!=1, k++); (k); };
CROSSREFS
Cf. A324583 (positions of zeros), A324584 (of nonzeros), A356318 (positions where a(n) > 0 and a multiple of n), A356319 (where 0 < a(n) < n).
Cf. A358213, A358214 (conjectured positions of records and their values).
Cf. also A356303, A356304.
Sequence in context: A094518 A123074 A095269 * A308275 A308254 A111417
KEYWORD
nonn,look
AUTHOR
Antti Karttunen, Nov 03 2022
STATUS
approved