A342466 a(n) = A336466(1+A000265(sigma(n))), where A336466 is fully multiplicative with a(p) = A000265(p-1) for p prime, and A000265(k) is the odd part of k.

1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 5, 1, 1, 1, 1, 1, 5, 1, 1, 1, 1, 1, 1, 1, 3, 1, 11, 1, 1, 1, 11, 5, 1, 1, 5, 1, 1, 1, 1, 7, 23, 1, 1, 3, 1, 1, 1, 1, 11, 1, 5, 1, 1, 3, 1, 5, 1, 1, 1, 1, 1, 1, 9, 9, 7, 1, 1, 1, 5, 1, 23, 15, 1, 5, 1, 3, 1, 1, 11, 11, 29, 1, 5, 1, 1, 1, 1, 1, 21, 1, 27, 3, 3, 3, 13, 1

Offset

1,9

Links

Table of n, a(n) for n=1..105.

Index entries for sequences related to sigma(n)

Formula

a(n) = A336466(A336698(n)) = A336466(A337194(n)).

a(n) = A000265(A003958(1+A161942(n))).

Prog

(PARI)
A000265(n) = (n>>valuation(n, 2));
A336466(n) = { my(f=factor(n)); prod(k=1, #f~, if(2==f[k, 1], 1, (A000265(f[k, 1]-1))^f[k, 2])); };
A337194(n) = (1+A000265(sigma(n)));
A342466(n) = A336466(A336698(n));

Crossrefs

Cf. A000203, A000265, A003958, A161942, A337194, A336466, A336698, A342465.

Sequence in context: A368711 A380325 A049586 * A133721 A083202 A030560

Adjacent sequences: A342463 A342464 A342465 * A342467 A342468 A342469

Keyword

nonn

Author

Antti Karttunen, Mar 16 2021

Status

approved