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 A030084 #10 Nov 01 2023 18:41:09 %S A030084 1035743,1045573,1215397,1396247,1642309,2031487,2149573,2363149, %T A030084 2385961,2458019,2569751,2815973,2857319,2986301,3109867,3349517, %U A030084 3482461,3530467,3865079,4332871,4387291,4631489,4893617,5170283 %N A030084 Primes p such that all digits of p^3 appear in p. %H A030084 Robert Israel, <a href="/A030084/b030084.txt">Table of n, a(n) for n = 1..2000</a> %p A030084 filter:= proc(p) isprime(p) and convert(convert(p^3,base,10),set) subset convert(convert(p,base,10),set) end proc: %p A030084 select(filter, [seq(i,i=3..3*10^6,2)]); # _Robert Israel_, Nov 01 2023 %Y A030084 Includes A050288. %Y A030084 Cf. A030083. %K A030084 nonn,base %O A030084 1,1 %A A030084 _Patrick De Geest_ %E A030084 Offset corrected by _Robert Israel_, Nov 01 2023