plotSymDifRNP: Symmetrical difference of RNP sets

Description Usage Arguments Examples

View source: R/plotSymDifRNP.R

Description

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

Usage

1
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

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
#------------------------------------------------------------
# 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)

Example output

Loading required package: DiceKriging
Loading required package: emoa
Warning messages:
1: In rgl.init(initValue, onlyNULL) : RGL: unable to open X11 display
2: 'rgl_init' failed, running with rgl.useNULL = TRUE 
3: .onUnload failed in unloadNamespace() for 'rgl', details:
  call: fun(...)
  error: object 'rgl_quit' not found 

GPareto documentation built on May 31, 2021, 5:09 p.m.