# Use the data set WinesRankingRawData stored in an excel file.
path2file <- system.file("extdata",
"WinesRankingRawData.xlsx", package = 'DistatisR')
ranking6Wines <- read.df.excel(path = path2file, sheet = 'Ranking')
aCubeOfDistance <- DistanceFromRank(ranking6Wines$df.data)
Run the code above in your browser using DataLab