Skip to content
Merged
Changes from 4 commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
5 changes: 3 additions & 2 deletions src/qr.jl
Original file line number Diff line number Diff line change
Expand Up @@ -538,8 +538,9 @@ end
function rank(A::QRPivoted; atol::Real=0, rtol::Real=min(size(A)...) * eps(real(float(one(eltype(A.Q))))) * iszero(atol))
m = min(size(A)...)
m == 0 && return 0
tol = max(atol, rtol*abs(A.R[1,1]))
return something(findfirst(i -> abs(A.R[i,i]) <= tol, 1:m), m+1) - 1
factors = getfield(A, :factors)
tol = max(atol, rtol*abs(factors[1,1]))
return something(findfirst(i -> abs(factors[i,i]) <= tol, 1:m), m+1) - 1
end

# Julia implementation similar to xgelsy
Expand Down