|
|
A075902
|
|
Primes p = prime(k) such that the decimal representation of p contains k as a substring.
|
|
6
|
|
|
17, 64553, 64567, 64577, 64591, 64601, 64661, 99551, 4303027, 6440999, 14968819, 95517973, 527737957, 1893230839, 1966640443, 1246492090901
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
prime(k) = 1966640443 for k=96664044. This is the first case in which k is an internal string of prime(k). - Carlos Rivera, Jun 16 2004
2*10^12 < a(17) <= 12426836115943. a(18) <= 21732382677641. a(19) <= 154895576080181. - Donovan Johnson, May 08 2010
|
|
LINKS
|
|
|
EXAMPLE
|
Pairs {n, prime(n)}: {7, 17}, {6455, 64553}, {6456, 64567}, {6457, 64577}, {6459, 64591}, {6460, 64601}, {6466, 64661}, {9551, 99551}, {303027, 4303027}, {440999, 6440999}, {968819, 14968819}, {5517973, 95517973}.
|
|
MATHEMATICA
|
Prime[Select[Range[10^6], StringContainsQ[ToString[Prime[#]], ToString[#]] & ]] (* Robert Price, May 27 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
more,base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|