R语言小白求问怎么画出这样的依据广义相加模型得到的图?

比如用广义相加模型对某个物质的浓度及对应的观察终点值进行拟合,现在要画一个类似关于浓度变化影响观察终点值 的曲线应该怎么画呀?

https://blog.csdn.net/tongweiganglp/article/details/53422324