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 A155990 #10 Jan 22 2019 02:50:34 %S A155990 3,5,11,17,79,83,97,103,131,137,149,157,239,241,257,269,359,367,379, %T A155990 389,1399,1409,1427,1433,1459,1471,1483,1489,1601,1607,1613,1621,1747, %U A155990 1753,1777,1787,2137,2141,2153,2179,2237,2239,2251,2269,2377,2381,2389,2399 %N A155990 Numbers prime(k) as k runs through the numbers whose digits are all prime. %F A155990 a(n) = A000040(A046034(n)). - _Michel Marcus_, Jan 21 2019 %p A155990 isA046034 := proc(n) local d ; d := convert(convert(n,base,10),set) ; if d intersect {0,1,4,6,8,9} = {} then true; else false; fi; end: for n from 1 to 3000 do if isA046034(n) then printf("%d,",ithprime(n)) ; fi; od: # _R. J. Mathar_, Feb 10 2009 %Y A155990 Cf. A000040, A046034, A141468. %K A155990 nonn,base %O A155990 1,1 %A A155990 _Juri-Stepan Gerasimov_, Feb 01 2009 %E A155990 Edited by _N. J. A. Sloane_, Feb 02 2009 %E A155990 149 inserted by _R. J. Mathar_, Feb 10 2009