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 A107695 #11 Sep 08 2022 08:45:18
%S A107695 19,191,313,331,911,11119,111119,111191,113131,131113,131311,911111,
%T A107695 1131113,1131131,1311131,1311311,3111131,3113111,11111119,11111911,
%U A107695 11911111,111111313,111111331,111113113,111113131,111131131,111133111
%N A107695 Primes with digital product = 9.
%H A107695 Harvey P. Dale, <a href="/A107695/b107695.txt">Table of n, a(n) for n = 1..9000</a>
%t A107695 Union[ Flatten[ Table[ Select[ Sort[ FromDigits /@ Join[ Permutations[ Flatten[{9, Table[1, {n}]}]], Permutations[ Flatten[{3, 3, Table[1, {n - 1}]}]]]], PrimeQ[ # ] & ], {n, 0, 8}]]]
%t A107695 Select[Prime[Range[3 10^6]], Times@@IntegerDigits[#] == 9 &] (* _Vincenzo Librandi_, Jul 27 2016 *)
%o A107695 (Magma) [p: p in PrimesUpTo(3*10^7) | &*Intseq(p) eq 9]; // _Vincenzo Librandi_, Jul 27 2016
%Y A107695 Cf. A004022, A107612, A107689, A107690, A107691, A107692, A107693, A107694, A107696, A107697, A107698.
%K A107695 base,nonn
%O A107695 1,1
%A A107695 _Zak Seidov_ and _Robert G. Wilson v_, May 20 2005