A262835 (5,3)-primes (defined in Comments).

2, 3, 5, 7, 11, 17, 19, 29, 31, 37, 41, 47, 67, 71, 79, 89, 97, 101, 107, 109, 127, 131, 139, 149, 151, 157, 167, 197, 199, 211, 229, 239, 241, 257, 269, 271, 281, 311, 317, 337, 349, 359, 367, 409, 419, 421, 431, 439, 457, 491, 541, 547, 557, 569, 571, 577

Offset

1,1

Comments

Let V = (b(1), b(2), ..., b(k)), where k > 1 and b(i) are distinct integers > 1 for j = 1..k. Call p a V-prime if the digits of p in base b(1) spell a prime in each of the bases b(2), ..., b(k).

Links

Clark Kimberling, Table of n, a(n) for n = 1..10000

Mathematica

{b1, b2} = {3, 5};
u = Select[Prime[Range[6000]], PrimeQ[FromDigits[IntegerDigits[#, b1], b2]] &]; (* A231474 *)
v = Select[Prime[Range[6000]], PrimeQ[FromDigits[IntegerDigits[#, b2], b1]] &]; (* A262835 *)
w = Intersection[u, v]; (* A262836 *)
(* Peter J. C. Moses, Sep 27 2015 *)

Crossrefs

Cf. A000040, A231474, A262836, A262829.

Sequence in context: A188713 A280996 A089084 * A258261 A228424 A347192

Adjacent sequences: A262832 A262833 A262834 * A262836 A262837 A262838

Keyword

nonn,easy,base

Author

Clark Kimberling, Nov 05 2015

Status

approved