将曲线延伸到触摸框

Extend curve to touch box

我想在R中画一个函数,例如

f <- function(x) log(x)
curve(f, c(0, 1))

这给出如下:

如何延长曲线来触及盒子?

注意:我想保留 4% 范围扩展:

xaxs = "r"

试试

curve(f, from=0, to=1.1, n=1001, ylim=c(-4,0), xlim=c(0,1))

给出类似

的曲线

在右上角,to=1.1 延长了曲线,但 xlim=c(0,1) 截断了它

在左下角,n=1001 通过添加更多有限点在 x=0 和 y=-infinity 方向向下延伸曲线,但 ylim=c(-4,0) 截断它