t50_matriz_dispersa_densa 0.0.1

data/lib/matriz_dispersa.rb~

@@ -0,0 +1,275 @@
+require 'Fraccion.rb'
+require 'matriz.rb'
+require "matrix"
+
+class SparseVector
+    attr_reader :vector
+
+    def initialize(h = {})
+        @vector = Hash.new(0)
+        @vector = @vector.merge!(h)
+    end
+
+    def [](i)
+        @vector[i]
+    end
+
+    def to_s
+        @vector.to_s
+    end
+end
+
+#Clase que se encarga de crear el hash
+
+class SparseMatrix < Matriz
+
+    attr_reader :matrix
+
+    # Inicializador propio de la clase
+    def initialize(h = {})
+        @matrix = Hash.new({})
+        for k in h.keys do
+            @matrix[k] = if h[k].is_a? SparseVector 
+                                h[k]
+                        else
+                              @matrix[k] = SparseVector.new(h[k])
+                            end
+        end
+    end
+
+    # Obtener un valor de la matriz dada una posicion
+    def [](i)
+        @matrix[i]
+    end
+
+    def col(j)
+        c = {}
+        for r in @matrix.keys do
+            c[r] = @matrix[r].vector[j] if @matrix[r].vector.keys.include? j
+        end
+        SparseVector.new c
+    end
+
+        def comprobar
+                contar = 0
+                contartotal = 0
+                result = 0
+           for r in @matrix.keys do
+                         for j in @matrix[r].vector.keys do
+                                contartotal = contartotal + 1
+                                if @matrix[r].vector[j] == 0 
+                                        contar = contar + 1
+                                end
+                        end
+      end
+                result = (contar * 100) / contartotal
+                if result < 60 
+                         "La matriz no es dispersa"
+                end
+        end
+
+        def mostrar
+        for r in @matrix.keys do
+                                  for j in @matrix[r].vector.keys do
+                                        print "#{@matrix[r].vector[j]}  "  
+                                end
+                                puts
+        end
+        end
+
+# Operacion de la suma en la matriz dispersa. Realiza la operacion entre dos matrices dispersa y una dispersa con una densa
+        
+        def +(other)
+			  case other
+			  when Matriz_Dispersa
+					raise ArgumentError, "Las matrices no son iguales en longitud." unless @matrix.size == other.matrix.size && @matrix[1].vector.size == other.matrix[1].vector.size
+					resul = Array.new
+					 @matrix.keys.times do |r|
+					 r = r + 1
+					  #for r in @matrix.keys do
+						resul_f = Array.new
+						 1.upto(@matrix[r].vector.keys) do |j|  
+						 #for j in @matrix[r].vector.keys do       
+					  		#print "  #{@matrix[r].vector[j] + other.matrix[r].vector[j]}  "
+							resul_f << @matrix[r].vector[j] + other.matrix[r].vector[j]
+					  	end
+					  		#puts
+						resul << resul_f
+					end
+					return resul
+			  when Matriz_densa
+					raise ArgumentError, "Las matrices no son iguales en longitud." unless @matrix.size == other.f && @matrix[1].vector.size == other.c
+					resul = Array.new
+					1.upto(other.f) do |r|
+					 #for r in 1..other.f do
+						resul_f = Array.new
+						1.upto(other.c) do |j|
+						 #for j in 1..other.c do
+               		#print "  #{@matrix[r].vector[j] + other.m[r - 1][j - 1]}"
+							resul_f << @matrix[r].vector[j] + other.m[r - 1][j - 1]
+               	end
+               	#puts
+						resul << resul_f
+        			end
+					return resul
+			  else
+					raise TypeError.new("No se puede pasar #{other.inspect} a Matriz")
+			  end
+        end
+	
+	# Operacion de la resta en la matriz dispersa. Realiza la operacion entre dos matrices dispersa y una dispersa con una densa
+        def -(other)
+			  case other
+			  when Matriz_Dispersa
+					raise ArgumentError, "Las matrices no son iguales en longitud." unless @matrix.size == other.matrix.size && @matrix[1].vector.size == other.matrix[1].vector.size
+					resul = Array.new
+		     		#for r in @matrix.keys do
+					 1.upto(@matrix.keys) do |r|
+						resul_f = Array.new
+					  	#for j in @matrix[r].vector.keys do  
+						 1.upto(@matrix[r].vector.keys) do |j|      
+					  		#print "  #{@matrix[r].vector[j] - other.matrix[r].vector[j]}  "
+							resul_f << @matrix[r].vector[j] - other.matrix[r].vector[j]
+					  	end
+					  		#puts
+						resul << resul_f
+					end
+					return resul
+			  when Matriz_densa
+					raise ArgumentError, "Las matrices no son iguales en longitud." unless @matrix.size == other.f && @matrix[1].vector.size == other.c
+					resul = Array.new
+					#for r in 1..other.f do
+					1.upto(other.f) do |r|
+						resul_f = Array.new
+               	#for j in 1..other.c do
+						1.upto(other.c) do |j|
+               		#print "  #{@matrix[r].vector[j] - other.m[r - 1][j - 1]}"
+							resul_f << @matrix[r].vector[j] - other.m[r - 1][j - 1]
+               	end
+               	#puts
+						resul << resul_f
+        			end
+					return resul
+			  else
+					raise TypeError.new("No se puede pasar #{other.inspect} a Matriz")
+			  end
+
+        end
+
+	# Operacion de la multiplicacion en la matriz dispersa. Realiza la operacion entre dos matrices dispersa y una dispersa con una densa
+        def *(other) 
+        
+				case other
+				when Matriz_Dispersa
+					 raise ArgumentError, "Las columnas de una matriz no coinciden con las filas de la otra." unless @matrix[1].vector.size == other.matrix.size
+                sumatotal = 0
+                mul = Array.new                
+
+               #for i in @matrix.keys do
+					1.upto(@matrix.keys) do |i|
+                        mul_f = Array.new
+                     #for j in @matrix[i].vector.keys do
+							 1.upto(@matrix[i].vector.keys) do |j|
+                                #for k in @matrix[i].vector.keys do
+											 1.upto(@matrix[i].vector.keys) do |k|
+                                    suma = @matrix[i].vector[k] * other.matrix[k].vector[j]
+                                    sumatotal = sumatotal + suma;
+                                end
+                                mul_f << sumatotal
+                                sumatotal = 0
+                    end
+							mul << mul_f
+                end
+=begin        
+                for r in @matrix.keys do
+                   for j in @matrix[r].vector.keys do
+                      print "  #{mul[r][j]}  "
+                   end
+                   puts
+        			end
+=end
+					return mul
+			  when Matriz_densa
+					raise ArgumentError, "Las columnas de una matriz no coinciden con las filas de la otra." unless @matrix[1].vector.size == other.f
+					sumatotal = 0
+                mul = Array.new                
+
+                #for i in @matrix.keys do
+					  1.upto(@matrix.size) do |i|
+                        mul_f = Array.new
+                     #for j in @matrix[i].vector.keys do
+							 1.upto(@matrix[i].vector.size) do |j|
+                           #for k in @matrix[i].vector.keys do
+									1.upto(@matrix[i].vector.size) do |k|
+                              suma = @matrix[i].vector[k] * other.m[k - 1][j - 1]
+                              sumatotal = sumatotal + suma;
+                           end
+                           mul_f << sumatotal
+                           sumatotal = 0
+                    end
+							mul << mul_f
+                end 
+=begin       
+                for r in @matrix.keys do
+                   for j in @matrix[r].vector.keys do
+                      print "  #{mul[r][j]}  "
+                   end
+                   puts
+        			end
+=end
+					return mul
+			  else
+				  raise TypeError.new("No se puede pasar #{other.inspect} a Matriz")
+			  end
+        end
+
+        def max
+                   
+                maximo = @matrix[1].vector[1]
+           
+                #for i in @matrix.keys do
+						@matrix.size.times do |i|
+								i = i + 1
+                        #for j in @matrix[i].vector.keys do
+								#@matrix[i].vector.keys do |j|
+								1.upto(@matrix[i].vector.size) do |j|
+                           if @matrix[i].vector[j] > maximo
+                              maximo = @matrix[i].vector[j]
+                      end
+                   end
+                end
+					 return maximo
+        end
+
+		  def [](i,j)
+			
+				return @matrix[i].vector[j]
+			
+		  end
+
+        def min
+
+           minimo = @matrix[1].vector[1]
+                
+                #for i in @matrix.keys do
+						1.upto(@matrix.size) do |i|
+                        #for j in @matrix[i].vector.keys do
+								@matrix[i].vector.size.times do |j|
+								j = j + 1
+                           if @matrix[i].vector[j] < minimo
+                              minimo = @matrix[i].vector[j]
+                      end
+                   end
+                end
+					return minimo
+
+        end
+
+        def coerce(other)
+                [other,self]
+        end
+end
+
+class Matriz_Dispersa < SparseMatrix
+
+end

