मान लीजिए कि हम ढाल पर एक खिलौना उदाहरण कर रहे हैं, एक द्विघात समारोह को कम करते हुए , निश्चित चरण आकार का उपयोग कर । ()
अगर हम ट्रेस ट्रेस करते हैं प्रत्येक पुनरावृत्ति में, हम निम्नलिखित आंकड़ा प्राप्त करते हैं। जब हम निश्चित चरण आकार का उपयोग करते हैं तो अंक "बहुत घने" क्यों मिलते हैं ? सहज रूप से, यह एक निश्चित कदम के आकार की तरह नहीं दिखता है, लेकिन एक घटते कदम के आकार का है।
पुनश्च: आर कोड में प्लॉट शामिल हैं।
A=rbind(c(10,2),c(2,3))
f <-function(x){
v=t(x) %*% A %*% x
as.numeric(v)
}
gr <-function(x){
v = 2* A %*% x
as.numeric(v)
}
x1=seq(-2,2,0.02)
x2=seq(-2,2,0.02)
df=expand.grid(x1=x1,x2=x2)
contour(x1,x2,matrix(apply(df, 1, f),ncol=sqrt(nrow(df))), labcex = 1.5,
levels=c(1,3,5,10,20,40))
grid()
opt_v=0
alpha=3e-2
x_trace=c(-2,-2)
x=c(-2,-2)
while(abs(f(x)-opt_v)>1e-6){
x=x-alpha*gr(x)
x_trace=rbind(x_trace,x)
}
points(x_trace, type='b', pch= ".", lwd=3, col="red")
text(x_trace, as.character(1:nrow(x_trace)), col="red")
alpha=3e-2
बजाय उपयोग करता है