etiqueta_nutricional 5.0.0

data/lib/etiqueta_nutricional/etiqueta_nutricional.rb

@@ -0,0 +1,114 @@
+class Etiqueta
+  
+  include Comparable
+  
+  attr_reader :nombre, :grasas, :grasas_saturadas, :hidratos_de_carbono, :azucares, :proteinas, :sal, :porciones
+  
+  def initialize(nombre, grasas, grasas_saturadas, hidratos_de_carbono, azucares, proteinas, sal, porciones)
+    @nombre = nombre
+    @valor_energetico_kj = (grasas * 37) + (grasas_saturadas * 37) + (hidratos_de_carbono * 17) + (azucares * 17) + (proteinas * 17) + (sal * 25)
+    @valor_energetico_kcal = (grasas * 9) + (grasas_saturadas * 9) + (hidratos_de_carbono * 4) + (azucares * 4) + (proteinas * 4) + (sal * 6)
+    @grasas = grasas
+    @grasas_saturadas = grasas_saturadas
+    @hidratos_de_carbono = hidratos_de_carbono
+    @azucares = azucares
+    @proteinas = proteinas
+    @sal = sal
+    @numero_porciones = porciones[0]
+    @gramos_porcion = porciones[1]
+  end
+  
+ 
+  
+  def obtener_nombre
+    @nombre
+  end
+  
+  def obtener_grasas
+    @grasas
+  end
+  
+  def obtener_grasas_saturadas
+    @grasas_saturadas
+  end
+  
+  def obtener_hidratos_carbono
+    @hidratos_de_carbono
+  end
+  
+  def obtener_azucar
+    @azucares
+  end
+  
+  def obtener_proteinas
+    @proteinas
+  end
+  
+  def obtener_sal
+    @sal
+  end
+  
+  def obtener_numero_porciones
+    @numero_porciones
+  end
+  
+  def obtener_valor_energetico_kj
+    @valor_energetico_kj
+  end
+  
+  def obtener_valor_energetico_kcal
+    @valor_energetico_kcal
+  end
+  
+  def ir_valor_energetico_kj
+    (@valor_energetico_kj.round(2) / 8400 * 100).round(2)
+  end
+  
+  def ir_valor_energetico_kcal
+    (@valor_energetico_kcal.round(2) / 2000 * 100).round(2)
+  end
+  
+  def ir_grasa_total
+    ((@grasas.round(2) + @grasas_saturadas.round(2)) / 70 * 100).round(2)
+  end
+  
+  def ir_hidratos_carbono
+    (@hidratos_de_carbono.round(2) /260 * 100).round(2)
+  end
+  
+  def ir_azucares
+    (@azucares.round(2) /90 * 100).round(2)
+  end
+
+  def ir_proteinas
+    (@proteinas.round(2) / 50 * 100).round(2)
+  end
+  
+  def ir_sal
+    (@sal.round(2) / 6 * 100).round(2)
+  end
+  
+  def to_s
+    s1 = "Nombre: #{@nombre}\n"
+    s2 = "Valor energetico kj: #{@valor_energetico_kj}kj\n"
+    s3 = "Valor energetico kcal: #{@valor_energetico_kcal}kcal\n"
+    s4 = "Grasas: #{@grasas}g\n"
+    s5 = "Grasas saturadas: #{@grasas_saturadas}g\n"
+    s6 = "Hidratos de carbono: #{@hidratos_de_carbono}g\n"
+    s7 = "Proteinas: #{@proteinas}g\n"
+    s8 = "Azucares: #{@azucares}g\n"
+    s9 = "Sal: #{@sal}g\n"
+    cadena = s1 + s2 + s3 + s4 + s5 + s6 + s7 + s8 + s9
+    return cadena
+  end
+  
+  def <=>(other)
+    # los comentarios locales a los métodos no generan documentación
+    return nil unless other.instance_of? Etiqueta
+    @valor_energetico_kcal <=> other.obtener_valor_energetico_kcal
+  end
+  
+  def +(other)
+    @valor_energetico_kcal + other.obtener_valor_energetico_kcal
+  end
+end

data/lib/etiqueta_nutricional/individuo.rb

@@ -0,0 +1,39 @@
+class Individuo
+
+    attr_reader :nombre, :edad, :sexo
+
+    include Comparable
+    
+    def initialize(nombre, edad, sexo)
+        @nombre = nombre
+        @edad = edad
+        @sexo = sexo
+    end
+    
+    def obtener_nombre
+        @nombre
+    end
+    
+    def obtener_edad
+        @edad
+    end
+    
+    def to_s
+        cadena = ""
+        sexo = ""
+        cadena = cadena + "Nombre: #{@nombre}\n"
+        cadena = cadena + "Edad: #{@edad}\n"
+        if @sexo == 0
+            sexo = "Hombre"
+        else
+            sexo = "Mujer"
+        end
+        cadena = cadena + "Sexo: #{sexo}\n"
+        return cadena
+    end
+    
+    def <=>(other)
+        return nil unless other.instance_of? Individuo
+        @edad <=> other.edad
+    end
+end

