Author
Man Ho Suen M.H.Suen@sms.ed.ac.uk, Finn Lindgren Finn.Lindgren@gmail.com
Examples
(m <- fm_mesh_2d(
fm_hexagon_lattice(
fmexample$boundary_sf[[1]],
edge_len = 0.1
)$lattice,
max.edge = c(0.2, 1),
boundary = fmexample$boundary_sf,
min.angle = c(32, 21)
))
#> fm_mesh_2d object:
#> Manifold: R2
#> V / E / T: 2308 / 6877 / 4570
#> Euler char.: 1
#> Constraints: Boundary: 44 boundary edges (1 group: 1), Interior: 131 interior edges (1 group: 1)
#> Bounding box: (-5.331027, 4.061656) x (-3.998161, 5.415609)
#> Basis d.o.f.: 2308
if (require("ggplot2", quietly = TRUE)) {
ggplot() +
geom_fm(data = m)
}