OFFSET
1,1
COMMENTS
Values of {p,q,r}: {17,3,2},{83,2,5},{43,3,2},{61,2,3},{149,5,2},{199,2,5},{263,3,5},{113,2,3}.
a(2) = A084866(1). - Michel Marcus, Jun 20 2015
For p in A093191, a((p-4)/13) = p. - Robert Israel, Apr 30 2018
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
Zak Seidov, First 100 values of {p,q,r}.
EXAMPLE
17=1*3^2+2*2^2, 83=2*2^2+3*5^2, 43=3*3^2+4*2^2.
MAPLE
P:= [seq(ithprime(i), i=1..20)]: np:= 20:
for n from 1 to 100 do
found:= false;
while not found do
R:= sort([seq(seq(n*q^2+(n+1)*p^2, p=P), q=P)]);
w:= n*4+(n+1)*P[-1]^2+1;
r:= ListTools:-SelectFirst(isprime, R);
if r <> NULL and r <= w then
A[n]:= r;
found:= true;
else
P:= [op(P), seq(ithprime(i), i=np+1..np+20)];
np:= np+20;
fi
od;
od:
seq(A[i], i=1..100); # Robert Israel, Apr 30 2018
CROSSREFS
KEYWORD
nonn,look
AUTHOR
Zak Seidov, Jun 19 2015
STATUS
approved