The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A330587 A(n,k) is the n-th index m such that A330439(m) = k; square array A(n,k), n>=1, k>=1, read by antidiagonals. 4

%I

%S 0,3,1,6,7,2,13,10,9,4,21,16,12,15,5,23,31,19,18,17,8,27,38,36,29,25,

%T 20,11,33,41,49,44,30,26,24,14,46,43,55,56,59,40,37,34,22,67,52,64,58,

%U 62,61,50,39,35,28,81,70,78,76,73,72,69,51,47,53,32,104,94,91,88,84,75,79,82,66,57,54,42

%N A(n,k) is the n-th index m such that A330439(m) = k; square array A(n,k), n>=1, k>=1, read by antidiagonals.

%H Alois P. Heinz, <a href="/A330587/b330587.txt">Antidiagonals n = 1..365, flattened</a>

%e Square array A(n,k) begins:

%e 0, 3, 6, 13, 21, 23, 27, 33, 46, 67, ...

%e 1, 7, 10, 16, 31, 38, 41, 43, 52, 70, ...

%e 2, 9, 12, 19, 36, 49, 55, 64, 78, 91, ...

%e 4, 15, 18, 29, 44, 56, 58, 76, 88, 93, ...

%e 5, 17, 25, 30, 59, 62, 73, 84, 90, 98, ...

%e 8, 20, 26, 40, 61, 72, 75, 87, 117, 139, ...

%e 11, 24, 37, 50, 69, 79, 85, 121, 124, 154, ...

%e 14, 34, 39, 51, 82, 102, 118, 142, 155, 157, ...

%e 22, 35, 47, 66, 97, 110, 133, 180, 190, 202, ...

%e 28, 53, 57, 74, 106, 116, 164, 183, 197, 205, ...

%p b:= proc() 0 end:

%p g:= proc(n) option remember; local t;

%p t:= `if`(n<2, n, b(g(n-1))+b(g(n-2)));

%p b(t):= b(t)+1; t

%p end:

%p f:= proc(n) option remember; b(g(n)) end:

%p A:= proc() local l, t; t, l:= -1, proc() [] end;

%p proc(n,k) local h;

%p while nops(l(k))<n do t:= t+1;

%p h:= f(t); l(h):= [l(h)[], t]

%p od: l(k)[n]

%p end

%p end():

%p seq(seq(A(n, 1+d-n), n=1..d), d=1..14);

%Y Column k=1 gives A330440.

%Y Row n=1 gives A330588.

%Y Main diagonal gives A330589.

%Y Cf. A316774, A330439.

%K nonn,tabl

%O 1,2

%A _Alois P. Heinz_, Dec 18 2019

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 26 21:46 EDT 2020. Contains 337377 sequences. (Running on oeis4.)