OFFSET
0,2
COMMENTS
EXAMPLE
a(3) = 231 because 231 has exactly 3 divisors <= sqrt(231) of the form 4*j+3, namely 3, 7 and 11, and this is the least number that works.
MAPLE
N:= 90: # for a(0) .. a(N)
f:= proc(n) nops(select(t -> t mod 4 = 3 and t^2 <= n, numtheory:-divisors(n))) end proc:
V:= Array(0..N): count:= 0:
for n from 1 while count < N+1 do
v:= f(n);
if v <= N and V[v] = 0 then V[v]:= n; count:= count+1 fi;
od:
convert(V, list);
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert Israel, Dec 29 2024
STATUS
approved
