cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A224841 Triangle T(n,k) read by rows: Substring of k digits of sequence A007376, ending at position n, 1 <= k <= n.

This page as a plain text file.
%I A224841 #13 Nov 11 2013 10:30:37
%S A224841 1,2,12,3,23,123,4,34,234,1234,5,45,345,2345,12345,6,56,456,3456,
%T A224841 23456,123456,7,67,567,4567,34567,234567,1234567,8,78,678,5678,45678,
%U A224841 345678,2345678,12345678,9,89,789,6789,56789,456789,3456789,23456789,123456789
%N A224841 Triangle T(n,k) read by rows: Substring of k digits of sequence A007376, ending at position n, 1 <= k <= n.
%C A224841 In contrast to sequence A162711, this sequence contains each substring without leading zero of A007376 at least once.
%H A224841 Reinhard Zumkeller, <a href="/A224841/b224841.txt">Rows n = 1..125 of table, flattened</a>
%o A224841 (PARI) for(i=1,9,for(j=1,i,for(k=i-j+1,i,print1(k));print1(",")))
%o A224841 (Haskell)
%o A224841 import Data.List (inits, tails)
%o A224841 a224841 n k = a224841_tabl !! (n-1) !! (k-1)
%o A224841 a224841_row n = a224841_tabl !! (n-1)
%o A224841 a224841_tabl = map
%o A224841    (reverse . map (read . concatMap show) . init . tails) $
%o A224841    tail $ inits a007376_list :: [[Integer]]
%o A224841 -- _Reinhard Zumkeller_, Nov 11 2013
%K A224841 nonn,easy,base,tabl
%O A224841 1,2
%A A224841 _M. F. Hasler_, Jul 22 2013