The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A255898 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A255898

Minimum prime p such that p^n is a concatenation of two primes.
(history; published version)

#47 by Bruno Berselli at Wed Nov 21 11:39:22 EST 2018

STATUS

editing

approved

#46 by Paolo P. Lava at Wed Nov 21 08:19:19 EST 2018

KEYWORD

nonn,base,easy,less

STATUS

approved

editing

#45 by Harvey P. Dale at Thu Oct 13 15:53:10 EDT 2016

STATUS

editing

approved

#44 by Harvey P. Dale at Thu Oct 13 15:53:06 EDT 2016

MATHEMATICA

mp[n_]:=Module[{p=2}, While[Count[PrimeQ[#]&/@Table[FromDigits/@ TakeDrop[ IntegerDigits[ p^n], i], {i, IntegerLength[p^n]}], {True, True}]== 0, p= NextPrime[ p]]; p]; Array[mp, 70] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Oct 13 2016 *)

STATUS

approved

editing

#43 by OEIS Server at Sat Oct 24 12:34:04 EDT 2015

LINKS

Paolo P. Lava, <a href="/A255898/b255898_2.txt">Table of n, a(n) for n = 1..200</a>

#42 by N. J. A. Sloane at Sat Oct 24 12:34:04 EDT 2015

STATUS

proposed

approved

Discussion

Sat Oct 24

12:34

OEIS Server: Installed new b-file as b255898.txt.  Old b-file is now b255898_2.txt.

#41 by Paolo P. Lava at Fri Oct 23 04:12:54 EDT 2015

STATUS

editing

proposed

#40 by Paolo P. Lava at Fri Oct 23 01:59:19 EDT 2015

LINKS

Paolo P. Lava, <a href="/A255898/b255898_1.txt">Table of n, a(n) for n = 1..150</a>

STATUS

proposed

editing

#39 by Paolo P. Lava at Fri Oct 23 01:58:49 EDT 2015

STATUS

editing

proposed

#38 by Paolo P. Lava at Fri Oct 23 01:58:37 EDT 2015

LINKS

Paolo P. Lava, <a href="/A255898/b255898_2.txt">Table of n, a(n) for n = 1..200</a>

STATUS

proposed

editing