Unable to defuzzify the fuzzy weights

Question

I need crisp weights calculated from fuzzy ahp comparison matrix, as from the code below, I have got the fuzzy weights (in R programme ide- rstudio- package - FuzzyAHP). from the 3 criteria and want to defuzzify it using centroid defuzzification.

library(FuzzyAHP)
comparisonMatrixValues = c(1,3,4,
                           1/3,1,2,
                           1/4,1/2,1)
comparisonMatrix = matrix(comparisonMatrixValues, nrow = 3, ncol = 3, byrow = TRUE)
comparisonMatrix = pairwiseComparisonMatrix(comparisonMatrix)
fuzzyComparisonMatrix = fuzzyPairwiseComparisonMatrix(comparisonMatrix)
print(fuzzyComparisonMatrix)
fuzzyweights= calculateWeights(fuzzyComparisonMatrix);fuzzyweights