Ошибка в R «Функция не найдена» при создании расчета - PullRequest
0 голосов
/ 12 июля 2020

Не могли бы вы помочь мне определить ошибку в моем коде? Код возвращается с ошибкой

«функция не найдена»

Спасибо!

> QueueHW <- read.csv('C:/Users/matpo/Desktop/Queue_HW.csv', stringsAsFactors = TRUE)
> summary(QueueHW)
 ï..Number_of_Servers  Service_Rate       Lambda  
 Min.   : 7.00        Min.   : 98.0   Min.   :82  
 1st Qu.:10.25        1st Qu.:143.5   1st Qu.:82  
 Median :13.50        Median :189.0   Median :82  
 Mean   :13.50        Mean   :189.0   Mean   :82  
 3rd Qu.:16.75        3rd Qu.:234.5   3rd Qu.:82  
 Max.   :20.00        Max.   :280.0   Max.   :82  
> str(QueueHW)
'data.frame':   14 obs. of  3 variables:
 $ ï..Number_of_Servers: int  7 8 9 10 11 12 13 14 15 16 ...
 $ Service_Rate        : int  98 112 126 140 154 168 182 196 210 224 ...
 $ Lambda              : int  82 82 82 82 82 82 82 82 82 82 ...
> QueueHW %>%
+   mutate <- (Waittime=(Lambda/(Service_Rate(Service_Rate - Lambda))))
Error in Service_Rate(Service_Rate - Lambda) : 
  could not find function "Service_Rate"

1 Ответ

0 голосов
/ 12 июля 2020

Service_Rate(Service_Rate - Lambda)

То, что вы здесь говорите: я вызываю функцию Service_Rate с аргументом Service_Rate - Lambda.

Итак, R жалуется, что не знает ни о какой функции Service_Rate.

Я подозреваю, что вы набираете какую-то формулу, где обычно, когда переменные нужно умножать, между ними не ставится знак (например, Ньютоны F = ma, что означает F = m * a). Но при программировании его нужно включить, чтобы было Service_Rate * (Service_Rate - Lambda). Или что-то еще, если вы просто допустили опечатку.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...