Description Usage Arguments Details Value Examples
View source: R/Classifier_MUVR.R
Numeric VIPs vector
1 | ppm_VIP_vector(VIPs)
|
VIPs |
a dataframe from the model_VIP(MVObj) function. It requires a "ppms" variable |
The function extracts the VIPs vector (numeric) from the model_VIP(MVObj)
function. It is not necessary if you have the ppm values in a numeric vector.
This is needed in case that an automated pipeline is applied, connecting the
output from model_VIP(MVObj) to nmr_identify_regions
family functions.
a numeric ppm vector ready to be identified with
nmr_identify_regions_blood
, nmr_identify_cell
or
nmr_identify_regions_urine
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 | message("MUVR is not compatible with Bioconductor,
use bp_kfold_VIP_analysis method instead")
## Example of MUVR usage
# 1.Build a model with the X data from your nmr object and your class:
#MVObj <- rdCV_PLS_RF(nmr_data(nmr_peak_table),
#Y = nmr_peak_table_completed$Timepoint)
# 2.Model performance
#confusion_matrix(MVObj)
# 3.Plotting the model
#MUVR_model_plot(MVObj)
# 4.Permutation test
#permutations <- permutation_test_model(MVObj, nPerm = 50)
# 5.Plotting permutation test results
#permutation_test_plot(MVObj, permutations, model = "Mid", type = "t")
# 6.p-Value
#p.value <- p_value_perm(MVObj$miss[["mid"]], permutations[, "Mid"])
# 7.Significant variables
#VIPs <- model_VIP(MVObj)
# 8.Identification
#results <- nmr_identify_regions_blood(ppm_VIP_vector(VIPs))
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.