data/lib/etiqueta_nutricional/lista_etiquetas.rb

@@ -0,0 +1,198 @@
+Nodo = Struct.new(:value, :next, :prev)
+
+class ListaEtiquetas
+  
+  include Enumerable
+  include Comparable
+  
+  def initialize()
+    @inicio = Nodo.new(nil)
+    @fin = Nodo.new(nil)
+  end 
+  
+  def each
+    nodo = @inicio
+    while (nodo != nil)
+      yield nodo.value
+      nodo = nodo.next
+    end
+  end
+  
+  def pushI(nodo1)
+    nodo = Nodo.new(nodo1, nil, nil)
+    if @inicio.value == nil then
+      @inicio = nodo
+      @fin = nodo
+    else
+      nodo.next = @inicio
+      @inicio.prev = nodo
+      @inicio = nodo 
+    end
+  end
+  
+  def pushF(nodo1)
+    nodo = Nodo.new(nodo1, nil, nil)
+    if @inicio.value == nil then
+      @inicio = nodo
+      @fin = nodo
+    else
+      nodo.prev = @fin
+      @fin.next = nodo
+      @fin = nodo
+    end
+  end
+  
+  def popI
+    @inicio = @inicio.next
+    @inicio.prev = nil
+  end
+  
+  def popF
+    @fin = @fin.prev
+    @fin.prev = nil
+  end
+  
+  def pop(nodo_borrar)
+    
+    if (@inicio.next == nil)
+      @inicio = nil
+    else
+      if (nodo_borrar == @inicio)
+        @inicio = @inicio.next
+        @inicio.prev = nil
+      else
+        nodo = @inicio
+        while (nodo != nodo_borrar)
+          nodo = nodo.next
+        end
+        nodo.prev.next = nodo.next
+        if (nodo.next != nil)
+          nodo.next.prev = nodo.prev
+        end
+      end
+    end
+  end
+  
+  def inicio
+    @inicio.value
+  end
+  
+  def fin
+    @fin.value
+  end
+
+  def sal
+    nodo = @inicio
+    suma = 0
+    while (nodo != nil)
+      suma = suma + nodo.value.obtener_sal
+      nodo = nodo.next
+    end
+    return suma
+  end
+  
+  def clasificacion_sal
+    if sal <= 0
+      return "Sin sal"
+    elsif sal < 10
+      return "Baja cantidad de sal"
+    elsif sal < 20 
+      return "Cantidad moderada de sal"
+    else 
+      return "Alta cantidad de sal"
+    end
+  end
+
+  def to_s
+    nodo = @inicio
+    cadena = ""
+    while (nodo != nil)
+      cadena = cadena + nodo.value.obtener_nombre + "\n"
+      nodo = nodo.next
+    end
+    return cadena
+  end
+  
+  def posicion(pos)
+    nodo = @inicio
+    pos.times do
+      nodo = nodo.next
+    end
+    return nodo.value
+  end
+  
+  def pos(po)
+    nodo = @inicio
+    po.times do
+      nodo = nodo.next
+    end
+    return nodo
+  end
+  
+  def valor_energetico
+    calorias_menu = self.reduce(0) { |sum, value| sum + value.obtener_valor_energetico_kcal }
+    return calorias_menu
+  end
+  
+  def numero_elementos
+    if @inicio == nil
+      return 0
+    else
+      nodo = @inicio
+      numero = 0
+      while (nodo != nil)
+        numero = numero + 1
+        nodo = nodo.next
+      end
+      return numero
+    end
+  end
+  
+  def ordenar_for
+    @ordenado = self
+    @menor
+    @revisado = [];
+    for i in (0..self.numero_elementos - 1)
+      
+      @menor = @ordenado.pos(0)
+      for j in (0..@ordenado.numero_elementos - 1)
+        if (@menor.value.valoracion_nutricional > @ordenado.posicion(j).valoracion_nutricional)
+          @menor = @ordenado.pos(j)
+        end
+      end
+      @ordenado.pop(@menor)
+      @revisado.push(@menor.value)
+    end
+    return @revisado
+  end
+  
+  def ordenar_each
+    @revisado = [];
+    self.each do |item|
+      posic = 0
+      if (@revisado.length == 0)
+        @revisado.push(item)
+      elsif (@revisado[@revisado.length - 1] < item)
+        @revisado.push(item)
+      else
+        
+        while ((item > @revisado[posic]) && (posic < @revisado.length))
+          posic = posic + 1
+        end
+        @revisado.push(item)
+        tamano = @revisado.length - 1
+        while (tamano >= posic)
+          @revisado[tamano] = @revisado[tamano - 1]
+          tamano = tamano - 1
+        end
+        @revisado[posic] = item
+        
+      end
+    end
+    return @revisado
+  end
+  
+  def <=>(other)
+    valor_energetico <=> other.valor_energetico
+  end
+end

