Learn R Programming

RMCriteria (version 0.2.0)

RPrometheeIVKernel: RPrometheeIVKernel

Description

The PROMETHEE IV KERNEL method was developed by Albuquerque and Montenegro (2015), as an alternative method to estimate PROMETHEE IV. It considers the empirical distribution of the criteria through kernel density estimation to evaluate alternatives.

Usage

RPrometheeIVKernel(RPrometheeArguments)

Arguments

RPrometheeArguments

An object with all RPromethee arguments. For PROMETHEE IV KERNEL, the object must be supplied with a band argument, for Kernel Density Estimation. See RPrometheeConstructor for more information.

Value

  • PhiPlus The resulting PhiPlus from the alternatives for all criterias.

  • PhiMinus The resulting PhiMinus from the alternatives for all criterias

  • Index The resulting Index from the alternatives for all criterias

  • alternatives The alternatives names.

  • criterias The criterias names.

  • datMat The data used corresponding to criterias and alternatives.

References

See Also

Other RPromethee methods: PrometheeIIIPlot, PrometheeIIPlot, PrometheeIPlot, PrometheeIVPlot, RPrometheeConstructor, RPrometheeIII, RPrometheeII, RPrometheeIV, RPrometheeI, RPrometheeV, SensitivityAnalysis, UpdateRPrometheeAlternatives, UpdateRPrometheeArguments, WalkingWeightsPlot, plot,RPrometheeI-method

Examples

Run this code
# NOT RUN {
## Create objects for each argument
data <- matrix(c(5.2, -3.5,
                 4.3, -1.2,
                 6.7, -2.0,
                 5.4, -5.0,
                 4.8,  0.0,
                 2.8, -3.4), byrow = TRUE, ncol = 2)

parms <- matrix(c(1.0, 5.0), byrow = TRUE, ncol = 1, nrow = 2)
vecWeights <- c(0.3, 0.7)
vecMaximiz <- c(FALSE, TRUE)
prefFunction <- c(0, 0)
band <- as.matrix(apply(data, 2, bw.nrd0))
normalize <- FALSE
alternatives <- c("Alt 1", "Alt 2", "Alt 3")

## Create RPrometheeArguments object
PromObj <- RPrometheeConstructor(datMat = data, vecWeights = vecWeights,
vecMaximiz = vecMaximiz, prefFunction = prefFunction, parms = parms,
normalize = normalize, alternatives = alternatives, band = band)

## Run RPrometheeIVKernel
result <- RPrometheeIVKernel(PromObj)

## Updating alternatives name using UpdateRPrometheeAlternatives
newAlternatives <- c("A", "B", "C", "D", "E", "F")
result <- UpdateRPrometheeAlternatives(result, newAlternatives)

## Updating any argument using UpdateRPrometheeArguments
newParms <- matrix(c(1.6, 4.2), byrow = TRUE, ncol = 1)
PromObj <- UpdateRPrometheeArguments(PromObj, "parms", newParms)
result <- RPrometheeIVKernel(PromObj)
# }

Run the code above in your browser using DataLab