OFFSET
1,1
COMMENTS
Generated by k = 0, 1, 23, 71, 113,.. - Michel Marcus, May 11 2014
No other terms for k < 100000. - Jens Kruse Andersen, May 19 2014
EXAMPLE
2 is in this sequence because 2*3^0 - 0 = 2.
MATHEMATICA
Select[Table[2 3^n - n, {n, 0, 300}], PrimeQ] (* Vincenzo Librandi, Oct 21 2014 *)
PROG
(Magma) [a: n in [0..150] | IsPrime(a) where a is 2*3^n - n]; // Juri-Stepan Gerasimov, Apr 30 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Apr 30 2014
STATUS
approved