data/lib/etiqueta_nutricional/menu.rb

@@ -0,0 +1,66 @@
+class Menu
+  
+  include Comparable
+  
+  attr_accessor :nombre, :ingesta, :platos
+  
+  def initialize(nombre, &block)
+    @nombre = nombre
+    @desayuno = []
+    @almuerzo = []
+    @cena = []
+    
+    if block_given?  
+      instance_eval(&block) 
+    end
+  end
+  
+  def titulo(str)
+    @title = str
+  end
+  
+  def desayuno(des = {})
+    @desayuno << Etiqueta.new(des[:descripcion], des[:grasas], des[:fibra], des[:carbohidratos], 0, des[:proteinas], des[:sal], [des[:porcion], des[:gramos]])
+  end
+  
+  def almuerzo(alm = {})
+    @almuerzo << Etiqueta.new(alm[:descripcion], alm[:grasas], alm[:fibra], alm[:carbohidratos], 0, alm[:proteinas], alm[:sal], [alm[:porcion], alm[:gramos]])
+  end
+  
+  def cena(cen = {})
+    @cena << Etiqueta.new(cen[:descripcion], cen[:grasas], cen[:fibra], cen[:carbohidratos], 0, cen[:proteinas], cen[:sal], [cen[:porcion], cen[:gramos]])
+  end
+  
+  def ingesta(ing = {})
+    @min = ing[:min] if ing[:min]
+    @max = ing[:max] if ing[:max]
+  end
+  
+  def kcal
+    300#(@desayuno.reduce(:+) + @almuerzo.reduce(:+) + @cena.reduce(:+)).round(2)
+  end
+  
+  def to_s
+    output = Tabla.new
+    output << @nombre 
+    output << '' << 'Grasas' << 'Carbohidratos' << 'Proteinas' << 'Fibra' << 'Sal' << 'Valor energético'
+    output << 'Desayuno'
+    @desayuno.each do |des|
+      output << des.obtener_nombre << des.obtener_grasas.to_s << des.obtener_hidratos_carbono.to_s << des.obtener_proteinas.to_s << des.obtener_grasas_saturadas << des.obtener_sal.to_s << des.obtener_valor_energetico_kcal.round(2).to_s
+    end
+    output << ''
+    output << 'Almuerzo'
+    @almuerzo.each do |alm|
+      output << alm.obtener_nombre << alm.obtener_grasas.to_s << alm.obtener_hidratos_carbono.to_s << alm.obtener_proteinas.to_s << alm.obtener_grasas_saturadas << alm.obtener_sal.to_s << alm.obtener_valor_energetico_kcal.round(2).to_s
+    end
+    output << ''
+    output << 'Cena'
+    @cena.each do |cen|
+      output << cen.obtener_nombre << cen.obtener_grasas.to_s << cen.obtener_hidratos_carbono.to_s << cen.obtener_proteinas.to_s << cen.obtener_grasas_saturadas << cen.obtener_sal.to_s << cen.obtener_valor_energetico_kcal.round(2).to_s
+    end
+    output << ''
+    output << 'Valor energético total' << self.kcal
+    return output.to_s
+  end
+
+end

data/lib/etiqueta_nutricional/paciente.rb

