在RStudio中繪製兩個變量的非線性方程

Question

我想在RStudio中繪製0.2 * ln（x/40）-0.02（x-40）= - 0.04ln（y/100）+0.004（y-100）。我安裝了「操縱」軟件包並使用了plotFun，但它沒有奏效。我嘗試使用plot.function，但我找不到解決方案。請幫忙

Answer 1

由於您沒有提供任何代碼，因此不確定您嘗試了什麼。也許這可以幫助：解決您的方程Z（或設置= 0），然後給plotFun新的表達：

library(manipulate) 
library(mosaic) 

plotFun(0.2*log(x/40)- 0.02*(x-40) + 0.04*log(y/100) - 0.004*(y-100) ~ 
     y+x, surface=TRUE, ylim=c(0,5), xlim=c(0,5)) 

如果你只是想針對z = 0，則可以使用contour：

xyFun <- function(x,y){ 
    0.2*log(x/40)- 0.02*(x-40)+0.04*log(y/100) - 0.004*(y-100) 
} 

x <- y <- seq(0,5, by=0.1)  
z <- outer(x,y,xyFun) 

contour(x,y,z, levels=0) 

或只是

contour(x,y,z)