A285335 Odd bisection of A048675 divided by two: a(n) = A048675((2*n)-1)/2.

0, 1, 2, 4, 2, 8, 16, 3, 32, 64, 5, 128, 4, 3, 256, 512, 9, 6, 1024, 17, 2048, 4096, 4, 8192, 8, 33, 16384, 10, 65, 32768, 65536, 6, 18, 131072, 129, 262144, 524288, 5, 12, 1048576, 4, 2097152, 34, 257, 4194304, 20, 513, 66, 8388608, 10, 16777216, 33554432, 7, 67108864, 134217728, 1025, 268435456, 130, 18, 36, 16, 2049, 6

Offset

1,3

Links

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

Formula

a(n) = A048675((2*n)-1)/2.

a(n) = A048675(A064216(n)).

Prog

(PARI)
A048675(n) = { my(f = factor(n)); sum(k=1, #f~, f[k, 2]*2^primepi(f[k, 1]))/2; }; \\ After Michel Marcus
A285335(n) = A048675((2*n)-1)/2;
(Scheme)
(define (A285335 n) (A048675 (A064216 n)))
(define (A285335 n) (/ (A048675 (+ n n -1)) 2))

Crossrefs

Cf. A048675, A064216.

Sequence in context: A051288 A120434 A319030 * A187619 A008303 A349209

Adjacent sequences: A285332 A285333 A285334 * A285336 A285337 A285338

Keyword

nonn

Author

Antti Karttunen, Apr 24 2017

Status

approved