The summary function for an indiscernibility relation

Share:

Description

This function enables the output of a summary of the indiscernibility relation functions.

Usage

1
2
## S3 method for class 'IndiscernibilityRelation'
summary(object, ...)

Arguments

object

a "IndiscernibilityRelation" object. See BC.IND.relation.FRST

and BC.IND.relation.RST.

...

the other parameters.

Value

a description that contains the following information. For FRST model:

Author(s)

Lala Septem Riza

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
###########################################################
## Example 1: Dataset containing nominal values for
## all attributes.
###########################################################
## Decision table is represented as data frame
dt.ex1 <- data.frame(c(1,0,2,1,1,2,2,0), c(0, 1,0, 1,0,2,1,1),
                        c(2,1,0,0,2,0,1,1), c(2,1,1,2,0,1,1,0), c(0,2,1,2,1,1,2,1))
colnames(dt.ex1) <- c("aa", "bb", "cc", "dd", "ee")
decision.table <- SF.asDecisionTable(dataset = dt.ex1, decision.attr = 5)

## In this case, we only consider the second and third attributes.
attributes <- c(2, 3)

#### calculate fuzzy indiscernibility relation ####
## in this case, we are using "crisp" as a type of relation and type of aggregation
control.ind <- list(type.relation = c("crisp"), type.aggregation = c("crisp"))
IND <- BC.IND.relation.FRST(decision.table, attributes = attributes, control = control.ind)

summary(IND)

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.