View source: R/EmissionFactors.R
EmissionFactors | R Documentation |
EmissionFactors
returns a transformed object with class
"EmissionFactors" and units g/km.
EmissionFactors(x, mass = "g", dist = "km", ...)
## S3 method for class 'EmissionFactors'
print(x, ...)
## S3 method for class 'EmissionFactors'
summary(object, ...)
## S3 method for class 'EmissionFactors'
plot(
x,
pal = "mpl_viridis",
rev = TRUE,
fig1 = c(0, 0.8, 0, 0.8),
fig2 = c(0, 0.8, 0.55, 1),
fig3 = c(0.7, 1, 0, 0.8),
mai1 = c(0.2, 0.82, 0.82, 0.42),
mai2 = c(1.3, 0.82, 0.82, 0.42),
mai3 = c(0.7, 0.62, 0.82, 0.42),
bias = 1.5,
...
)
x |
Object with class "data.frame", "matrix" or "numeric" |
mass |
Character to be the time units as numerator, default "g" for grams |
dist |
String indicating the units of the resulting distance in speed. |
... |
ignored |
object |
object with class "EmissionFactors' |
pal |
Palette of colors available or the number of the position |
rev |
Logical; to internally revert order of rgb color vectors. |
fig1 |
par parameters for fig, |
fig2 |
par parameters for fig, |
fig3 |
par parameters for fig, |
mai1 |
par parameters for mai, |
mai2 |
par parameters for mai, |
mai3 |
par parameters for mai, |
bias |
positive number. Higher values give more widely spaced colors at the high end. |
Objects of class "EmissionFactors" or "units"
## Not run:
data(fe2015)
names(fe2015)
class(fe2015)
df <- fe2015[fe2015$Pollutant=="CO", c(ncol(fe2015)-1,ncol(fe2015))]
ef1 <- EmissionFactors(df)
class(ef1)
summary(ef1)
plot(ef1)
print(ef1)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.