login
A278530
a(n) = A056239(A260443(n)).
3
0, 1, 2, 3, 3, 5, 5, 6, 4, 8, 8, 10, 7, 11, 9, 10, 5, 12, 12, 16, 11, 18, 15, 17, 9, 18, 16, 20, 12, 19, 14, 15, 6, 17, 17, 24, 16, 28, 23, 27, 14, 29, 26, 33, 20, 32, 24, 26, 11, 27, 25, 34, 21, 36, 28, 32, 15, 31, 26, 33, 18, 29, 20, 21, 7, 23, 23, 34, 22, 41, 33, 40, 20, 44, 39, 51, 30, 50, 37, 41, 17, 43, 40, 55, 34, 59, 46, 53, 25, 52, 44, 56, 31, 50, 35
OFFSET
0,3
LINKS
FORMULA
a(n) = A056239(A260443(n)).
PROG
(Scheme)
(define (A278530 n) (sum_A000027_times_elements_in (A260443as_coeff_list n)))
(define (sum_A000027_times_elements_in nums) (let loop ((s 0) (nums nums) (i 1)) (cond ((null? nums) s) (else (loop (+ s (* (car nums) i)) (cdr nums) (+ 1 i))))))
;; Other code as in A260443.
CROSSREFS
Cf. also A276081.
Sequence in context: A286870 A262319 A262488 * A330332 A023816 A353714
KEYWORD
nonn
AUTHOR
Antti Karttunen, Dec 11 2016
STATUS
approved