Skip to contents

Convenience constructors for finite occupied grids with non-random holes or channels. These matrices can be passed to occupied.mesh.surface.graph().

Usage

keep.periodic.holes(
  h,
  w = h,
  hole.period = 4,
  hole.height = 1,
  hole.width = hole.height,
  row.offset = 2,
  col.offset = 2
)

keep.staggered.windows(
  h,
  w = h,
  window.height = 1,
  window.width = 2,
  row.period = 4,
  col.period = 5,
  row.offset = 2,
  col.offset = 2
)

keep.slit.channels(
  h,
  w = h,
  orientation = c("vertical", "horizontal"),
  slit.period = 5,
  slit.width = 1,
  bridge.spacing = 4,
  bridge.size = 1,
  offset = 2
)

keep.asymmetric.notches(h, w = h, notch.depth = 3, notch.width = 2)

Arguments

h

Number of rows.

w

Number of columns. Defaults to h.

hole.period

Spacing between periodic holes.

hole.height

Height of each removed rectangular hole.

hole.width

Width of each removed rectangular hole.

row.offset

Starting row index for the first removed block.

col.offset

Starting column index for the first removed block.

window.height

Height of each staggered removed window.

window.width

Width of each staggered removed window.

row.period

Vertical spacing between staggered window bands.

col.period

Horizontal spacing between staggered windows within a band.

orientation

Whether slit channels run "vertical" or "horizontal".

slit.period

Spacing between repeated slit channels.

slit.width

Width of each slit channel.

bridge.spacing

Spacing between preserved bridge segments.

bridge.size

Size of each preserved bridge segment along a slit.

offset

Starting row or column index for the first slit channel.

notch.depth

Depth of each asymmetric notch cut from a boundary.

notch.width

Width of the notched opening along that boundary.

Value

A logical occupancy matrix whose TRUE entries represent retained cells.

Examples

notches <- keep.asymmetric.notches(7, 8, notch.depth = 2, notch.width = 2)
holes <- keep.periodic.holes(7, 8, hole.period = 3)
slits <- keep.slit.channels(7, 8, slit.period = 3)
windows <- keep.staggered.windows(7, 8, row.period = 3, col.period = 4)