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.

A097223 Prime numbers p such that p = prime(n) and n = product of the digits of p.

Original entry on oeis.org

17, 73, 2475989
Offset: 1

Views

Author

Farideh Firoozbakht, Aug 06 2004

Keywords

Comments

This sequence is a subsequence of A097220, so the sequence is also a subsequence of A097221.
There is no further term. - Farideh Firoozbakht, Jul 15 2009

Examples

			2475989 is in the sequence because 2475989 is (2*4*7*5*9*8*9)-th prime.
		

Crossrefs

Programs

  • Mathematica
    v={}; Do[If[h=IntegerDigits[Prime[n]]; l=Length[h]; p=Product[h[[k]], {k, l}]; p==n, v=Append[v, Prime[n]]; Print[v]], {n, 205000000}]
  • PARI
    isok(p) = isprime(p) && (primepi(p) == vecprod(digits(p))); \\ Michel Marcus, Jan 27 2019