A140685 - OEIS

%I #29 Jan 03 2024 09:31:29

%S 1,2,2,2,1,2,2,2,2,2,2,2,1,2,2,2,2,2,2,2,2,2,2,2,1,2,2,2,2,2,2,2,2,2,

%T 2,2,2,2,2,2,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,2,2,2,2,2,2,2,

%U 2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,1,2,2,2,2,2,2,2

%N Triangle T(n,k) read by rows: T(n,k) = 1 if n is odd and k=(n-1)/2; T(n,k) = 2 otherwise.

%C Row sums give A042948.

%H Antti Karttunen, <a href="/A140685/b140685.txt">Table of n, a(n) for n = 1..10440; the first 144 rows of the triangle</a>

%e The triangle starts in row n=1 with columns 0 <= k < n as:

%e   1;

%e   2, 2;

%e   2, 1, 2;

%e   2, 2, 2, 2;

%e   2, 2, 1, 2, 2;

%e   2, 2, 2, 2, 2, 2;

%e   2, 2, 2, 1, 2, 2, 2;

%e   2, 2, 2, 2, 2, 2, 2, 2;

%e   2, 2, 2, 2, 1, 2, 2, 2, 2;

%e   2, 2, 2, 2, 2, 2, 2, 2, 2, 2;

%o (Scheme)

%o (define (A140685 n) (A140685tr (A002024 n) (- (A002260 n) 1)))

%o (define (A140685tr n k) (if (and (odd? n) (= k (/ (- n 1) 2))) 1 2))

%Y Cf. A002024, A002260, A104041.

%K nonn,tabl,easy

%O 1,2

%A _Roger L. Bagula_ and _Mats Granvik_, Jul 11 2008

%E Definition simplified by the Assoc. Eds. of the OEIS, Oct 12 2010

%E More terms from _Antti Karttunen_, Oct 10 2017