A304735 a(n) = A048675(A064413(n)).

0, 1, 2, 3, 2, 4, 4, 3, 5, 4, 6, 5, 9, 8, 10, 5, 4, 6, 17, 16, 18, 6, 7, 8, 12, 10, 33, 32, 34, 6, 5, 65, 64, 66, 11, 129, 128, 130, 8, 7, 18, 257, 256, 258, 6, 9, 34, 7, 11, 16, 12, 8, 20, 36, 13, 513, 512, 514, 19, 1025, 1024, 1026, 7, 6, 66, 2049, 2048, 2050, 10, 35, 130, 8, 4097, 4096, 4098, 8, 12, 24, 19, 8193, 8192, 8194, 9, 68, 132, 10

Offset

1,3

Links

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

Index entries for sequences related to EKG sequence

Formula

a(n) = A048675(A064413(n)).

Prog

(PARI)
A048675(n) = { my(f = factor(n)); sum(k=1, #f~, f[k, 2]*2^primepi(f[k, 1]))/2; };
A304735(n) = A048675(A064413(n)); \\ Needs also code for A064413.

Crossrefs

Cf. A048675, A064301, A064413, A304736.

Sequence in context: A259363 A087437 A304739 * A318048 A235805 A168231

Adjacent sequences: A304732 A304733 A304734 * A304736 A304737 A304738

Keyword

nonn

Author

Antti Karttunen, May 18 2018

Status

approved