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 A068887 #7 Dec 05 2013 19:55:14 %S A068887 2,3,23,29,41,43,47,61,67,83,89,2129,2141,2143,2161,2309,2341,2347, %T A068887 2381,2383,2389,2503,2521,2543,2549,2707,2729,2741,2749,2767,2789, %U A068887 2903,2909,2927,2963,2969,4127,4129,4327,4349 %N A068887 Primes with property that digits alternate in parity individually as well as in concatenation with previous terms. %t A068887 d[n_]:=IntegerDigits[n]; aQ[n_]:=Union[Abs[Differences[Boole@EvenQ[d[n]]]]]=={1}; t={2,3}; Do[p=Prime[i]; x=FromDigits[Flatten[{d[Last[t]],d[p]}]]; If[aQ[p] && aQ[x],AppendTo[t,p]],{i,5,600}]; t (* _Jayanta Basu_, May 23 2013 *) %Y A068887 Cf. A030144. %K A068887 base,nonn %O A068887 1,1 %A A068887 _Amarnath Murthy_, Mar 20 2002