2013-02-13 15 views
2

我對R非常陌生,所以解決這個問題的方法可能相對簡單。我有以下函數來計算制動距離,平均車:當一個函數等於某個值時

distance <- function(mph){(2.0*(mph/60))+(0.062673*(mph^1.9862))} 

而且我從繪製1英里每小時所有的制動距離60英里:

range = distance(1:60) 

但我需要標記的地方停止距離等於120英尺我不知道R是如何完成的,但我想寫一個函數,其中對於停止距離(x),我可以得到MPH中汽車的最大速度。我應該使用什麼函數,並且有一個簡單的方法來檢查distance(x)的值(如上面所寫)是否等於某個值?

+0

你可能有幾個問題那裏。你已經提到過繪製並找到停止距離等於120英尺的地方,但是這僅適用於情節?你在問如何找到這一點?你是否問在這一點上如何在圖上繪製垂直線?都? – 2013-02-13 06:29:12

回答

4

一種方式做到這一點是要找到當函數-120等於0:

distance <- function(mph, dist=0){(2.0*(mph/60))+(0.062673*(mph^1.9862))-dist} 
uniroot(distance, c(1, 60), dist=120) 
## $root 
## [1] 44.63998 
## 
## $f.root 
## [1] -5.088982e-06 
## 
## $iter 
## [1] 6 
## 
## $estim.prec 
## [1] 6.103516e-05 

並看看它的工作:

distance(44.63998) 
## [1] 120 
+1

正是我在尋找的東西,你是一個拯救生命的人! – 2013-02-13 06:38:26

相關問題