plotSymDifRNP {GPareto}

Symmetrical difference of RNP sets

Description

Plot the symmetrical difference between two Random Non-Dominated Point (RNP) sets.

Usage

plotSymDifRNP(set1, set2, xlim, ylim, fill = "black", add = "FALSE", ...)

Arguments

set1, set2

RNP sets considered,

xlim, ylim

numeric vectors of length 2, giving the x and y coordinates ranges for plotting,

fill

optional color of the symmetric difference area,

add

logical; if TRUE add to an already existing plot; if FALSE (default) start a new plot taking xlim, ylim as limits.

...

additional parameters for the plot.default and polygon graphic functions

Examples

#------------------------------------------------------------
# Simple example
#------------------------------------------------------------
set1 <- rbind(c(0.2, 0.35, 0.5, 0.8),
              c(0.8, 0.6, 0.55, 0.3))

set2 <- rbind(c(0.3, 0.4),
              c(0.7, 0.4))

plotSymDifRNP(set1, set2, xlim = c(0, 1), ylim = c(0, 1), fill = "grey")
points(t(set1), col = "red", pch = 20)
points(t(set2), col = "blue", pch = 20)