0,6

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

a(n) = Sum_{i=n^2 .. ((n+1)^2)-1} A072401(i).

Other identities.

For n >= 0, 1 + A077773(n) + A277193(n) + a(n) = 2n+1.

For n >= 1, A277192(n) = A077773(n) + a(n).

(Scheme)

(define (A277194 n) (add A072401 (A000290 n) (+ -1 (A000290 (+ 1 n)))))

;; Implements sum_{i=lowlim..uplim} intfun(i)

(define (add intfun lowlim uplim) (let sumloop ((i lowlim) (res 0)) (cond ((> i uplim) res) (else (sumloop (1+ i) (+ res (intfun i)))))))

Cf. A000290, A002828, A010052, A072401, A077773, A229062, A277192, A277193.

Sequence in context: A074712 A271914 A087735 * A172151 A106250 A029248

Adjacent sequences: A277191 A277192 A277193 * A277195 A277196 A277197

nonn

Antti Karttunen, Oct 04 2016

approved