This commit is contained in:
Mike J Innes 2017-09-06 23:09:39 -04:00
parent cca4d25a10
commit a93c440c1e

View File

@ -6,8 +6,7 @@ end
function ngradient(f, xs::AbstractArray...) function ngradient(f, xs::AbstractArray...)
grads = zeros.(xs) grads = zeros.(xs)
for (x, Δ) in zip(xs, grads) for (x, Δ) in zip(xs, grads), i in 1:length(x)
for i in 1:length(x)
δ = sqrt(eps()) δ = sqrt(eps())
tmp = x[i] tmp = x[i]
x[i] = tmp - δ/2 x[i] = tmp - δ/2
@ -17,7 +16,6 @@ function ngradient(f, xs::AbstractArray...)
x[i] = tmp x[i] = tmp
Δ[i] = (y2-y1)/δ Δ[i] = (y2-y1)/δ
end end
end
return grads return grads
end end