Msum {SAFD}

Minkowski sum

Description

Given a list XX of polygonal fuzzy numbers the function first checks (1) if each element of the list is in the correct form (tested by checking) and (2) if the alpha-levels of all elements in the list coincide. If these two conditions are fulfilled the levelwise Minkowski-sum of all elements in the sample XX will be returned. If not the translator function can be used to transform the elements of the list in the correct format.

Usage

Msum(XX, pic = 0)

Arguments

XX

...list of polygonal fuzzy numbers (the function implicitly checks the conditions)

pic

...numeric, if pic=1 then the Minkowski-sum of XX is printed. By default pic=0.

Details

See examples

Value

Given input XX in the correct format the function returns the Minkowski sum of the polygonal fuzzy numbers contained in the list.

Note

In case you find (almost surely existing) bugs or have recommendations for improving the functions comments are welcome to the above mentioned mail addresses.

Author(s)

Wolfgang Trutschnig <[e-mail]>, Asun Lubiano <[e-mail]>

See Also

See Also checking, translator, Mmean

Examples

#Example 1:
X<-data.frame(x=c(0,1,1.5,3),alpha=c(0,1,1,0))
Y<-data.frame(x=c(1.25,2.75,2.75,5),alpha=c(0,1,1,0))
sum<-Msum(list(X,Y))
sum

#Example 2:
data(XX)
X<-translator(XX[[1]],50)
Y<-translator(XX[[2]],50)
Z<-translator(XX[[3]],50)
YY<-list(X,Y,Z)
M<-Msum(YY)