fuzzyrb 1.0.0

data.tar.gz.sig

@@ -0,0 +1 @@
+]�#,��^L�B0�ﳘ.q��O������:|��7r�����&�L���ն���Y���9������nts�#����/�=���u(X�����ԍu�a�[�$ga

data/History.txt

@@ -0,0 +1,5 @@
+== 1.0.0 / 2007-11-09
+
+* 1 major enhancement
+  * Birthday!
+

data/Manifest.txt

@@ -0,0 +1,13 @@
+History.txt
+Manifest.txt
+README.txt
+Rakefile
+lib/fuzzy.rb
+lib/fuzzy_inference.rb
+lib/fuzzy_rule.rb
+lib/fuzzy_set.rb
+lib/line.rb
+lib/point.rb
+test/test_fuzzy.rb
+test/test_fuzzy_inference.rb
+test/test_fuzzy_set.rb

data/README.txt

@@ -0,0 +1,50 @@
+fuzzyrb
+    by Roman Kamyk
+    http://fuzzyrb.rubyforge.org/
+
+== DESCRIPTION:
+  
+Implements Fuzzy Sets in Ruby. I am very beginner at this topic, so it is very basic now. Any help will be appreciated.
+
+== FEATURES/PROBLEMS:
+  
+* Fuzzy Sets defined as line segments
+* Fuzzy Rules. Only conjunction of arguments is possible.
+* No error handling.
+* Deffuzification as center of gravity.
+* Reasoning - apply matching rule and combine the results.
+
+== SYNOPSIS:
+
+  Cannot be used from console. See test/ for sample usage.
+
+== REQUIREMENTS:
+
+* Ruby
+
+== INSTALL:
+
+sudo gem install fuzzyrb
+
+== LICENSE:
+
+(The GPL License)
+
+Copyright (C) 2007 Roman Kamyk
+
+This program is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+== Author
+Roman 'MrStone' Kamyk (mailto:roman.kamyk@gmail.com), 
+Student of Poznan University Of Technology, Computing Science Institute, Inteligent Decision Support Systems

data/Rakefile

@@ -0,0 +1,17 @@
+# -*- ruby -*-
+
+require 'rubygems'
+require 'hoe'
+require './lib/fuzzy.rb'
+
+Hoe.new('fuzzyrb', Fuzzyrb::VERSION) do |p|
+  p.rubyforge_name = 'fuzzyrb'
+  p.author = 'Roman Kamyk'
+  p.email = 'roman.kamyk@gmail.com'
+  p.summary = 'Fuzzy Sets for Ruby'
+  p.description = p.paragraphs_of('README.txt', 2..5).join("\n\n")
+  p.url = p.paragraphs_of('README.txt', 0).first.split(/\n/)[1..-1]
+  p.changes = p.paragraphs_of('History.txt', 0..1).join("\n\n")
+end
+
+# vim: syntax=Ruby

data/lib/fuzzy.rb

@@ -0,0 +1,29 @@
+#!/usr/bin/env ruby
+#  Created by Roman Kamyk <roman.kamyk@gmail.com on 2007-11-09.
+#  Copyright (C) 2007 Roman Kamyk
+#  
+#  This program is free software: you can redistribute it and/or modify
+#  it under the terms of the GNU General Public License as published by
+#  the Free Software Foundation, either version 3 of the License, or
+#  (at your option) any later version.
+#  
+#  This program is distributed in the hope that it will be useful,
+#  but WITHOUT ANY WARRANTY; without even the implied warranty of
+#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#  GNU General Public License for more details.
+#  
+#  You should have received a copy of the GNU General Public License
+#  along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+require 'pp'
+
+$:.unshift(File.dirname(__FILE__) + "/../lib/")
+require 'point'
+require 'line'
+require 'fuzzy_set'
+require 'fuzzy_rule'
+require 'fuzzy_inference'
+
+module Fuzzyrb
+  VERSION = "1.0.0"
+end

data/lib/fuzzy_inference.rb

@@ -0,0 +1,19 @@
+class FuzzyInference
+  def initialize(rules)
+    @rules = rules
+  end
+  
+  def mandani(values)
+    result = @rules.map { |rule|
+      rule.mandani(values)
+    }.inject { |s, r| s + r }
+    result.weigthCenter
+  end
+  
+  def larsen(values) 
+    result = @rules.map { |rule|
+      rule.larsen(values)
+    }.inject { |s, r| s + r }
+    result.weigthCenter
+  end
+end

