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 A030093 #13 Aug 11 2024 22:06:10
%S A030093 10253497,74058619,74563219,93689027,102438967,103259867,103271569,
%T A030093 104369581,106725389,106948327,107086249,125384957,125987473,
%U A030093 127035269,130256479,130284769,136052897,146970823,147502963
%N A030093 Primes p such that p, p^2 and p^3 all have the same set of digits.
%t A030093 sdQ[n_]:=Module[{c=Union/@(IntegerDigits/@{n,n^2,n^3})}, c[[1]] == c[[2]] == c[[3]]]; Select[Prime[Range[8400000]],sdQ] (* _Harvey P. Dale_, Jan 10 2012 *)
%Y A030093 Intersection of A029800 and A000040.
%K A030093 nonn,base
%O A030093 1,1
%A A030093 _Patrick De Geest_
%E A030093 Offset changed by _Andrew Howroyd_, Aug 11 2024