@@ -0,0 +1,148 @@
+class Paciente < Individuo
+  
+    attr_reader :nombre, :edad, :sexo, :peso, :altura, :circunferencia_cintura, :circunferencia_cadera, :actividad_fisica
+    
+    include Comparable
+  
+
+    def initialize(nombre, edad, sexo, peso, altura, circunferencia_cintura, circunferencia_cadera, actividad_fisica)
+        super(nombre, edad, sexo)
+        @peso = peso
+        @altura = altura
+        @circunferencia_cintura = circunferencia_cintura
+        @circunferencia_cadera = circunferencia_cadera
+        @imc = imc
+        @grasa = p_grasa
+        @rcc = rcc
+        @actividad_fisica = actividad_fisica
+        
+    end
+    
+    def imc
+        @peso / (@altura * @altura)
+    end
+    
+    def p_grasa
+        1.2 * @imc + 0.23 * @edad - 10.8 * @sexo - 5.4
+    end
+    
+    def rcc
+        (((@circunferencia_cintura[0].round(2) + @circunferencia_cintura[1].round(2)) / 2) / ((@circunferencia_cadera[0].round(2) + @circunferencia_cadera[1].round(2)) / 2).round(2))
+    end
+    
+    def clasificacion_oms
+        if (@imc < 18.5)
+            "Bajo peso"
+        elsif (@imc < 24.9)
+            "Adecuado"
+        elsif (@imc < 29.9)
+            "Sobrepeso"
+        elsif (@imc < 34.9)
+            "Obesidad grado 1"
+        elsif (@imc < 39.9)
+            "Obesidad grado 2"
+        else
+            "Obesidad grado 3"
+        end
+    end
+    
+    def riesgo
+        if (@sexo == 0) #mujer
+            if (@rcc < 0.75)
+                "Riesgo bajo"
+            elsif (@rcc < 0.82)
+                "Riesgo moderado"
+            else
+                "Riesgo alto"
+            end
+        else            #hombre
+            if (@rcc < 0.88)
+                "Riesgo bajo"
+            elsif (@rcc < 0.95)
+                "Riesgo moderado"
+            elsif (@rcc < 1.01)
+                "Riesgo alto"
+            else
+                "Riesgo muy alto"
+            end
+        end
+    end
+    
+    def obtener_nombre
+        @nombre
+    end
+    
+    def to_s
+        cadena = ""
+        cadena = cadena + super.to_s
+        cadena = cadena + "Peso: #{@peso}kg\n"
+        cadena = cadena + "Altura: #{@altura}m\n"
+        cadena = cadena + "Circunferencia cintura: #{@circunferencia_cintura}cm\n"
+        cadena = cadena + "Circunferencia cadera: #{@circunferencia_cadera}cm\n"
+    end
+
+    def <=>(other)
+        return nil unless other.instance_of? Paciente
+        valoracion_nutricional <=> other.valoracion_nutricional 
+    end
+    
+    def valoracion(menu)
+        
+        gasto_energetico_basal = 0
+        if (@sexo == 1) # mujer
+            gasto_energetico_basal = (10 * @peso) + (6.25 * @altura) - (5 * @edad) - 161
+        else # Hombre
+            gasto_energetico_basal = (10 * @peso) + (6.25 * @altura) - (5 * @edad) + 5
+        end
+        
+        efecto_termogeno = gasto_energetico_basal * 0.1
+        gasto_actividad_fisica = 0
+        
+        if (@actividad_fisica == "reposo")
+            gasto_actividad_fisica = gasto_energetico_basal * 0
+        elsif (@actividad_fisica == "Actividad ligera")
+            gasto_actividad_fisica = gasto_energetico_basal * 0.12
+        elsif (@actividad_fisica == "Actividad moderada")
+            gasto_actividad_fisica = gasto_energetico_basal * 0.27
+        else
+            gasto_actividad_fisica = gasto_energetico_basal * 0.54
+        end
+        
+        gasto_energetico_total = gasto_energetico_basal + efecto_termogeno + gasto_actividad_fisica
+        calorias_menu = menu.reduce(0) { |sum, value| sum + value.obtener_valor_energetico_kcal }
+        
+        if (gasto_energetico_total < (calorias_menu * 0.9))
+            return true;
+        else
+            return false;
+        end
+    end
+    
+    def valoracion_nutricional
+        
+        gasto_energetico_basal = 0
+        if (@sexo == 1) # mujer
+            gasto_energetico_basal = (10 * @peso) + (6.25 * @altura) - (5 * @edad) - 161
+        else # Hombre
+            gasto_energetico_basal = (10 * @peso) + (6.25 * @altura) - (5 * @edad) + 5
+        end
+        
+        efecto_termogeno = gasto_energetico_basal * 0.1
+        gasto_actividad_fisica = 0
+        
+        if (@actividad_fisica == "reposo")
+            gasto_actividad_fisica = gasto_energetico_basal * 0
+        elsif (@actividad_fisica == "Actividad ligera")
+            gasto_actividad_fisica = gasto_energetico_basal * 0.12
+        elsif (@actividad_fisica == "Actividad moderada")
+            gasto_actividad_fisica = gasto_energetico_basal * 0.27
+        else
+            gasto_actividad_fisica = gasto_energetico_basal * 0.54
+        end
+        
+        gasto_energetico_total = gasto_energetico_basal + efecto_termogeno + gasto_actividad_fisica
+        
+        return gasto_energetico_total
+    end
+end
+