if (FALSE) { # requireNamespace("pmartRdata", quietly = TRUE)
library(pmartRdata)
# Normalize using a metabolite (this is merely an example of how to use this specification;
# the metabolite used was not actually spiked-in for the purpose of normalization)
mynmr <- edata_transform(
omicsData = nmr_identified_object,
data_scale = "log2"
)
nmr_norm <- normalize_nmr(
omicsData = mynmr, apply_norm = TRUE,
metabolite_name = "unkm1.53",
backtransform = TRUE
)
# Normalization using a sample property
mynmr <- edata_transform(
omicsData = nmr_identified_object,
data_scale = "log2"
)
nmr_norm <- normalize_nmr(
omicsData = mynmr, apply_norm = TRUE,
sample_property_cname = "Concentration",
backtransform = TRUE
)
}
Run the code above in your browser using DataLab