login
A356160
Numbers k such that the smallest positive k such that n divides k*A276086(k) is equal to n, where A276086 is primorial base exp-function.
3
1, 4, 5, 7, 8, 11, 13, 16, 17, 19, 23, 28, 29, 31, 32, 37, 41, 43, 44, 47, 52, 53, 59, 61, 64, 67, 68, 71, 73, 76, 79, 83, 88, 89, 92, 97, 101, 103, 104, 107, 108, 109, 113, 116, 121, 124, 127, 128, 131, 136, 137, 139, 143, 148, 149, 151, 152, 155, 157, 163, 164, 167, 169, 172, 173, 176, 179, 181, 184, 187, 188, 191
OFFSET
1,2
COMMENTS
Not a subsequence of A324583. The first five terms that occur here, but not there are: 2327, 2353, 2392, 2444, 2483.
PROG
(PARI)
A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
A356161(n) = for(k=1, oo, if((k*A276086(k))%n==0, return(n==k)));
isA356160(n) = A356161(n);
CROSSREFS
Fixed points of A355944, positions of zeros in of A355945.
Cf. A276086, A324580, A324583, A356161 (characteristic function).
Sequence in context: A032714 A032702 A359380 * A120753 A188322 A139201
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jul 28 2022
STATUS
approved