login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Primes p such that A274601(p) is a prime.
5

%I #14 Nov 22 2016 21:21:54

%S 3,5,7,11,13,17,23,31,37,53,59,61,73,79,83,89,101,103,109,127,137,139,

%T 149,173,179,193,223,229,257,263,293,307,313,337,347,349,359,367,389,

%U 397,409,419,439,449,461,467,487,491,521,547,571,577,599,601,619,631

%N Primes p such that A274601(p) is a prime.

%C It is conjectured that the sequence is infinite.

%C This sequence is also the list of primes with k trits that are used in decomposition of 2*3^k into the sum of such two primes. k>=1.

%H Lei Zhou, <a href="/A274987/b274987.txt">Table of n, a(n) for n = 1..10000</a>

%e For p=2, A274601(p) = 4, which is not a prime, so ignore 2.

%e For p=3, A274601(p) = 3, which is a prime, so a(1)=3.

%e For p=5, A274601(p) = 13, which is a prime, so a(2)=5.

%t p = 2; Table[While[p = NextPrime[p]; cp = 2*3^(Floor[Log[3, 2*p - 1]]) - p; !PrimeQ[cp]]; p, {n, 1, 56}]

%Y Cf. A134021, A274601, A002375.

%K nonn,base,easy

%O 1,1

%A _Lei Zhou_, Nov 11 2016