login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A107691 Primes with digital product = 5. 12
5, 151, 1151, 1511, 511111, 1111151, 115111111, 1111115111, 1115111111, 1151111111, 111111111511, 111511111111, 1111151111111, 5111111111111, 111111151111111, 111151111111111, 5111111111111111, 111115111111111111111, 1111111111111111111511 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Robert Israel, Table of n, a(n) for n = 1..1000

MAPLE

select(isprime, [seq(seq((10^m-1)/9 + 4*10^j, j=0..m-1), m=1..40)]); # Robert Israel, Jan 03 2017

MATHEMATICA

Flatten[ Table[ Select[ Sort[ FromDigits /@ Permutations[Flatten[{5, Table[1, {n}]} ]]], PrimeQ[ # ] &], {n, 0, 21}]]

Select[Prime[Range[3 10^6]], Times@@IntegerDigits[#] == 5 &] (* Vincenzo Librandi, Jul 27 2016 *)

PROG

(MAGMA) [p: p in PrimesUpTo(3*10^8) | &*Intseq(p) eq 5]; // Vincenzo Librandi, Jul 27 2016

CROSSREFS

Cf. A004022, A107612, A107689, A107690, A107692, A107693, A107694, A107695, A107696, A107697, A107698.

Sequence in context: A082441 A096065 A041431 * A181979 A258486 A082623

Adjacent sequences:  A107688 A107689 A107690 * A107692 A107693 A107694

KEYWORD

base,nonn

AUTHOR

Zak Seidov and Robert G. Wilson v, May 20 2005

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 19 20:20 EDT 2019. Contains 326133 sequences. (Running on oeis4.)