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.

A052087 Primes whose decimal expansion is a concatenation of two or more consecutive increasing numbers (no leading zeros allowed).

This page as a plain text file.
%I A052087 #18 Apr 23 2017 10:19:13
%S A052087 23,67,89,1213,3637,4243,4567,5051,5657,6263,6869,7879,8081,9091,9293,
%T A052087 9697,102103,108109,120121,126127,138139,150151,156157,180181,186187,
%U A052087 188189,192193,200201,216217,242243,246247,252253,270271
%N A052087 Primes whose decimal expansion is a concatenation of two or more consecutive increasing numbers (no leading zeros allowed).
%H A052087 Paul Tek, <a href="/A052087/b052087.txt">Table of n, a(n) for n = 1..10000</a>
%t A052087 With[{e = 6}, TakeWhile[Select[Function[s, Union@ Flatten@ Map[Function[k, Map[FromDigits@ Flatten@ IntegerDigits@ # &, Partition[Take[s, 10^(e - k)], k, 1]]], Range[2, e]]]@ Range[10^e], PrimeQ], IntegerLength@ # <= e &]] (* _Michael De Vlieger_, Apr 23 2017 *)
%Y A052087 Cf. A052088, A030458, A052089.
%Y A052087 Primes in A035333.
%K A052087 nonn,base
%O A052087 1,1
%A A052087 _Patrick De Geest_, Jan 15 2000
%E A052087 Initial data corrected by _Paul Tek_, May 07 2013