View source: R/mnirs_methods.R
| print.mnirs_kinetics | R Documentation |
Generic methods for objects returned from analyse_kinetics().
## S3 method for class 'mnirs_kinetics'
print(x, ...)
x |
Object of class |
... |
Additional arguments. |
print |
Returns a model summary |
result <- read_mnirs(
example_mnirs("train.red"),
nirs_channels = c(smo2 = "SmO2"),
time_channel = c(time = "Timestamp (seconds passed)"),
zero_time = TRUE,
verbose = FALSE
) |>
resample_mnirs(method = "linear", verbose = FALSE) |>
extract_intervals(
group_intervals = "distinct", ## return each interval distinctly
start = by_time(368, 1084),
span = c(-20, 90),
zero_time = TRUE,
verbose = FALSE
) |>
analyse_kinetics(
method = "peak_slope",
span = 10,
verbose = FALSE
)
print(result)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.