A225582 Primes in the chain of repeated application of x->2*x+3, starting at x=11.
11, 53, 109, 1789, 3581, 28669, 229373, 3670013, 58720253, 117440509, 60129542141, 264452523040700131966973, 34662321099990647697175478269, 2381976568446569244243622252022377480189, 4878288012178573812210938372141829079433213
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..26
Crossrefs
Programs
-
Magma
x:=11; a:=[n eq 1 select x else 2*Self(n-1)+3: n in [1..200]]; [a[i]: i in [1..#a] | IsPrime(a[i])];
-
Magma
[a: n in [0..150] | IsPrime(a) where a is 7*2^n-3];
-
Mathematica
Select[NestList[2 # + 3 &, 11, 30], PrimeQ] (* or *) Select[Table[7 2^n - 3, {n, 0, 150}], PrimeQ]
Comments