1,1

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

a(n) = A000688(4*n). - Antti Karttunen, Sep 27 2018

(PARI) A101876(n) = factorback(apply(e -> numbpart(e), factor(4*n)[, 2])); \\ Antti Karttunen, Sep 27 2018

Bisection of A101872, quadrisection of A000688.

Cf. A000041.

Sequence in context: A056927 A094290 A265111 * A260218 A087986 A129088

Adjacent sequences: A101873 A101874 A101875 * A101877 A101878 A101879

nonn,easy

N. J. A. Sloane, Jan 28 2005

More terms from Joshua Zucker, May 10 2006

approved