eeval_calc: Funkcja do wyznaczania wartosci emisji

In rjakub999/eeval: Pakiet oceny emisji (emission evaluation)

Description

Funkcja oblicza emisje na podstawie danych zawartych w zmiennej wskazniki oraz przygotowanej w odpowiedni sposob zmiennej input. W obiekcie wskazniki zapisane sa dane emisji z podzialem na rozne kategorie. W obiekcie input zapisane sa wygenerowane losowo dane natezenia ruchu.

Usage

eeval_calc(
  dane = input,
  kategoria = "Passenger Cars",
  euro = c("Euro 3", "Euro 4", "Euro 5", "Euro 6 up to 2016"),
  mode = "",
  substancja = c("EC", "CO", "NOx")
)

Arguments

dane	data.frame - dane wejsciowe w formacie jak w obiekcie input
kategoria	character - kategoria pojazdu - Passenger Cars itd.
euro	character - norma dopuszczalnych emisji spalin - Euro 4 itd.
mode	character - tryb jazdy pojazdu - Urban Peak itd.
substancja	character - rodzaj emitowanego zanieczyszczenia - NOx itd.

Details

Algorytm obliczen emisji: Emisja = Nat x ((Alpha x Procent^2 + Beta x Procent + Gamma + (Delta/Procent)) / (Epsilon x Procent^2 + Zita x Procent + Hta) x (1- Reduction))

Value

double

Examples

# Obliczenie emisji dla parametrow domyslnych (input)
  eeval_wynik <- eeval_calc()

## Not run: 
# Obliczenie emisji dla przykladowych danych input2
eeval_wynik2 <-
 eeval_calc(dane = input2,
            kategoria = "Passenger Cars",
            euro = c("Euro 3", "Euro 4", "Euro 5", "Euro 6 up to 2016"),
            substancja = c("EC", "CO", "NOx"),
            mode = "")

# Obliczenie emisji dla przykladowych danych inut3
eeval_wynik3 <-
 eeval_calc(dane = input3,
            kategoria = "Buses",
            euro = c("Euro II", "Euro III", "Euro IV", "Euro V"),
            substancja = c("EC", "CO", "NOx", "NH3"),
            mode = "")

## End(Not run)

rjakub999/eeval documentation built on Dec. 31, 2020, 3:06 a.m.