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

Author

Antti Karttunen, Apr 01 2022

Keywords

• nonn
• base

Links

• Antti Karttunen, Table of n, a(n) for n = 0..10080
• Index entries for sequences related to factorial base representation

Crossrefs

Cf. A069359, A276076, A329029, A351576.

Coincides with A351950 on positions given by A059590.

Programs

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));

Formula

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

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