|
|
A187222
|
|
Gullwing primes: primes in the gullwing sequence A187220.
|
|
2
|
|
|
3, 7, 23, 31, 47, 71, 191, 311, 367, 503, 607, 967, 1303, 1367, 1439, 1471, 1663, 1871, 2399, 4951, 5471, 5623, 6263, 9431, 10103, 10271, 10687, 12119, 12511, 14431, 14879, 15647, 21871, 22111, 22271, 22807, 23039, 24223, 24919
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
m = 200 (* number of gullwing terms *); s = (2*(x/((1-x)*(1 + 2*x))))*(1 + 2*x*Product[1 + x^(2^k-1) + 2*x^2^k, {k, 0, Ceiling[Log[2, m]]}]) + O[x]^(m-1); Select[CoefficientList[s, x] + 1, PrimeQ] (* Jean-François Alcover, Jul 23 2017 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|