OFFSET
1,2
COMMENTS
LINKS
Reinhard Zumkeller, Rows n = 1..125 of table, flattened
PROG
(Haskell)
import Data.List (inits, tails)
a162711 n k = a162711_tabl !! (n-1) !! (k-1)
a162711_row n = a162711_tabl !! (n-1)
a162711_tabl = map (map (read . concatMap show) . tail . inits) $
zipWith take [1..] $ tails a007376_list :: [[Integer]]
-- Reinhard Zumkeller, Nov 11 2013
CROSSREFS
KEYWORD
AUTHOR
Reinhard Zumkeller, Jul 11 2009
STATUS
approved