OFFSET
1,3
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..16384
PROG
(PARI) A323155(n) = { my(m=1); fordiv(n, d, if(isprime(d-1), m *= (d-1)^(1+valuation(n, d-1)))); (m); }; \\ Antti Karttunen, Jan 09 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jan 09 2019
STATUS
approved