cp's OEIS Frontend

A274079 Table read by rows: the n-th row is the list of numbers diagonally up and to the right of n in the natural numbers read by antidiagonals.

%I A274079 #13 Jul 02 2016 22:55:15
%S A274079 2,4,5,4,7,8,7,9,8,7,11,12,11,13,12,11,14,13,12,11,16,17,16,18,17,16,
%T A274079 19,18,17,16,20,19,18,17,16,22,23,22,24,23,22,25,24,23,22,26,25,24,23,
%U A274079 22,27,26,25,24,23,22,29,30,29,31,30,29,32,31,30,29,33,32
%N A274079 Table read by rows: the n-th row is the list of numbers diagonally up and to the right of n in the natural numbers read by antidiagonals.
%H A274079 Peter Kagey, <a href="/A274079/b274079.txt">Table of n, a(n) for n = 1..10000</a>
%e A274079 A000027 read by antidiagonals is:
%e A274079 1 2 4 7
%e A274079 3 5 8
%e A274079 6 9
%e A274079 ...
%e A274079 Thus:
%e A274079 Row 1: []
%e A274079 Row 2: []
%e A274079 Row 3: [2]
%e A274079 Row 4: []
%e A274079 Row 5: [4]
%e A274079 Row 6: [5, 4]
%e A274079 Row 7: []
%e A274079 Row 8: [7]
%e A274079 Row 9: [8, 7]
%t A274079 Table[Reverse@ Range[SelectFirst[Reverse@ #, # < n &] + 1, n - 1] - 1, {n, 2, 35}] &[Accumulate@ Range[0, 15] + 1] // Flatten (* _Michael De Vlieger_, Jun 10 2016, Version 10 *)
%o A274079 (Haskell)
%o A274079 a274079 n = a274079_list !! (n - 1)
%o A274079 a274079_list = concatMap a274079_row [1..]
%o A274079 a274079_tabf = map a274079_row [1..]
%o A274079 a274079_row n = [n-1, n-2..n - a002262 (n - 1)]
%Y A274079 Cf. A000027, A269526, A273823, A273824, A273825, A274080.
%K A274079 nonn,tabf
%O A274079 1,1
%A A274079 _Peter Kagey_, Jun 09 2016