1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
|
/*
fuzzylite (R), a fuzzy logic control library in C++.
Copyright (C) 2010-2017 FuzzyLite Limited. All rights reserved.
Author: Juan Rada-Vilela, Ph.D. <jcrada@fuzzylite.com>
This file is part of fuzzylite.
fuzzylite is free software: you can redistribute it and/or modify it under
the terms of the FuzzyLite License included with the software.
You should have received a copy of the FuzzyLite License along with
fuzzylite. If not, see <http://www.fuzzylite.com/license/>.
fuzzylite is a registered trademark of FuzzyLite Limited.
*/
#include "fl/term/Concave.h"
namespace fl {
Concave::Concave(const std::string& name, scalar inflection, scalar end, scalar height)
: Term(name, height), _inflection(inflection), _end(end) { }
Concave::~Concave() { }
std::string Concave::className() const {
return "Concave";
}
Complexity Concave::complexity() const {
return Complexity().comparison(1 + 3).arithmetic(1 + 5);
}
scalar Concave::membership(scalar x) const {
if (Op::isNaN(x)) return fl::nan;
if (Op::isLE(_inflection, _end)) { //Concave increasing
if (Op::isLt(x, _end)) {
return Term::_height * (_end - _inflection) / (2.0 * _end - _inflection - x);
}
} else { //Concave decreasing
if (Op::isGt(x, _end)) {
return Term::_height * (_inflection - _end) / (_inflection - 2.0 * _end + x);
}
}
return Term::_height * 1.0;
}
scalar Concave::tsukamoto(scalar activationDegree, scalar minimum, scalar maximum) const {
FL_IUNUSED(minimum);
FL_IUNUSED(maximum);
scalar i = _inflection;
scalar e = _end;
return (i - e) / membership(activationDegree) + 2 * e - i;
}
bool Concave::isMonotonic() const {
return true;
}
std::string Concave::parameters() const {
return Op::join(2, " ", _inflection, _end) +
(not Op::isEq(getHeight(), 1.0) ? " " + Op::str(getHeight()) : "");
}
void Concave::configure(const std::string& parameters) {
if (parameters.empty()) return;
std::vector<std::string> values = Op::split(parameters, " ");
std::size_t required = 2;
if (values.size() < required) {
std::ostringstream ex;
ex << "[configuration error] term <" << className() << ">"
<< " requires <" << required << "> parameters";
throw Exception(ex.str(), FL_AT);
}
setInflection(Op::toScalar(values.at(0)));
setEnd(Op::toScalar(values.at(1)));
if (values.size() > required)
setHeight(Op::toScalar(values.at(required)));
}
void Concave::setInflection(scalar start) {
this->_inflection = start;
}
scalar Concave::getInflection() const {
return this->_inflection;
}
void Concave::setEnd(scalar end) {
this->_end = end;
}
scalar Concave::getEnd() const {
return this->_end;
}
Concave* Concave::clone() const {
return new Concave(*this);
}
Term* Concave::constructor() {
return new Concave;
}
}
|