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.
%I A262577 #38 Jun 25 2021 23:38:05 %S A262577 1,12,123,1234,12345,123456,1234568,12345689,1234568910,123456891011, %T A262577 12345689101112,1234568910111213,123456891011121314, %U A262577 12345689101112131415,1234568910111213141516,123456891011121314151617,12345689101112131415161718,1234568910111213141516171819,123456891011121314151617181920 %N A262577 Concatenation of the numbers from 1 to n but omitting 7. %C A262577 There are only three primes among the first 98 terms: 123456891011, %C A262577 12345689101112131415161718192021222324252627282930313233343536373839, and %C A262577 12345689101112131415161718192021222324252627282930313233343536373839\ %C A262577 40414243444546474849505152535455565758596061626364566676869707172737\ %C A262577 475767778798081828384858687. %C A262577 Does the sequence contain any other primes? %C A262577 Yes, PARI reports the next (probable) prime after appending 13097; it has 54655 digits. - _Bill McEachen_, Oct 13 2015 %F A262577 (a(n) - a(n-1)) mod 2 = 0 only for n=7. - _Altug Alkan_, Oct 15 2015 %t A262577 DeleteDuplicates@ Table[If[n >= 7, FromDigits@ Delete[Flatten[IntegerDigits /@ Range[n + 1]], 7], FromDigits@ Flatten[IntegerDigits /@ Range@ n]], {n, 19}] (* _Michael De Vlieger_, Oct 13 2015 *) %Y A262577 Cf. A007908, A262299, A262571-A262582. %Y A262577 See A262300 for more about this problem. %K A262577 nonn,base %O A262577 1,2 %A A262577 _N. J. A. Sloane_, Sep 25 2015