data/lib/t50_matriz_dispersa_densa.rb

@@ -0,0 +1,27 @@
+=begin rdoc
+:main: t50_matriz_dispersa_densa.rb
+
+
+ = T50MatrizDispersaDensa
+
+	Autor:: Javier Clemente Rodriguez Gomez & Juan Lucas Gonzalez Hidalgo
+	Asignatura:: Lenguajes y paradigmas de la programacion.
+	Universidad de la Laguna
+
+ == Diseño
+
+	Se ha creado una clase matriz que solo tendra el inicializador y algunos métodos para operaciones con matrices básticas.
+	Se ha creado una clase Fraccion para poder representar estos en una matriz.
+	Se creo la clase Matriz_Dispersa y Matriz_densa que heredan de matriz y sirven para poder realizar operaciones con ese tipo concreto de matrices. 
+ 
+=end
+
+require "t50_matriz_dispersa_densa/version"
+require "matriz.rb"
+require "matriz_dispersa.rb"
+require "matriz_densa.rb"
+
+
+module T50MatrizDispersaDensa
+
+end

data/lib/t50_matriz_dispersa_densa.rb~

@@ -0,0 +1,7 @@
+require "t50_matriz_dispersa_densa/version"
+require "matriz.rb"
+require "matriz_dispersa.rb"
+require "matriz_densa.rb"
+
+module T50MatrizDispersaDensa
+end

