我的程序如下，得到下图，但是我想把纵坐标州的名字 y 改为 log-likelihood ratio，怎么办呢  多谢了！
h=function(b){
w=(1+b^2)/(1+(b-1)^2)
2*log(w)
}
x=seq(from=-5,to=5,by=0.01)
y=h(x)
plot(x,y,type='l')
arrows(-0.25,-1.76, -5, -1.76, length = 0,lty = 2)
arrows(1.25,1.76, 5, 1.76, length = 0,lty = 2)
arrows(-0.25,-2.1, -0.25, 2, length = 0,lty = 3)
arrows(1.25, -2.1, 1.25, 2, length = 0,lty = 3)
text(-0.07,-1.95,labels = "a")
text(1.43,-1.95,labels = "b")