A340083 a(n) = (n-1) / gcd(n-1, A003958(n)).

0, 1, 1, 3, 1, 5, 1, 7, 2, 9, 1, 11, 1, 13, 7, 15, 1, 17, 1, 19, 5, 21, 1, 23, 3, 25, 13, 9, 1, 29, 1, 31, 8, 33, 17, 35, 1, 37, 19, 39, 1, 41, 1, 43, 11, 45, 1, 47, 4, 49, 25, 17, 1, 53, 27, 55, 14, 57, 1, 59, 1, 61, 31, 63, 4, 13, 1, 67, 17, 23, 1, 71, 1, 73, 37, 25, 19, 77, 1, 79, 5, 81, 1, 83, 21, 85, 43, 87, 1, 89, 5, 91, 23

Offset

1,4

Links

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

Antti Karttunen, Data supplement: n, a(n) computed for n = 1..65537

Formula

a(n) = (n-1) / A340081(n) = (n-1) / gcd(n-1, A003958(n)).

Prog

(PARI)
A003958(n) = if(1==n, n, my(f=factor(n)); for(i=1, #f~, f[i, 1]--); factorback(f));
A340083(n) = ((n-1)/gcd(n-1, A003958(n)));

Crossrefs

Cf. A003958, A340081, A340082.

Cf. also A160596, A340073.

Sequence in context: A093411 A147088 A346468 * A339667 A322993 A118402

Adjacent sequences: A340080 A340081 A340082 * A340084 A340085 A340086

Keyword

nonn

Author

Antti Karttunen, Dec 28 2020

Status

approved