|
|
A110587
|
|
Primes p such that 6q+7=p^2, q prime.
|
|
0
|
|
|
5, 7, 11, 17, 19, 29, 37, 43, 47, 53, 61, 71, 73, 79, 89, 97, 101, 107, 109, 127, 173, 191, 199, 223, 241, 251, 263, 271, 281, 317, 367, 389, 397, 433, 439, 443, 449, 457, 461, 479, 523, 541, 569, 577, 587, 613, 631, 647, 659, 677, 683, 691, 701, 739, 757
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
a(4)=17 since 6*47+7=289=17^2.
|
|
MAPLE
|
ispower := proc(n, b) andmap(proc(w) evalb(w[2] mod b = 0) end, ifactors(n)[2]) end: a:=6: SQP||a:=[]: for z from 1 to 1 do for n from 1 to 1000 do p:=ithprime(n); m:=a*p+a+1; if ispower(m, 2) and isprime(sqrt(m)) then SQPW||a:=[op(SQP||a), sqrt(m)] fi od; od; SQP||a;
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|