sfc_generator: Generate a nxn curve based on expansion rules

In sfcurve: 2x2, 3x3 and Nxn Space-Filling Curves

Generate a nxn curve based on expansion rules

Description

Generate a nxn curve based on expansion rules

Usage

sfc_generator(
  rules,
  name,
  envir = topenv(parent.frame()),
  flippable = FALSE,
  verbose = TRUE
)

Arguments

rules	An sfc_rules object.
name	Name of the curve. The name will be used for the functions that will be generated.
envir	Environment where the functions are exported.
flippable	Whether rules can have flipped version? If it is TRUE, the generated function also accepts the flip argument.
verbose	Whether to print messages?

Details

Two functions will be exported:

• ⁠sfc_{name}()⁠

• ⁠draw_rules_{name}()⁠

For the simplicity, flipping is not supported yet.

Value

No value is returned.

Examples

UNIVERSE_4x4_PEANO = c("I", "R", "L")

RULES_4x4_PEANO = list()
RULES_4x4_PEANO[["I"]][[1]] = sfc_unit("RIILLIIRRIILLIIR", rot = 0, universe = UNIVERSE_4x4_PEANO)
RULES_4x4_PEANO[["I"]][[2]] = sfc_hflip(RULES_4x4_PEANO[["I"]][[1]])
RULES_4x4_PEANO[["R"]][[1]] = sfc_unit("IIIRRIILLIIRRIIL", rot = 0, universe = UNIVERSE_4x4_PEANO)      
RULES_4x4_PEANO[["R"]][[2]] = sfc_rotate(sfc_unit("LIIRRIILLIIRRIII", 
                                rot = 270, universe = UNIVERSE_4x4_PEANO), 90)
RULES_4x4_PEANO[["L"]][[1]] = sfc_hflip(RULES_4x4_PEANO[["R"]][[2]])
RULES_4x4_PEANO[["L"]][[2]] = sfc_hflip(RULES_4x4_PEANO[["R"]][[1]])

SFC_RULES_4x4_PEANO = sfc_rules(rules = RULES_4x4_PEANO,
        name = "Peano 4x4",
        bases = BASE_LIST[UNIVERSE_4x4_PEANO])

sfc_generator(SFC_RULES_4x4_PEANO, "4x4_peano")
draw_rules_4x4_peano()
sfc_4x4_peano("I", 111) |> plot()

sfcurve documentation built on Sept. 14, 2024, 1:07 a.m.