edit_mask {pressuRe}

Edit mask

Description

Allows user to manually adjust mask vertices

Usage

edit_mask(
  pressure_data,
  n_edit,
  threshold = 0.002,
  edit_list = seq(1, length(pressure_data[[5]])),
  image = "max"
)

Arguments

pressure_data

List. First item is a 3D array covering each timepoint of the measurement.

n_edit

Numeric. Number of vertices to edit

threshold

Numeric. Distance between point clicked and vertex that is selected

edit_list

List. Mask numbers that want to be edited. (Default is to load all masks so that adjacent masks with shared coordinates are modified together)

image

String."max" = footprint of maximum sensors. "mean" average value of sensors over time

Value

List. Edited mask is added to the pressure data variable

• pressure_array. 3D array covering each timepoint of the measurement. z dimension represents time

• pressure_system. String defining pressure system

• sens_size. Numeric vector with the dimensions of the sensors

• time. Numeric value for time between measurements

• masks. List

• events. List

• sensor_polygons. Data frame with corners of sensors

• max_matrix Matrix with maximum image

Examples

emed_data <- system.file("extdata", "emed_test.lst", package = "pressuRe")
pressure_data <- load_emed(emed_data)
pressure_data <- create_mask_auto(pressure_data, "automask_novel",
foot_side = "auto", plot = FALSE)
pressure_data <- edit_mask(pressure_data, n_edit = 1, threshold = 0.002,
image = "max")