login
A224841
Triangle T(n,k) read by rows: Substring of k digits of sequence A007376, ending at position n, 1 <= k <= n.
2
1, 2, 12, 3, 23, 123, 4, 34, 234, 1234, 5, 45, 345, 2345, 12345, 6, 56, 456, 3456, 23456, 123456, 7, 67, 567, 4567, 34567, 234567, 1234567, 8, 78, 678, 5678, 45678, 345678, 2345678, 12345678, 9, 89, 789, 6789, 56789, 456789, 3456789, 23456789, 123456789
OFFSET
1,2
COMMENTS
In contrast to sequence A162711, this sequence contains each substring without leading zero of A007376 at least once.
LINKS
PROG
(PARI) for(i=1, 9, for(j=1, i, for(k=i-j+1, i, print1(k)); print1(", ")))
(Haskell)
import Data.List (inits, tails)
a224841 n k = a224841_tabl !! (n-1) !! (k-1)
a224841_row n = a224841_tabl !! (n-1)
a224841_tabl = map
(reverse . map (read . concatMap show) . init . tails) $
tail $ inits a007376_list :: [[Integer]]
-- Reinhard Zumkeller, Nov 11 2013
CROSSREFS
Sequence in context: A048794 A365703 A275841 * A363932 A317206 A164869
KEYWORD
nonn,easy,base,tabl
AUTHOR
M. F. Hasler, Jul 22 2013
STATUS
approved