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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A173935 Least prime the concatenation of two other primes in n different ways. 0

%I

%S 2,23,313,3137,233347,739397,379837313,73932013313,7399973479337

%N Least prime the concatenation of two other primes in n different ways.

%C Similar to truncatable primes.

%e 23 = 2 & 3, 313 = 3 & 13 and 31 & 3, etc.

%t f[n_] := Block[{c = 0, id = IntegerDigits@n, k = 0}, len = Length@ id; While[ k < len, If[ Union@ PrimeQ[ FromDigits@# & /@ {id[[;; k + 1]], id[[k + 2 ;;]]}] == {True}, c++ ]; k++ ]; c]; t = Table[0, {10}]; p = 2; While[p < 10^8, a = f@p; If[ t[[a]] == 0, t[[a]] = p; Print[{a, p}]]; p = NextPrime@ p]

%K base,more,nonn

%O 0,1

%A _Robert G. Wilson v_, Mar 02 2010

%E a(6) from _Robert G. Wilson v_, Mar 04 2010

%E a(7) from _Donovan Johnson_, Nov 09 2010

%E a(8) from _Giovanni Resta_, Mar 04 2014

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 October 22 22:34 EDT 2019. Contains 328335 sequences. (Running on oeis4.)