R语言随笔-COG计算及绘图

 根据部分代码图片简要绘制了COG(y)与植被覆盖度V（x）的相关曲线，验证了二者之间负相关

x <- seq(0,1,0.01)
y <- (exp(-0.0344*(-0.35*log(1-x,exp(1))*10000)^(0.6413))*(exp(-5.614*x^(0.7366))))
tt <- expression(y == exp(-0.0344*(-0.35*log(1-x,exp(1))*10000)^(0.6413))*(exp(-5.614*x^(0.7366))))
plot(x,y,type='l',main=tt,las=1)