data/lib/t50_matriz_dispersa_densa/version.rb

@@ -0,0 +1,3 @@
+module T50MatrizDispersaDensa
+  VERSION = "0.0.1"
+end

data/t50_matriz_dispersa_densa.gemspec

@@ -0,0 +1,19 @@
+# -*- encoding: utf-8 -*-
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 't50_matriz_dispersa_densa/version'
+
+Gem::Specification.new do |gem|
+  gem.name          = "t50_matriz_dispersa_densa"
+  gem.version       = T50MatrizDispersaDensa::VERSION
+  gem.authors       = ["Javier C"]
+  gem.email         = ["alu0100505023@ull.edu.es"]
+  gem.description   = %q{"Operaciones con matrices"}
+  gem.summary       = %q{"Operaciones con matrices densas y dispersas"}
+  gem.homepage      = ""
+
+  gem.files         = `git ls-files`.split($/)
+  gem.executables   = gem.files.grep(%r{^bin/}).map{ |f| File.basename(f) }
+  gem.test_files    = gem.files.grep(%r{^(test|spec|features)/})
+  gem.require_paths = ["lib"]
+end

data/test/tc_matrix.rb

@@ -0,0 +1,57 @@
+require "Fraccion.rb"
+require 'gcd.rb'
+require 'matriz_dispersa.rb'
+require 'matriz_densa.rb'
+require "test/unit"
+
+class TestMatrix < Test::Unit::TestCase
+  
+	def setup
+		#Se especifican los hash a usar en las pruebas
+		@h = Matriz_Dispersa.new 1 => {1 => 33, 2 => 44}, 2 => {1 => 66, 2 => 77}
+		@h2 = Matriz_Dispersa.new 1 => {1 => 1, 2 => 2}, 2 => {1 => 1, 2 => 2}
+
+		#Se especifican los hash a usar en las pruebas con fracciones
+		@h3 = Matriz_Dispersa.new 1 => {1 => Fraccion.new(33,2), 2 => Fraccion.new(44,3)}, 2 => {1 => Fraccion.new(66,5), 2 => Fraccion.new(77,12)}
+		@h4 = Matriz_Dispersa.new 1 => {1 => 1, 2 => 2}, 2 => {1 => 1, 2 => 2}
+		@h5 = Matriz_Dispersa.new 1 => {1 => Fraccion.new(1,1), 2 => Fraccion.new(2,1)}, 2 => {1 => Fraccion.new(1,1), 2 => Fraccion.new(2,1)}
+		@h6 = Matriz_densa.new(2,2,[[4,3],[5,8]])
+		
+		@h9 = Matriz_densa.new(2,2,[[4,5],[2,3]])
+		@h10 = Matriz_Dispersa.new 1 => {1 => 0, 2 => 0}, 2 => {1 => 0, 2 => Fraccion.new(1,2)}
+		@h11 = Matriz_densa.new(2,2,[[4,5],[2,Fraccion.new(7,2)]])
+		@h12 = Matriz_densa.new(2,2,[[-4,-5],[-2,Fraccion.new(-5,2)]])
+		@h13 = Matriz_densa.new(2,2,[[0,0],[Fraccion.new(1,1),Fraccion.new(3,2)]])
+	end
+
+	def test_suma_densa_dispersa
+		assert_equal(@h11.m, @h9+@h10, "Resultado Incorrecto" )
+	end
+
+	def test_resta_densa_dispersa
+		assert_equal(@h12.m, @h9-@h10, "Resultado Incorrecto" )
+	end
+
+	def test_multi_densa_dispersa
+		assert_equal(@h13.m, @h9*@h10, "Resultado Incorrecto" )
+	end
+
+	def test_max_dispersa
+		assert_equal(Fraccion.new(77,12), @h3.max, "Resultado Incorrecto" )
+	end
+
+	def test_min_dispersa #mirar 
+		assert_equal(Fraccion.new(66,5), @h3.min, "Resultado Incorrecto" )
+	end
+
+	def test_max_densa
+		assert_equal(8, @h6.max, "Resultado Incorrecto" )
+	end
+
+	def test_min_densa
+		assert_equal(3, @h6.min, "Resultado Incorrecto" )
+	end
+
+end
+
+

