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 A120805 #4 Mar 30 2012 17:31:20
%S A120805 2,3,5,7,23,43,67,89,109,4567,10987,76543,78901,678901,23456789,
%T A120805 45678901,9012345678901,789012345678901,56789012345678901234567890123,
%U A120805 90123456789012345678901234567,10987654321098765432109876543210987
%N A120805 Primes with consecutive digits.
%C A120805 Digits can be in ascending or descending order. After 9 comes 0 or after 0 comes 1.
%C A120805 The number of primes with n consecutive digits: 4,4,1,1,3,1,0,2,0,0,0,0,1,0,1,0,0,0,0,0,0,0,0,0,0,0,0,0,2,0,0,0,0,0,1,1,0,0,0,0,0,0,1,0,0,0,0,0,0,0,...,.
%t A120805 f[n_] := Block[{u = Range@n, d = Reverse@ Range@n, t = Table[1, {n}]}, Select[ Drop[ Union@ Flatten@ Table[ FromDigits /@ Mod[{u, d} + {i*t, i*t}, 10], {i, 10}], 2], PrimeQ@# &]]; Array[f, 35] // Flatten
%Y A120805 Cf. A000040, A118697; union of A006055 & A120804.
%K A120805 nonn,base
%O A120805 1,1
%A A120805 _Robert G. Wilson v_, Jul 05 2006