path2file <- system.file("extdata",
"OrangeJuiceSortingRawData.xlsx", package = 'DistatisR')
OrangeDataSort <- read.df.excel(path = path2file,
sheet = 'Sorting',
voc.sheet = 'Vocabulary')
Run the code above in your browser using DataLab