data/test/tc_matrix.rb~

@@ -0,0 +1,57 @@
+require "../lib/Fraccion.rb"
+require 'lib/gcd.rb'
+require 'lib/matriz_dispersa.rb'
+require 'lib/matriz_densa.rb'
+require "test/unit"
+
+class TestMatrix < Test::Unit::TestCase
+  
+	def setup
+		#Se especifican los hash a usar en las pruebas
+		@h = Matriz_Dispersa.new 1 => {1 => 33, 2 => 44}, 2 => {1 => 66, 2 => 77}
+		@h2 = Matriz_Dispersa.new 1 => {1 => 1, 2 => 2}, 2 => {1 => 1, 2 => 2}
+
+		#Se especifican los hash a usar en las pruebas con fracciones
+		@h3 = Matriz_Dispersa.new 1 => {1 => Fraccion.new(33,2), 2 => Fraccion.new(44,3)}, 2 => {1 => Fraccion.new(66,5), 2 => Fraccion.new(77,12)}
+		@h4 = Matriz_Dispersa.new 1 => {1 => 1, 2 => 2}, 2 => {1 => 1, 2 => 2}
+		@h5 = Matriz_Dispersa.new 1 => {1 => Fraccion.new(1,1), 2 => Fraccion.new(2,1)}, 2 => {1 => Fraccion.new(1,1), 2 => Fraccion.new(2,1)}
+		@h6 = Matriz_densa.new(2,2,[[4,3],[5,8]])
+		
+		@h9 = Matriz_densa.new(2,2,[[4,5],[2,3]])
+		@h10 = Matriz_Dispersa.new 1 => {1 => 0, 2 => 0}, 2 => {1 => 0, 2 => Fraccion.new(1,2)}
+		@h11 = Matriz_densa.new(2,2,[[4,5],[2,Fraccion.new(7,2)]])
+		@h12 = Matriz_densa.new(2,2,[[-4,-5],[-2,Fraccion.new(-5,2)]])
+		@h13 = Matriz_densa.new(2,2,[[0,0],[Fraccion.new(1,1),Fraccion.new(3,2)]])
+	end
+
+	def test_suma_densa_dispersa
+		assert_equal(@h11.m, @h9+@h10, "Resultado Incorrecto" )
+	end
+
+	def test_resta_densa_dispersa
+		assert_equal(@h12.m, @h9-@h10, "Resultado Incorrecto" )
+	end
+
+	def test_multi_densa_dispersa
+		assert_equal(@h13.m, @h9*@h10, "Resultado Incorrecto" )
+	end
+
+	def test_max_dispersa
+		assert_equal(Fraccion.new(77,12), @h3.max, "Resultado Incorrecto" )
+	end
+
+	def test_min_dispersa #mirar 
+		assert_equal(Fraccion.new(66,5), @h3.min, "Resultado Incorrecto" )
+	end
+
+	def test_max_densa
+		assert_equal(8, @h6.max, "Resultado Incorrecto" )
+	end
+
+	def test_min_densa
+		assert_equal(3, @h6.min, "Resultado Incorrecto" )
+	end
+
+end
+
+