A351951 a(n) = A069359(A276076(n)).

0, 1, 1, 5, 3, 15, 1, 7, 8, 31, 24, 93, 5, 35, 40, 155, 120, 465, 25, 175, 200, 775, 600, 2325, 1, 9, 10, 41, 30, 123, 12, 59, 71, 247, 213, 741, 60, 295, 355, 1235, 1065, 3705, 300, 1475, 1775, 6175, 5325, 18525, 7, 63, 70, 287, 210, 861, 84, 413, 497, 1729, 1491, 5187, 420, 2065, 2485, 8645, 7455, 25935, 2100

Offset

0,4

Links

Antti Karttunen, Table of n, a(n) for n = 0..10080

Index entries for sequences related to factorial base representation

Formula

a(n) = A069359(A276076(n)).

a(n) = A329029(A351576(n)).

Prog

(PARI)
A069359(n) = (n*sumdiv(n, d, isprime(d)/d)); \\ From A069359
A276076(n) = { my(i=0, m=1, f=1, nextf); while((n>0), i=i+1; nextf = (i+1)*f; if((n%nextf), m*=(prime(i)^((n%nextf)/f)); n-=(n%nextf)); f=nextf); m; };
A351951(n) = A069359(A276076(n));

Crossrefs

Cf. A069359, A276076, A329029, A351576.

Coincides with A351950 on positions given by A059590.

Sequence in context: A213750 A213774 A167583 * A329029 A248983 A298975

Adjacent sequences: A351948 A351949 A351950 * A351952 A351953 A351954

Keyword

nonn,base

Author

Antti Karttunen, Apr 01 2022

Status

approved