A304739 a(n) = A056239(A064413(n)).

0, 1, 2, 3, 2, 4, 4, 3, 4, 3, 5, 5, 5, 4, 6, 5, 4, 5, 6, 5, 7, 6, 6, 6, 7, 6, 7, 6, 8, 6, 5, 8, 7, 9, 7, 9, 8, 10, 7, 6, 7, 10, 9, 11, 6, 7, 8, 7, 7, 8, 8, 7, 8, 9, 8, 11, 10, 12, 8, 12, 11, 13, 7, 6, 9, 13, 12, 14, 8, 9, 10, 7, 14, 13, 15, 8, 8, 9, 8, 15, 14, 16, 8, 10, 11, 8, 11, 16, 15, 17, 7, 9, 10, 9, 10, 9, 9, 8, 17, 16, 18, 11, 9, 8, 12

Offset

1,3

Comments

For visualizing of the EKG-sequence, A064413.

Links

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

Index entries for sequences related to EKG sequence

Formula

a(n) = A056239(A064413(n)).

Prog

(PARI)
A056239(n) = { my(f); if(1==n, 0, f=factor(n); sum(i=1, #f~, f[i, 2] * primepi(f[i, 1]))); }
A304739(n) = A056239(A064413(n)); \\ Needs also code for A064413.

Crossrefs

Cf. A056239, A064413, A304735.

Sequence in context: A214567 A259363 A087437 * A304735 A318048 A235805

Adjacent sequences: A304736 A304737 A304738 * A304740 A304741 A304742

Keyword

nonn

Author

Antti Karttunen, May 19 2018

Status

approved