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 A030146 #22 Jun 01 2022 01:56:36
%S A030146 4,9,25,49,121,169,361,529,961,12769,16129,18769,32761,72361,76729,
%T A030146 78961,96721,212521,214369,436921,452929,458329,1038361,1630729,
%U A030146 1852321,3892729,5230369,5470921,5650129,5812921,5870929,7230721
%N A030146 Squares-of-primes in which no two adjacent digits have the same parity.
%C A030146 Intersection of A030141 and A001248. - _Michel Marcus_, Feb 06 2015
%H A030146 Giovanni Resta, <a href="/A030146/b030146.txt">Table of n, a(n) for n = 1..10000</a>
%F A030146 a(n) = A030145(n)^2. - _Giovanni Resta_, Aug 16 2018
%t A030146 Join[{4,9},Select[Prime[Range[4000]]^2,Union[Sort/@OddQ/@Partition[IntegerDigits[#],2,1]]=={{False,True}}&]] (* _Harvey P. Dale_, Feb 22 2011 *)
%Y A030146 Cf. A030145, A030152.
%K A030146 nonn,base
%O A030146 1,1
%A A030146 _Patrick De Geest_
%E A030146 Definition clarified by _Harvey P. Dale_, Feb 23 2011
%E A030146 Offset changed by _Michel Marcus_, Feb 06 2015