Description Usage Arguments Value Examples
In accordance with GOST 25543 (part 7) form the digital code of fossil fuel (brown, or hard coal, or anthracite) on the basis of its class, category, type, and subtype.
1 | code(classid, catid, typeid, subtypeid)
|
classid |
identifier of fossil fuel class according to Table 3 of
GOST 25543.
Type: [ |
catid |
identifier of fossil fuel category according to Table 4 of
GOST 25543.
Type: [ |
typeid |
identifier of fossil fuel category according to Table 5 of
GOST 25543.
Type: [ |
subtypeid |
identifier of fossil fuel subtype according to Table 8 of
GOST 25543.
Type: [ |
Digital code according to Part 7 of
GOST 25543.
Type: [character
].
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | # Consider samples of hard coals with the next laboratory
# measurement results:
r0 <- c(1.1, 1.3)
sok <- c( 43, 76.0)
vdaf <- c(8.4, 28.3)
y <- c( 6, 9.0)
x <- code(fuel_class(r0), fuel_cat(sok), hard_type(vdaf), hard_subtype(y))
print(x)
# [1] "1140806" "1372809"
# Unit test:
stopifnot(
x %in% coal.state:::g25543db()$hard$S1KCFx$code
)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.