data/lib/fuzzy_rule.rb

@@ -0,0 +1,24 @@
+class FuzzyRule
+  def initialize(arguments, result)
+    @arguments = arguments
+    @result = result
+  end  
+  
+  def minOfArguments(values)
+    tmp = []
+    for i in 0..(values.length-1)
+      tmp << @arguments[i][values[i]]
+    end
+    tmp.min
+  end
+  
+  def larsen(values)
+    min = minOfArguments(values)
+    @result.scale(min)
+  end
+  
+  def mandani(values)
+    min = minOfArguments(values)
+    @result.min(min)
+  end
+end

data/lib/fuzzy_set.rb

@@ -0,0 +1,115 @@
+EPSILON = 0.0001
+SCALE = 1
+class FuzzySet      
+  def initialize(points)
+    @points = points.sort
+  end
+  
+  def self.trapezoid(array)
+    raise Exception.new("Trapezoid must have array length 4") if array.length != 4
+    points = []
+    points << Point.new(array[0], 0)
+    points << Point.new(array[1], SCALE)
+    points << Point.new(array[2], SCALE) unless array[2] == array[1]
+    points << Point.new(array[3], 0)
+    FuzzySet.new(points)
+  end
+  
+  def toLines
+    lines = []
+    for i in 1..@points.length-1
+      lines << Line.new(@points[i], @points[i-1])
+    end
+    lines
+  end
+  
+  def intersections(other)
+    if other.is_a?(Line)
+      points = []
+      toLines.each { |mline| 
+        points << mline.intersect(other)
+      }
+      points.select { |point| (self[point.x]-point.y).abs <= EPSILON }
+    elsif other.is_a?(FuzzySet)
+      myLines = toLines
+      points = []
+      other.toLines.each { |line| 
+        myLines.each { |mline|
+          points << mline.intersect(line)
+        }
+      }
+      points.select { |point|
+        (self[point.x]-point.y).abs + (other[point.x]-point.y).abs <= EPSILON
+      }
+    else
+      raise Exception.new("Unable to count intersection")
+    end
+  end
+
+  def +(other)
+    points = [@points, other.points, intersections(other)].flatten.uniq.sort
+    res = points.reject { |point|
+       self[point.x]-EPSILON > point.y or other[point.x]-EPSILON > point.y
+    }
+    FuzzySet.new(res)
+  end
+  
+  def min(value)
+    line = Line.new(Point.new(0, value), Point.new(1, value))
+    points = [@points, intersections(line)].flatten.uniq.sort
+    res = points.reject { |p| self[p.x] - EPSILON > value }
+    FuzzySet.new(res)
+  end
+  
+  # Choose min of current and _other_ set
+  def &(other)
+    points = [@points, crosspoints(other)].flatten.uniq.sort
+    res = []
+    points.each { |point|
+      res << point if self[point.x]-EPSILON < point.y and self[point.x]+EPSILON > point.y and other[point.x]+EPSILON >= self[point.x]
+    }
+    FuzzySet.new(res)
+  end
+  attr_reader :points
+  
+  def weigthCenter()
+    nominator = 0.0
+    denominator = 0.0
+    for i in 1..@points.length-1
+      line = Line.new(@points[i], @points[i-1])
+      x2 = points[i].x
+      x1 = points[i-1].x
+      nominator += line.a * x2**3/3 + line.b * x2**2/2 - line.a * x1**3/3 - line.b * x1**2/2
+      denominator += line.a * x2**2/2 + line.b * x2 - line.a * x1**2/2 - line.b * x1
+    end
+    nominator/denominator
+  end
+  
+  def scale(factor)
+    fs = FuzzySet.new(@points.map { |p| p.clone() })
+    fs.scale!(factor)
+  end
+  
+  def scale!(factor)
+    @points.each { |point| point.y *= factor / SCALE }
+    self
+  end
+  
+  def [](value)
+    if value<@points[0].x
+      return 0
+    elsif value > @points.last.x
+      return 0
+    end
+    idx = 0
+    while (@points[idx].x < value)
+      idx += 1
+    end
+    return @points[idx].y if @points[idx].x == value
+    x1 = @points[idx-1].x
+    x2 = @points[idx].x
+    y1 = @points[idx-1].y
+    y2 = @points[idx].y
+    return 1.0*(y2 - y1)/(x2-x1) * (value - x1) + y1
+  end
+end

