login
A344028
a(n) = A069359(A005940(1+n)).
3
0, 1, 1, 2, 1, 5, 3, 4, 1, 7, 8, 10, 5, 15, 9, 8, 1, 9, 10, 14, 12, 31, 24, 20, 7, 35, 40, 30, 25, 45, 27, 16, 1, 13, 14, 18, 16, 41, 30, 28, 18, 59, 71, 62, 60, 93, 72, 40, 11, 63, 70, 70, 84, 155, 120, 60, 49, 175, 200, 90, 125, 135, 81, 32, 1, 15, 16, 26, 18, 61, 42, 36, 20, 87, 103, 82, 80, 123, 90, 56, 24, 113, 131
OFFSET
0,4
COMMENTS
Coincides with A344026 on Fibbinary numbers, A003714.
FORMULA
a(n) = A069359(A005940(1+n)).
PROG
(PARI)
A069359(n) = (n*sumdiv(n, d, isprime(d)/d)); \\ From A069359
A005940(n) = { my(p=2, t=1); n--; until(!n\=2, if((n%2), (t*=p), p=nextprime(p+1))); (t); };
A344028(n) = A069359(A005940(1+n));
CROSSREFS
Cf. A000079 (positions of ones), A003714, A005940, A069359, A344026, A344182.
Sequence in context: A163840 A122833 A193692 * A075303 A076062 A295563
KEYWORD
nonn,look
AUTHOR
Antti Karttunen, May 11 2021
STATUS
approved