cp's OEIS Frontend

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.

A107696 Primes with digital product = 10.

This page as a plain text file.
%I A107696 #9 Sep 08 2022 08:45:18
%S A107696 251,521,11251,12511,15121,25111,111521,115211,121151,151121,152111,
%T A107696 211151,511211,11152111,11511211,12111511,15111211,15121111,51111211,
%U A107696 111121151,111512111,112111511,112151111,112511111,115211111,121511111,151211111
%N A107696 Primes with digital product = 10.
%t A107696 Flatten[ Table[ Select[ Sort[ FromDigits /@ Permutations[ Flatten[{2, 5, Table[1, {n}]} ]]], PrimeQ[ # ] &], {n, 0, 8}]]
%t A107696 Select[Prime[Range[3 10^6]], Times@@IntegerDigits[#] == 10 &] (* _Vincenzo Librandi_, Jul 27 2016 *)
%o A107696 (Magma) [p: p in PrimesUpTo(3*10^6) | &*Intseq(p) eq 10]; // _Vincenzo Librandi_, Jul 27 2016
%Y A107696 Cf. A004022, A107612, A107689, A107690, A107691, A107692, A107693, A107694, A107695, A107697, A107698.
%K A107696 base,nonn
%O A107696 1,1
%A A107696 _Zak Seidov_ and _Robert G. Wilson v_, May 20 2005