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 A152033 #12 Sep 17 2019 11:39:31
%S A152033 31,311,1201,11701,106501,1020101,10021001,100440001,1000200001,
%T A152033 10003810001,100011400001,1000039200001,10000084000001,
%U A152033 100000381000001,1000001790000001,10000004700000001,100000033900000001,1000000101700000001,10000000484400000001,100000001019000000001
%N A152033 a(n) is the least n-digit prime p whose reversal is a prime q < p.
%t A152033 Do[ p = NextPrime[10^(n - 1) ]; Do[ p1 = FromDigits[ Reverse[IntegerDigits[p]]]; If[PrimeQ[p1] && p1 < p, Print[{n, p}]; Break[]]; p = NextPrime[p], {10^9}], {n, 2, 16}];
%Y A152033 Cf. A006567, A152014, A152034.
%Y A152033 Subsequence of A109309.
%K A152033 nonn,base
%O A152033 2,1
%A A152033 _Zak Seidov_, Nov 20 2008
%E A152033 a(17)-a(21) from _Chai Wah Wu_, Sep 11 2019