data/lib/line.rb

@@ -0,0 +1,16 @@
+class Line
+  def initialize(p1, p2)
+    @a = 1.0*(p2.y-p1.y)/(p2.x-p1.x)
+    @b = 1.0*p1.y - @a*p1.x
+    # pp [p1, p2, @a, @b]
+  end
+  
+  def intersect(other)
+    x = 1.0*(b-other.b)/(other.a-a)
+    y = 1.0*a*x+b
+    # pp [self, other, x, y]
+    Point.new(x, y)
+  end
+  
+  attr_accessor :a, :b
+end

data/lib/point.rb

@@ -0,0 +1,14 @@
+class Point
+  def initialize(x, y)
+    @x = x
+    @y = y
+  end  
+  def <=>(other)
+    self.x <=> other.x
+  end
+  def initialize_copy(orig)
+    @x = orig.x
+    @y = orig.y
+  end
+  attr_accessor :x, :y
+end

data/test/test_fuzzy.rb

@@ -0,0 +1,7 @@
+$:.unshift(File.dirname(__FILE__) + "/../lib/")
+$:.unshift(File.dirname(__FILE__) + "/../test/")
+require 'test/unit'
+require 'test/unit/ui/console/testrunner'
+
+require 'test_fuzzy_set'
+require 'test_fuzzy_inference'

data/test/test_fuzzy_inference.rb

@@ -0,0 +1,27 @@
+#!/usr/bin/ruby
+$:.unshift(File.dirname(__FILE__) + "/../lib/")
+require 'test/unit'
+require 'fuzzy'
+
+class TestFuzzyInference < Test::Unit::TestCase
+  def setup
+    a11 = FuzzySet.trapezoid([4, 5, 5, 10])
+    a12 = FuzzySet.trapezoid([10, 19, 19, 20])
+    a21 = FuzzySet.trapezoid([4, 9, 9, 10])
+    a22 = FuzzySet.trapezoid([10, 12, 13, 20])
+    b1 = FuzzySet.trapezoid([20, 30, 30, 40])
+    b2 = FuzzySet.trapezoid([30, 45, 45, 50])
+    r1 = FuzzyRule.new([a11, a12], b1)
+    r2 = FuzzyRule.new([a21, a22], b2)
+    @fi = FuzzyInference.new([r1, r2])
+  end
+  
+  def test_mandani
+    assert_in_delta 33.71, @fi.mandani([7, 18]), 0.005
+  end
+  
+  def test_larsen
+    assert_in_delta 33.58, @fi.larsen([7, 18]), 0.005
+  end
+end
+

data/test/test_fuzzy_set.rb

@@ -0,0 +1,30 @@
+#!/usr/bin/ruby
+require 'test/unit'
+require 'fuzzy'
+
+class TestFuzzySet < Test::Unit::TestCase
+  def test_trapezoid1
+    t = FuzzySet.trapezoid([4, 5, 5, 10])
+    assert_equal(0, t[4])
+    assert_equal(1, t[5])
+    assert_equal(0, t[10])
+    assert_equal(0.5, t[4.5])
+    assert_equal(0.8, t[6])
+    assert_equal(0.6, t[7])
+  end
+  
+  def test_trapezoid2
+    t = FuzzySet.trapezoid([10, 12, 13, 20])
+    assert_equal(0, t[9])
+    assert_equal(0, t[10])
+    assert_equal(0.5, t[11])
+    assert_equal(0, t[-1000])
+    assert_equal(1, t[12])
+    assert_equal(1, t[12.5])
+    assert_equal(1, t[13])
+    assert_equal(0, t[20])
+    assert_equal(0, t[1000])
+  end
+end
+
+

metadata

