# Create Rule files to include as examples
arule <- dplyr::tribble(
~SORTORDER, ~FILE_IN, ~ATTR_IN, ~CLASS_OUT, ~MODEL_NO, ~B, ~B_LOW, ~B_HI, ~B1, ~B2, ~D,
1, "formfile", "PROF", "CONVEX_D", 4, 5, 0, 0, 2.5, 0, 2.5,
2, "formfile", "PROF", "CONCAVE_D", 5, -5, 0, 0, 0, -2.5, 2.5,
3, "formfile", "PROF", "PLANAR_D", 1, 0, 0, 0, -2.5, 2.5, 2.5,
4, "formfile", "PLAN", "CONVEX_A", 4, 5, 0, 0, 2.5, 0, 2.5,
5, "formfile", "PLAN", "CONCAVE_A", 5, -5, 0, 0, 0, -2.5, 2.5,
6, "formfile", "PLAN", "PLANAR_A", 1, 0, 0, 0, -2.5, 2.5, 2.5,
7, "formfile", "QWETI", "HIGH_WI", 4, 7, 0, 0, 3.5, 0, 3,
8, "formfile", "QWETI", "LOW_WI", 5, 0.5, 0, 0, 0, 3.5, 3,
9, "formfile", "SLOPE", "NEAR_LEVEL", 5, 0.5, 0, 0, 0, 1, 0.5,
10, "formfile", "SLOPE", "REL_STEEP", 4, 2, 0, 0, 1, 0, 1,
11, "relzfile", "PCTZ2ST", "NEAR_DIV", 4, 90, 0, 0, 75, 0, 15,
12, "relzfile", "PCTZ2ST", "NEAR_HALF", 1, 50, 50, 50, 25, 75, 25,
13, "relzfile", "PCTZ2ST", "NEAR_CHAN", 5, 10, 0, 0, 0, 25, 15,
14, "relzfile", "PCTZ2PIT", "NEAR_PEAK", 4, 90, 0, 0, 75, 0, 15,
15, "relzfile", "PCTZ2PIT", "NEAR_MID", 1, 50, 50, 50, 25, 75, 25,
16, "relzfile", "PCTZ2PIT", "NEAR_PIT", 5, 5, 0, 0, 0, 10, 5,
17, "relzfile", "Z2PIT", "HI_ABOVE", 4, 2, 0, 0, 1, 0, 1)
foreign::write.dbf(as.data.frame(arule), "./inst/extdata/arule.dbf")
crule <- dplyr::tribble(
~F_NAME, ~FUZATTR, ~ATTRWT, ~FACET_NO, ~F_CODE,
"LCR", "NEAR_PEAK", 30, 11, 1,
"LCR", "NEAR_DIV", 20, 11, 1,
"LCR", "HI_ABOVE", 10, 11, 1,
"LCR", "NEAR_LEVEL", 20, 11, 1,
"LCR", "PLANAR_D", 10, 11, 1,
"LCR", "PLANAR_A", 5, 11, 1,
"LCR", "LOW_WI", 5, 11, 1,
"DSH", "NEAR_PEAK", 30, 12, 2,
"DSH", "NEAR_DIV", 20, 12, 2,
"DSH", "HI_ABOVE", 10, 12, 2,
"DSH", "CONVEX_D", 20, 12, 2,
"DSH", "CONVEX_A", 10, 12, 2,
"DSH", "LOW_WI", 10, 12, 2,
"UDE", "NEAR_PEAK", 30, 13, 3,
"UDE", "NEAR_DIV", 20, 13, 3,
"UDE", "HI_ABOVE", 10, 13, 3,
"UDE", "NEAR_LEVEL", 10, 13, 3,
"UDE", "CONCAVE_D", 10, 13, 3,
"UDE", "CONCAVE_A", 10, 13, 3,
"UDE", "HIGH_WI", 10, 13, 3,
"BSL", "NEAR_HALF", 20, 21, 4,
"BSL", "NEAR_MID", 10, 21, 4,
"BSL", "HI_ABOVE", 5, 21, 4,
"BSL", "REL_STEEP", 20, 21, 4,
"BSL", "PLANAR_D", 15, 21, 4,
"BSL", "PLANAR_A", 25, 21, 4,
"BSL", "LOW_WI", 5, 21, 4,
"DBS", "NEAR_HALF", 20, 22, 5,
"DBS", "NEAR_MID", 10, 22, 5,
"DBS", "HI_ABOVE", 5, 22, 5,
"DBS", "REL_STEEP", 20, 22, 5,
"DBS", "CONVEX_A", 20, 22, 5,
"DBS", "PLANAR_D", 15, 22, 5,
"DBS", "LOW_WI", 10, 22, 5,
"CBS", "NEAR_HALF", 20, 23, 6,
"CBS", "NEAR_MID", 10, 23, 6,
"CBS", "HI_ABOVE", 5, 23, 6,
"CBS", "REL_STEEP", 20, 23, 6,
"CBS", "CONCAVE_A", 20, 23, 6,
"CBS", "PLANAR_D", 15, 23, 6,
"CBS", "HIGH_WI", 10, 23, 6,
"TER", "NEAR_HALF", 20, 24, 7,
"TER", "NEAR_MID", 10, 24, 7,
"TER", "HI_ABOVE", 5, 24, 7,
"TER", "NEAR_LEVEL", 30, 24, 7,
"TER", "PLANAR_D", 15, 24, 7,
"TER", "PLANAR_A", 20, 24, 7,
"SAD", "NEAR_HALF", 20, 25, 8,
"SAD", "NEAR_MID", 10, 25, 8,
"SAD", "HI_ABOVE", 5, 25, 8,
"SAD", "NEAR_LEVEL", 20, 25, 8,
"SAD", "CONCAVE_D", 20, 25, 8,
"SAD", "CONVEX_A", 20, 25, 8,
"MDE", "NEAR_HALF", 20, 26, 9,
"MDE", "NEAR_MID", 10, 26, 9,
"MDE", "HI_ABOVE", 5, 26, 9,
"MDE", "NEAR_LEVEL", 25, 26, 9,
"MDE", "CONCAVE_D", 10, 26, 9,
"MDE", "CONCAVE_A", 10, 26, 9,
"MDE", "HIGH_WI", 20, 26, 9,
"FSL", "NEAR_CHAN", 20, 31, 10,
"FSL", "NEAR_PIT", 10, 31, 10,
"FSL", "REL_STEEP", 10, 31, 10,
"FSL", "CONCAVE_D", 20, 31, 10,
"FSL", "CONCAVE_A", 20, 31, 10,
"FSL", "PLANAR_A", 10, 31, 10,
"FSL", "HIGH_WI", 20, 31, 10,
"TSL", "NEAR_CHAN", 20, 32, 11,
"TSL", "NEAR_PIT", 10, 32, 11,
"TSL", "REL_STEEP", 10, 32, 11,
"TSL", "PLANAR_D", 25, 32, 11,
"TSL", "PLANAR_A", 25, 32, 11,
"TSL", "HIGH_WI", 10, 32, 11,
"FAN", "NEAR_CHAN", 20, 33, 12,
"FAN", "NEAR_PIT", 10, 33, 12,
"FAN", "REL_STEEP", 10, 33, 12,
"FAN", "CONVEX_A", 25, 33, 12,
"FAN", "PLANAR_D", 25, 33, 12,
"FAN", "LOW_WI", 10, 33, 12,
"LSM", "NEAR_DIV", 10, 41, 13,
"LSM", "NEAR_CHAN", 20, 41, 13,
"LSM", "NEAR_PIT", 10, 41, 13,
"LSM", "NEAR_PEAK", 10, 41, 13,
"LSM", "REL_STEEP", 10, 41, 13,
"LSM", "CONVEX_D", 15, 41, 13,
"LSM", "CONVEX_A", 15, 41, 13,
"LSM", "LOW_WI", 10, 41, 13,
"LLS", "NEAR_CHAN", 20, 42, 14,
"LLS", "NEAR_PIT", 20, 42, 14,
"LLS", "NEAR_LEVEL", 40, 42, 14,
"LLS", "PLANAR_D", 5, 42, 14,
"LLS", "PLANAR_A", 5, 42, 14,
"LLS", "HIGH_WI", 10, 42, 14,
"DEP", "NEAR_CHAN", 20, 43, 15,
"DEP", "NEAR_PIT", 30, 43, 15,
"DEP", "NEAR_LEVEL", 20, 43, 15,
"DEP", "CONCAVE_A", 10, 43, 15,
"DEP", "CONCAVE_D", 10, 43, 15,
"DEP", "HIGH_WI", 10, 43, 15)
foreign::write.dbf(as.data.frame(crule), "./inst/extdata/crule.dbf")
# foreign::read.dbf("../Docs/C7rule.dbf") %>%
# datapasta::tribble_paste()
# Identical to ~/Dropbox/LITAP files/LandMapR_BR3Raw_20210427/LandMapR_Files/C7rule.dbf"
tibble::tribble(
~F_NAME, ~FUZATTR, ~ATTRWT, ~FACET_NO, ~F_CODE,
"CST", "CONVEX_D", 15L, 11L, 1L,
"CST", "CONCAVE_D", 0L, 11L, 1L,
"CST", "PLANAR_D", 15L, 11L, 1L,
"CST", "CONVEX_A", 10L, 11L, 1L,
"CST", "CONCAVE_A", 0L, 11L, 1L,
"CST", "PLANAR_A", 0L, 11L, 1L,
"CST", "HIGH_WI", 0L, 11L, 1L,
"CST", "LOW_WI", 20L, 11L, 1L,
"CST", "NEAR_LEVEL", 10L, 11L, 1L,
"CST", "REL_STEEP", 0L, 11L, 1L,
"CST", "NEAR_DIV", 10L, 11L, 1L,
"CST", "NEAR_HALF", 0L, 11L, 1L,
"CST", "NEAR_CHAN", 0L, 11L, 1L,
"CST", "NEAR_PEAK", 20L, 11L, 1L,
"CST", "NEAR_MID", 0L, 11L, 1L,
"CST", "NEAR_PIT", 0L, 11L, 1L,
"CST", "HI_ABOVE", 0L, 11L, 1L,
"UPS", "CONVEX_D", 20L, 21L, 2L,
"UPS", "CONCAVE_D", 0L, 21L, 2L,
"UPS", "PLANAR_D", 0L, 21L, 2L,
"UPS", "CONVEX_A", 0L, 21L, 2L,
"UPS", "CONCAVE_A", 0L, 21L, 2L,
"UPS", "PLANAR_A", 0L, 21L, 2L,
"UPS", "HIGH_WI", 0L, 21L, 2L,
"UPS", "LOW_WI", 20L, 21L, 2L,
"UPS", "NEAR_LEVEL", 0L, 21L, 2L,
"UPS", "REL_STEEP", 20L, 21L, 2L,
"UPS", "NEAR_DIV", 30L, 21L, 2L,
"UPS", "NEAR_HALF", 10L, 21L, 2L,
"UPS", "NEAR_CHAN", 0L, 21L, 2L,
"UPS", "NEAR_PEAK", 0L, 21L, 2L,
"UPS", "NEAR_MID", 0L, 21L, 2L,
"UPS", "NEAR_PIT", 0L, 21L, 2L,
"UPS", "HI_ABOVE", 0L, 21L, 2L,
"MID", "CONVEX_D", 0L, 31L, 3L,
"MID", "CONCAVE_D", 0L, 31L, 3L,
"MID", "PLANAR_D", 25L, 31L, 3L,
"MID", "CONVEX_A", 0L, 31L, 3L,
"MID", "CONCAVE_A", 0L, 31L, 3L,
"MID", "PLANAR_A", 10L, 31L, 3L,
"MID", "HIGH_WI", 0L, 31L, 3L,
"MID", "LOW_WI", 0L, 31L, 3L,
"MID", "NEAR_LEVEL", 0L, 31L, 3L,
"MID", "REL_STEEP", 30L, 31L, 3L,
"MID", "NEAR_DIV", 0L, 31L, 3L,
"MID", "NEAR_HALF", 25L, 31L, 3L,
"MID", "NEAR_CHAN", 0L, 31L, 3L,
"MID", "NEAR_PEAK", 0L, 31L, 3L,
"MID", "NEAR_MID", 10L, 31L, 3L,
"MID", "NEAR_PIT", 0L, 31L, 3L,
"MID", "HI_ABOVE", 0L, 31L, 3L,
"LOW", "CONVEX_D", 0L, 41L, 4L,
"LOW", "CONCAVE_D", 20L, 41L, 4L,
"LOW", "PLANAR_D", 0L, 41L, 4L,
"LOW", "CONVEX_A", 0L, 41L, 4L,
"LOW", "CONCAVE_A", 0L, 41L, 4L,
"LOW", "PLANAR_A", 0L, 41L, 4L,
"LOW", "HIGH_WI", 20L, 41L, 4L,
"LOW", "LOW_WI", 0L, 41L, 4L,
"LOW", "NEAR_LEVEL", 0L, 41L, 4L,
"LOW", "REL_STEEP", 20L, 41L, 4L,
"LOW", "NEAR_DIV", 0L, 41L, 4L,
"LOW", "NEAR_HALF", 10L, 41L, 4L,
"LOW", "NEAR_CHAN", 30L, 41L, 4L,
"LOW", "NEAR_PEAK", 0L, 41L, 4L,
"LOW", "NEAR_MID", 0L, 41L, 4L,
"LOW", "NEAR_PIT", 0L, 41L, 4L,
"LOW", "HI_ABOVE", 0L, 41L, 4L,
"DEP", "CONVEX_D", 0L, 51L, 5L,
"DEP", "CONCAVE_D", 15L, 51L, 5L,
"DEP", "PLANAR_D", 15L, 51L, 5L,
"DEP", "CONVEX_A", 0L, 51L, 5L,
"DEP", "CONCAVE_A", 10L, 51L, 5L,
"DEP", "PLANAR_A", 0L, 51L, 5L,
"DEP", "HIGH_WI", 20L, 51L, 5L,
"DEP", "LOW_WI", 0L, 51L, 5L,
"DEP", "NEAR_LEVEL", 10L, 51L, 5L,
"DEP", "REL_STEEP", 0L, 51L, 5L,
"DEP", "NEAR_DIV", 0L, 51L, 5L,
"DEP", "NEAR_HALF", 0L, 51L, 5L,
"DEP", "NEAR_CHAN", 10L, 51L, 5L,
"DEP", "NEAR_PEAK", 0L, 51L, 5L,
"DEP", "NEAR_MID", 0L, 51L, 5L,
"DEP", "NEAR_PIT", 20L, 51L, 5L,
"DEP", "HI_ABOVE", 0L, 51L, 5L
) %>%
as.data.frame() %>%
foreign::write.dbf("./inst/extdata/c7rule.dbf")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.