Keep samples based on metadata column criteria

# S3 method for nmr_dataset_family
filter(.data, ...)

Arguments

.data

An nmr_dataset_family object

...

conditions, as in dplyr

Value

The same object, with the matching rows

See also

Examples

dir_to_demo_dataset <- system.file("dataset-demo", package = "AlpsNMR")
dataset <- nmr_read_samples_dir(dir_to_demo_dataset)
dataset_1D <- nmr_interpolate_1D(dataset, axis = c(min = -0.5, max = 10, by = 2.3E-4))

## example 1
sample_10 <- filter(dataset_1D, NMRExperiment == "10")

## example 2
# test_samples <- dataset_1D %>% filter(nmr_peak_table$metadata$external$Group == "placebo")