|
|
A176671
|
|
Primes not of the form p + 2^k*k^2 for p prime and k > 0.
|
|
0
|
|
|
2, 3, 11, 17, 37, 41, 67, 71, 97, 107, 127, 137, 149, 157, 163, 191, 233, 277, 281, 307, 331, 337, 367, 373, 397, 401, 443, 457, 487, 499, 509, 541, 547, 577, 599, 607, 631, 683, 701, 709, 727, 739, 751, 757, 761, 769, 787, 809, 821, 877, 919, 941, 971, 977
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MAPLE
|
A007758 := proc(n) 2^n*n^2 ; end proc: isA176671 := proc(n) if isprime(n) then for i from 1 do a58 := A007758(i) ; if a58 >n then return true; elif isprime( n-a58) then return false; end if ; end do: else true; end if; end proc: for n from 1 to 200 do p := ithprime(n) ; if isA176671(p) then printf("%d, ", p) ; end if; end do: # R. J. Mathar, Apr 26 2010
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Corrected (37 inserted, 853 removed, 907 removed) by R. J. Mathar, Apr 26 2010
|
|
STATUS
|
approved
|
|
|
|