RStudioで2変数の非線形方程式をグラフ化する

Question

RStudioで0.2 * ln（x/40）-0.02（x-40）= - 0.04ln（y/100）+0.004（y-100）をグラフ化します。私は '操作'パッケージをインストールし、plotFunを使用しましたが、それは動作しませんでした。私はplot.functionを使ってみましたが、解決策を見つけることができませんでした。助けてください

Answer 1

あなたがコードを提供しなかったので、あなたが試したことは不明です。おそらく、このことができます：

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) 

：あなただけのz = 0のために必要がある場合は、 contourを使用することができます

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)) 

：、その後、plotFunあなたの新しい表現を与える（それが0 =またはセット）zのためのあなたの方程式を解きます

またはちょうど

contour(x,y,z)