@@ -0,0 +1,93 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.9.4
+specification_version: 1
+name: fuzzyrb
+version: !ruby/object:Gem::Version 
+  version: 1.0.0
+date: 2007-11-10 00:00:00 +01:00
+summary: Fuzzy Sets for Ruby
+require_paths: 
+- lib
+email: roman.kamyk@gmail.com
+homepage: "    by Roman Kamyk"
+rubyforge_project: fuzzyrb
+description: "== FEATURES/PROBLEMS:  * Fuzzy Sets defined as line segments * Fuzzy Rules. Only conjunction of arguments is possible. * No error handling. * Deffuzification as center of gravity. * Reasoning - apply matching rule and combine the results.  == SYNOPSIS:  Cannot be used from console. See test/ for sample usage.  == REQUIREMENTS:"
+autorequire: 
+default_executable: 
+bindir: bin
+has_rdoc: true
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+- |
+  -----BEGIN CERTIFICATE-----
+  MIIDODCCAiCgAwIBAgIBADANBgkqhkiG9w0BAQUFADBCMRQwEgYDVQQDDAtyb21h
+  bi5rYW15azEVMBMGCgmSJomT8ixkARkWBWdtYWlsMRMwEQYKCZImiZPyLGQBGRYD
+  Y29tMB4XDTA3MTExMDA1MzUzM1oXDTA4MTEwOTA1MzUzM1owQjEUMBIGA1UEAwwL
+  cm9tYW4ua2FteWsxFTATBgoJkiaJk/IsZAEZFgVnbWFpbDETMBEGCgmSJomT8ixk
+  ARkWA2NvbTCCASIwDQYJKoZIhvcNAQEBBQADggEPADCCAQoCggEBAMdV1ujoU4I2
+  daF4KANtDPTSjLYhXC1CiiyEgGEVA6GvieQ2NpNNsSXl+6tbWXGNUWFHj50rrLTC
+  e1dJSGGTZa9ZjI6fkeb/Gr13s71ncCJ+hBbpvktWIWdvOvzvNo9bdzNCKX00Rlk5
+  hQzxhm/ZxQ2VG4ZDYc/gWOCzKYH8aKrAzzdjRsxE/QMgnVbnirCGSPQTjPVhBvcX
+  pH2yDvZF9NOs3D89JvA4P50WRCe8/kKPx7TG9Qkd303/FmO8yDUvJn0KgiYkm1pc
+  Sb+kcDZnh2+2uvkygLLDQhV5m7DfFLLkgwb/t7R4tSNFqcHoa0829rnSVBbCZACg
+  mrXhThP3LX8CAwEAAaM5MDcwCQYDVR0TBAIwADALBgNVHQ8EBAMCBLAwHQYDVR0O
+  BBYEFGVgSLBvjD5kTd+1XMf58PK9llj6MA0GCSqGSIb3DQEBBQUAA4IBAQCGX43w
+  PspP+rmsfCKztiUwtfb4d+eqW62WaAUBT37KeW8IEm3UpAe5T1c3fFm46bxM3a2Y
+  wUeLqSMSquXNzb2fy+3vLAUYHc4UkR5nA5kB+F3RJwuc7LJCBGlkPsCfa91dE6j5
+  S80vqeRf4ITITHZbFLuVFFvQb/nPGe2LtyP4+neAktSu4r7rQ5vLbQQ/NSAliFrP
+  pJbWXmfjKQsDKGgs1TiISC3kfLcynhCgCcbLCek5Oc0U195z36e8x3aYEJSGFVmF
+  y8xfBxyZ4t0FP3lTPvGMfmSKOVOjcwT4OVpzdvRXWR8lghrQlAzNG5HdOxMzeBjb
+  Z2byiG0rlbybmXMS
+  -----END CERTIFICATE-----
+
+post_install_message: 
+authors: 
+- Roman Kamyk
+files: 
+- History.txt
+- Manifest.txt
+- README.txt
+- Rakefile
+- lib/fuzzy.rb
+- lib/fuzzy_inference.rb
+- lib/fuzzy_rule.rb
+- lib/fuzzy_set.rb
+- lib/line.rb
+- lib/point.rb
+- test/test_fuzzy.rb
+- test/test_fuzzy_inference.rb
+- test/test_fuzzy_set.rb
+test_files: 
+- test/test_fuzzy.rb
+- test/test_fuzzy_inference.rb
+- test/test_fuzzy_set.rb
+rdoc_options: 
+- --main
+- README.txt
+extra_rdoc_files: 
+- History.txt
+- Manifest.txt
+- README.txt
+executables: []
+
+extensions: []
+
+requirements: []
+
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Version::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.3.0
+    version: