{ "cells": [ { "cell_type": "code", "execution_count": 63, "metadata": { "scrolled": false }, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}{===================================}$$" ], "text/plain": [ "ry" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}{===================================}$$" ], "text/plain": [ "ry" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\begin{array}{l}\n", "\\begin{array}{lcrcrcrcrcl}\n", " \\max \\mspace{-6mu}&\\mspace{-6mu} \\mspace{-6mu}&\\mspace{-6mu} 17 x_{1} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 12 x_{2} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 7 x_{3} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 20 x_{4} \\mspace{-6mu}&\\mspace{-6mu} \\mspace{-6mu}&\\mspace{-6mu} \\\\\n", " \\mspace{-6mu}&\\mspace{-6mu} \\mspace{-6mu}&\\mspace{-6mu} x_{1} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 6 x_{2} \\mspace{-6mu}&\\mspace{-6mu} - \\mspace{-6mu}&\\mspace{-6mu} 7 x_{3} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 7 x_{4} \\mspace{-6mu}&\\mspace{-6mu} \\leq \\mspace{-6mu}&\\mspace{-6mu} 20 \\\\\n", " \\mspace{-6mu}&\\mspace{-6mu} \\mspace{-6mu}&\\mspace{-6mu} 6 x_{1} \\mspace{-6mu}&\\mspace{-6mu} - \\mspace{-6mu}&\\mspace{-6mu} 7 x_{2} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 5 x_{3} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} x_{4} \\mspace{-6mu}&\\mspace{-6mu} \\leq \\mspace{-6mu}&\\mspace{-6mu} 16 \\\\\n", " \\mspace{-6mu}&\\mspace{-6mu} \\mspace{-6mu}&\\mspace{-6mu} 4 x_{1} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 4 x_{2} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 2 x_{3} \\mspace{-6mu}&\\mspace{-6mu} - \\mspace{-6mu}&\\mspace{-6mu} 2 x_{4} \\mspace{-6mu}&\\mspace{-6mu} \\leq \\mspace{-6mu}&\\mspace{-6mu} 14 \\\\\n", "\\end{array} \\\\\n", "x_{1}, x_{2}, x_{3}, x_{4} \\geq 0\n", "\\end{array}$$" ], "text/plain": [ "LP problem (use 'view(...)' or '%display typeset' for details)" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\frac{8821}{40}$$" ], "text/plain": [ "8821/40" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(0,\\,\\frac{69}{20},\\,\\frac{161}{24},\\,\\frac{793}{120}\\right)$$" ], "text/plain": [ "(0, 69/20, 161/24, 793/120)" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}{===================================}$$" ], "text/plain": [ "ry" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}{===================================}$$" ], "text/plain": [ "ry" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}{}$$" ], "text/plain": [ "salto" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}{\\texttt{El dual es:}}$$" ], "text/plain": [ "dual" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}{===================================}$$" ], "text/plain": [ "ry" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\begin{array}{l}\n", "\\begin{array}{lcrcrcrcl}\n", " \\min \\mspace{-6mu}&\\mspace{-6mu} \\mspace{-6mu}&\\mspace{-6mu} 20 y_{1} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 16 y_{2} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 14 y_{3} \\mspace{-6mu}&\\mspace{-6mu} \\mspace{-6mu}&\\mspace{-6mu} \\\\\n", " \\mspace{-6mu}&\\mspace{-6mu} \\mspace{-6mu}&\\mspace{-6mu} y_{1} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 6 y_{2} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 4 y_{3} \\mspace{-6mu}&\\mspace{-6mu} \\geq \\mspace{-6mu}&\\mspace{-6mu} 17 \\\\\n", " \\mspace{-6mu}&\\mspace{-6mu} \\mspace{-6mu}&\\mspace{-6mu} 6 y_{1} \\mspace{-6mu}&\\mspace{-6mu} - \\mspace{-6mu}&\\mspace{-6mu} 7 y_{2} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 4 y_{3} \\mspace{-6mu}&\\mspace{-6mu} \\geq \\mspace{-6mu}&\\mspace{-6mu} 12 \\\\\n", " \\mspace{-6mu}&\\mspace{-6mu} - \\mspace{-6mu}&\\mspace{-6mu} 7 y_{1} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 5 y_{2} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} 2 y_{3} \\mspace{-6mu}&\\mspace{-6mu} \\geq \\mspace{-6mu}&\\mspace{-6mu} 7 \\\\\n", " \\mspace{-6mu}&\\mspace{-6mu} \\mspace{-6mu}&\\mspace{-6mu} 7 y_{1} \\mspace{-6mu}&\\mspace{-6mu} + \\mspace{-6mu}&\\mspace{-6mu} y_{2} \\mspace{-6mu}&\\mspace{-6mu} - \\mspace{-6mu}&\\mspace{-6mu} 2 y_{3} \\mspace{-6mu}&\\mspace{-6mu} \\geq \\mspace{-6mu}&\\mspace{-6mu} 20 \\\\\n", "\\end{array} \\\\\n", "y_{1}, y_{2}, y_{3} \\geq 0\n", "\\end{array}$$" ], "text/plain": [ "LP problem (use 'view(...)' or '%display typeset' for details)" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}{===================================}$$" ], "text/plain": [ "ry" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\frac{8821}{40}$$" ], "text/plain": [ "8821/40" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\frac{149}{40},\\,\\frac{9}{2},\\,\\frac{423}{80}\\right)$$" ], "text/plain": [ "(149/40, 9/2, 423/80)" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}{}$$" ], "text/plain": [ "salto" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}{===================================}$$" ], "text/plain": [ "ry" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {b} \\\\\n", "\\hline\n", " {\\color{green}{s}}_{1} & 1 & 6 & -7 & 7 & 1 & 0 & 0 & 20 \\\\\n", "{\\color{green}{s}}_{2} & 6 & -7 & 5 & 1 & 0 & 1 & 0 & 16 \\\\\n", "{\\color{green}{s}}_{3} & 4 & 4 & 2 & -2 & 0 & 0 & 1 & 14 \\\\\n", "\\hline\n", " {Z_{ind}} & 17 & 12 & 7 & 20 & 0 & 0 & 0 & 0\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3|rhs]\n", "[---+---------------------------+---]\n", "[ s1| 1 6 -7 7 1 0 0| 20]\n", "[ s2| 6 -7 5 1 0 1 0| 16]\n", "[ s3| 4 4 2 -2 0 0 1| 14]\n", "[---+---------------------------+---]\n", "[ Z| 17 12 7 20 0 0 0| 0]" ] }, "metadata": {}, "output_type": "display_data" }, { "name": "stdout", "output_type": "stream", "text": [ " \n", " \n", "cambio( 1 , 4 )\n", "cambio( 2 , 3 )\n", "cambio( 3 , 2 )\n" ] }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {b} \\\\\n", "\\hline\n", " {x}_{4} & \\frac{35}{24} & 0 & 0 & 1 & \\frac{17}{120} & \\frac{1}{6} & \\frac{19}{240} & \\frac{793}{120} \\\\\n", "{x}_{3} & \\frac{47}{24} & 0 & 1 & 0 & \\frac{1}{24} & \\frac{1}{6} & \\frac{11}{48} & \\frac{161}{24} \\\\\n", "{x}_{2} & \\frac{3}{4} & 1 & 0 & 0 & \\frac{1}{20} & 0 & \\frac{7}{40} & \\frac{69}{20} \\\\\n", "\\hline\n", " {Z_{ind}} & -\\frac{279}{8} & 0 & 0 & 0 & -\\frac{149}{40} & -\\frac{9}{2} & -\\frac{423}{80} & \\frac{8821}{40}\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3| rhs]\n", "[-------+-------------------------------------------------------+-------]\n", "[ x4| 35/24 0 0 1 17/120 1/6 19/240|793/120]\n", "[ x3| 47/24 0 1 0 1/24 1/6 11/48| 161/24]\n", "[ x2| 3/4 1 0 0 1/20 0 7/40| 69/20]\n", "[-------+-------------------------------------------------------+-------]\n", "[ Z| -279/8 0 0 0 -149/40 -9/2 -423/80|8821/40]" ] }, "metadata": {}, "output_type": "display_data" }, { "name": "stdout", "output_type": "stream", "text": [ "El problema es óptimo\n" ] } ], "source": [ "tipo='max' #max o min\n", "n=4 # número de variables x's\n", "m=3 # número de restricciones (distintas de las de signo)\n", "\n", "\n", "c=matrix(QQ,1,n,[17,12,7,20] ) # vector de costos\n", "\n", "A=matrix(QQ,m,n,[ # coeficientes de las variables x's\n", "[1,6,-7,7],\n", "[6,-7,5,1],\n", "[4,4,2,-2]\n", "])\n", "\n", "b=matrix(QQ,m,1,[20,16,14]) # vector de la derecha\n", "\n", "\n", "\n", "######################################################\n", "############### VARIABLES DE HOLGURA ################\n", "\n", "\n", "h=matrix(ZZ,1,m,[1,1,1]) # variables de holgura: \n", " # Pon 1 si va sumando, \n", " # -1 si va restando y \n", " # 0 si no hay variable de holgura.\n", "\n", "#######################################################\n", "\n", "####################################################################\n", "############ HASTA AQUÍ LOS DATOS ################################\n", "####################################################################\n", "\n", "\n", "#load('https://sage.unex.es/501708/simplex2023Auto.sage')\n", "load('https://sage.unex.es/501708/simplex2023Auto_MC.sage')\n" ] }, { "cell_type": "code", "execution_count": 64, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left[1, 2, 3, 4, 5, 6, 7\\right]$$" ], "text/plain": [ "[1, 2, 3, 4, 5, 6, 7]" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/plain": [ "[73/120, 17/24, 9/20]" ] }, "execution_count": 64, "metadata": {}, "output_type": "execute_result" } ], "source": [ "pardec()" ] }, { "cell_type": "code", "execution_count": 65, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left[1, 2, 3, 4, 5, 6, 7\\right]$$" ], "text/plain": [ "[1, 2, 3, 4, 5, 6, 7]" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {\\color{green}{s}}_{4} & {b} \\\\\n", "\\hline\n", " {x}_{4} & \\frac{35}{24} & 0 & 0 & 1 & \\frac{17}{120} & \\frac{1}{6} & \\frac{19}{240} & 0 & \\frac{793}{120} \\\\\n", "{x}_{3} & \\frac{47}{24} & 0 & 1 & 0 & \\frac{1}{24} & \\frac{1}{6} & \\frac{11}{48} & 0 & \\frac{161}{24} \\\\\n", "{x}_{2} & \\frac{3}{4} & 1 & 0 & 0 & \\frac{1}{20} & 0 & \\frac{7}{40} & 0 & \\frac{69}{20} \\\\\n", "{\\color{green}{s}}_{4} & -\\frac{17}{168} & 0 & 0 & 0 & -\\frac{1}{24} & -\\frac{1}{6} & -\\frac{11}{48} & 1 & -\\frac{17}{24} \\\\\n", "\\hline\n", " {Z_{ind}} & -\\frac{279}{8} & 0 & 0 & 0 & -\\frac{149}{40} & -\\frac{9}{2} & -\\frac{423}{80} & 0 & \\frac{8821}{40}\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3 s4| rhs]\n", "[-------+---------------------------------------------------------------+-------]\n", "[ x4| 35/24 0 0 1 17/120 1/6 19/240 0|793/120]\n", "[ x3| 47/24 0 1 0 1/24 1/6 11/48 0| 161/24]\n", "[ x2| 3/4 1 0 0 1/20 0 7/40 0| 69/20]\n", "[ s4|-17/168 0 0 0 -1/24 -1/6 -11/48 1| -17/24]\n", "[-------+---------------------------------------------------------------+-------]\n", "[ Z| -279/8 0 0 0 -149/40 -9/2 -423/80 0|8821/40]" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "corte(2)" ] }, { "cell_type": "code", "execution_count": 46, "metadata": {}, "outputs": [], "source": [ "#v=matrix(QQ,1,nv,[-9/44,0,0,0,-1/20,0,-7/40] ); R=-9/20;añadeRes(v,R) #cogemos la ecuacion de x2" ] }, { "cell_type": "code", "execution_count": 66, "metadata": {}, "outputs": [ { "data": { "text/plain": [ "[344.65 NO NO NO 89.400 27.000 23.073 NO]" ] }, "execution_count": 66, "metadata": {}, "output_type": "execute_result" } ], "source": [ "cocientesD(4)" ] }, { "cell_type": "code", "execution_count": 67, "metadata": { "scrolled": true }, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {\\color{green}{s}}_{4} & {b} \\\\\n", "\\hline\n", " {x}_{4} & \\frac{548}{385} & 0 & 0 & 1 & \\frac{7}{55} & \\frac{6}{55} & 0 & \\frac{19}{55} & \\frac{70}{11} \\\\\n", "{x}_{3} & \\frac{13}{7} & 0 & 1 & 0 & 0 & 0 & 0 & 1 & 6 \\\\\n", "{x}_{2} & \\frac{37}{55} & 1 & 0 & 0 & \\frac{1}{55} & -\\frac{7}{55} & 0 & \\frac{42}{55} & \\frac{32}{11} \\\\\n", "{\\color{green}{s}}_{3} & \\frac{34}{77} & 0 & 0 & 0 & \\frac{2}{11} & \\frac{8}{11} & 1 & -\\frac{48}{11} & \\frac{34}{11} \\\\\n", "\\hline\n", " {Z_{ind}} & -\\frac{12528}{385} & 0 & 0 & 0 & -\\frac{152}{55} & -\\frac{36}{55} & 0 & -\\frac{1269}{55} & \\frac{2246}{11}\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3 s4| rhs]\n", "[----------+---------------------------------------------------------------------------------------+----------]\n", "[ x4| 548/385 0 0 1 7/55 6/55 0 19/55| 70/11]\n", "[ x3| 13/7 0 1 0 0 0 0 1| 6]\n", "[ x2| 37/55 1 0 0 1/55 -7/55 0 42/55| 32/11]\n", "[ s3| 34/77 0 0 0 2/11 8/11 1 -48/11| 34/11]\n", "[----------+---------------------------------------------------------------------------------------+----------]\n", "[ Z|-12528/385 0 0 0 -152/55 -36/55 0 -1269/55| 2246/11]" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "cambio(4,7)" ] }, { "cell_type": "code", "execution_count": 68, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left[1, 2, 3, 4, 5, 6, 7\\right]$$" ], "text/plain": [ "[1, 2, 3, 4, 5, 6, 7]" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/plain": [ "[4/11, 0, 10/11, 1/11]" ] }, "execution_count": 68, "metadata": {}, "output_type": "execute_result" } ], "source": [ "pardec()" ] }, { "cell_type": "code", "execution_count": 69, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left[1, 2, 3, 4, 5, 6, 7\\right]$$" ], "text/plain": [ "[1, 2, 3, 4, 5, 6, 7]" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {\\color{green}{s}}_{4} & {\\color{green}{s}}_{5} & {b} \\\\\n", "\\hline\n", " {x}_{4} & \\frac{548}{385} & 0 & 0 & 1 & \\frac{7}{55} & \\frac{6}{55} & 0 & \\frac{19}{55} & 0 & \\frac{70}{11} \\\\\n", "{x}_{3} & \\frac{13}{7} & 0 & 1 & 0 & 0 & 0 & 0 & 1 & 0 & 6 \\\\\n", "{x}_{2} & \\frac{37}{55} & 1 & 0 & 0 & \\frac{1}{55} & -\\frac{7}{55} & 0 & \\frac{42}{55} & 0 & \\frac{32}{11} \\\\\n", "{\\color{green}{s}}_{3} & \\frac{34}{77} & 0 & 0 & 0 & \\frac{2}{11} & \\frac{8}{11} & 1 & -\\frac{48}{11} & 0 & \\frac{34}{11} \\\\\n", "{\\color{green}{s}}_{5} & -\\frac{37}{55} & 0 & 0 & 0 & -\\frac{1}{55} & -\\frac{48}{55} & 0 & -\\frac{42}{55} & 1 & -\\frac{10}{11} \\\\\n", "\\hline\n", " {Z_{ind}} & -\\frac{12528}{385} & 0 & 0 & 0 & -\\frac{152}{55} & -\\frac{36}{55} & 0 & -\\frac{1269}{55} & 0 & \\frac{2246}{11}\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3 s4 s5| rhs]\n", "[----------+--------------------------------------------------------------------------------------------------+----------]\n", "[ x4| 548/385 0 0 1 7/55 6/55 0 19/55 0| 70/11]\n", "[ x3| 13/7 0 1 0 0 0 0 1 0| 6]\n", "[ x2| 37/55 1 0 0 1/55 -7/55 0 42/55 0| 32/11]\n", "[ s3| 34/77 0 0 0 2/11 8/11 1 -48/11 0| 34/11]\n", "[ s5| -37/55 0 0 0 -1/55 -48/55 0 -42/55 1| -10/11]\n", "[----------+--------------------------------------------------------------------------------------------------+----------]\n", "[ Z|-12528/385 0 0 0 -152/55 -36/55 0 -1269/55 0| 2246/11]" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "corte(3)" ] }, { "cell_type": "code", "execution_count": 70, "metadata": {}, "outputs": [ { "data": { "text/plain": [ "[ 48.371 NO NO NO 152.00 0.75000 NO 30.214 NO]" ] }, "execution_count": 70, "metadata": {}, "output_type": "execute_result" } ], "source": [ "cocientesD(5)" ] }, { "cell_type": "code", "execution_count": 71, "metadata": { "scrolled": false }, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {\\color{green}{s}}_{4} & {\\color{green}{s}}_{5} & {b} \\\\\n", "\\hline\n", " {x}_{4} & \\frac{75}{56} & 0 & 0 & 1 & \\frac{1}{8} & 0 & 0 & \\frac{1}{4} & \\frac{1}{8} & \\frac{25}{4} \\\\\n", "{x}_{3} & \\frac{13}{7} & 0 & 1 & 0 & 0 & 0 & 0 & 1 & 0 & 6 \\\\\n", "{x}_{2} & \\frac{37}{48} & 1 & 0 & 0 & \\frac{1}{48} & 0 & 0 & \\frac{7}{8} & -\\frac{7}{48} & \\frac{73}{24} \\\\\n", "{\\color{green}{s}}_{3} & -\\frac{5}{42} & 0 & 0 & 0 & \\frac{1}{6} & 0 & 1 & -5 & \\frac{5}{6} & \\frac{7}{3} \\\\\n", "{\\color{green}{s}}_{2} & \\frac{37}{48} & 0 & 0 & 0 & \\frac{1}{48} & 1 & 0 & \\frac{7}{8} & -\\frac{55}{48} & \\frac{25}{24} \\\\\n", "\\hline\n", " {Z_{ind}} & -\\frac{897}{28} & 0 & 0 & 0 & -\\frac{11}{4} & 0 & 0 & -\\frac{45}{2} & -\\frac{3}{4} & \\frac{407}{2}\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3 s4 s5| rhs]\n", "[-------+-----------------------------------------------------------------------+-------]\n", "[ x4| 75/56 0 0 1 1/8 0 0 1/4 1/8| 25/4]\n", "[ x3| 13/7 0 1 0 0 0 0 1 0| 6]\n", "[ x2| 37/48 1 0 0 1/48 0 0 7/8 -7/48| 73/24]\n", "[ s3| -5/42 0 0 0 1/6 0 1 -5 5/6| 7/3]\n", "[ s2| 37/48 0 0 0 1/48 1 0 7/8 -55/48| 25/24]\n", "[-------+-----------------------------------------------------------------------+-------]\n", "[ Z|-897/28 0 0 0 -11/4 0 0 -45/2 -3/4| 407/2]" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "cambio(5,6)" ] }, { "cell_type": "code", "execution_count": 72, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left[1, 2, 3, 4, 5, 6, 7\\right]$$" ], "text/plain": [ "[1, 2, 3, 4, 5, 6, 7]" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/plain": [ "[1/4, 0, 1/24, 1/3, 1/24]" ] }, "execution_count": 72, "metadata": {}, "output_type": "execute_result" } ], "source": [ "pardec()" ] }, { "cell_type": "code", "execution_count": 73, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left[1, 2, 3, 4, 5, 6, 7\\right]$$" ], "text/plain": [ "[1, 2, 3, 4, 5, 6, 7]" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {\\color{green}{s}}_{4} & {\\color{green}{s}}_{5} & {\\color{green}{s}}_{6} & {b} \\\\\n", "\\hline\n", " {x}_{4} & \\frac{75}{56} & 0 & 0 & 1 & \\frac{1}{8} & 0 & 0 & \\frac{1}{4} & \\frac{1}{8} & 0 & \\frac{25}{4} \\\\\n", "{x}_{3} & \\frac{13}{7} & 0 & 1 & 0 & 0 & 0 & 0 & 1 & 0 & 0 & 6 \\\\\n", "{x}_{2} & \\frac{37}{48} & 1 & 0 & 0 & \\frac{1}{48} & 0 & 0 & \\frac{7}{8} & -\\frac{7}{48} & 0 & \\frac{73}{24} \\\\\n", "{\\color{green}{s}}_{3} & -\\frac{5}{42} & 0 & 0 & 0 & \\frac{1}{6} & 0 & 1 & -5 & \\frac{5}{6} & 0 & \\frac{7}{3} \\\\\n", "{\\color{green}{s}}_{2} & \\frac{37}{48} & 0 & 0 & 0 & \\frac{1}{48} & 1 & 0 & \\frac{7}{8} & -\\frac{55}{48} & 0 & \\frac{25}{24} \\\\\n", "{\\color{green}{s}}_{6} & -\\frac{5}{84} & 0 & 0 & 0 & -\\frac{1}{6} & 0 & 0 & -\\frac{5}{2} & -\\frac{5}{6} & 1 & -\\frac{1}{3} \\\\\n", "\\hline\n", " {Z_{ind}} & -\\frac{897}{28} & 0 & 0 & 0 & -\\frac{11}{4} & 0 & 0 & -\\frac{45}{2} & -\\frac{3}{4} & 0 & \\frac{407}{2}\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3 s4 s5 s6| rhs]\n", "[-------+-------------------------------------------------------------------------------+-------]\n", "[ x4| 75/56 0 0 1 1/8 0 0 1/4 1/8 0| 25/4]\n", "[ x3| 13/7 0 1 0 0 0 0 1 0 0| 6]\n", "[ x2| 37/48 1 0 0 1/48 0 0 7/8 -7/48 0| 73/24]\n", "[ s3| -5/42 0 0 0 1/6 0 1 -5 5/6 0| 7/3]\n", "[ s2| 37/48 0 0 0 1/48 1 0 7/8 -55/48 0| 25/24]\n", "[ s6| -5/84 0 0 0 -1/6 0 0 -5/2 -5/6 1| -1/3]\n", "[-------+-------------------------------------------------------------------------------+-------]\n", "[ Z|-897/28 0 0 0 -11/4 0 0 -45/2 -3/4 0| 407/2]" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "corte(4)" ] }, { "cell_type": "code", "execution_count": 74, "metadata": {}, "outputs": [ { "data": { "text/plain": [ "[ 538.20 NO NO NO 16.500 NO NO 9.0000 0.90000 NO]" ] }, "execution_count": 74, "metadata": {}, "output_type": "execute_result" } ], "source": [ "cocientesD(6)" ] }, { "cell_type": "code", "execution_count": 75, "metadata": { "scrolled": false }, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {\\color{green}{s}}_{4} & {\\color{green}{s}}_{5} & {\\color{green}{s}}_{6} & {b} \\\\\n", "\\hline\n", " {x}_{4} & \\frac{149}{112} & 0 & 0 & 1 & \\frac{1}{10} & 0 & 0 & -\\frac{1}{8} & 0 & \\frac{3}{20} & \\frac{31}{5} \\\\\n", "{x}_{3} & \\frac{13}{7} & 0 & 1 & 0 & 0 & 0 & 0 & 1 & 0 & 0 & 6 \\\\\n", "{x}_{2} & \\frac{25}{32} & 1 & 0 & 0 & \\frac{1}{20} & 0 & 0 & \\frac{21}{16} & 0 & -\\frac{7}{40} & \\frac{31}{10} \\\\\n", "{\\color{green}{s}}_{3} & -\\frac{5}{28} & 0 & 0 & 0 & 0 & 0 & 1 & -\\frac{15}{2} & 0 & 1 & 2 \\\\\n", "{\\color{green}{s}}_{2} & \\frac{191}{224} & 0 & 0 & 0 & \\frac{1}{4} & 1 & 0 & \\frac{69}{16} & 0 & -\\frac{11}{8} & \\frac{3}{2} \\\\\n", "{\\color{green}{s}}_{5} & \\frac{1}{14} & 0 & 0 & 0 & \\frac{1}{5} & 0 & 0 & 3 & 1 & -\\frac{6}{5} & \\frac{2}{5} \\\\\n", "\\hline\n", " {Z_{ind}} & -\\frac{1791}{56} & 0 & 0 & 0 & -\\frac{13}{5} & 0 & 0 & -\\frac{81}{4} & 0 & -\\frac{9}{10} & \\frac{1016}{5}\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3 s4 s5 s6| rhs]\n", "[--------+-----------------------------------------------------------------------------------------+--------]\n", "[ x4| 149/112 0 0 1 1/10 0 0 -1/8 0 3/20| 31/5]\n", "[ x3| 13/7 0 1 0 0 0 0 1 0 0| 6]\n", "[ x2| 25/32 1 0 0 1/20 0 0 21/16 0 -7/40| 31/10]\n", "[ s3| -5/28 0 0 0 0 0 1 -15/2 0 1| 2]\n", "[ s2| 191/224 0 0 0 1/4 1 0 69/16 0 -11/8| 3/2]\n", "[ s5| 1/14 0 0 0 1/5 0 0 3 1 -6/5| 2/5]\n", "[--------+-----------------------------------------------------------------------------------------+--------]\n", "[ Z|-1791/56 0 0 0 -13/5 0 0 -81/4 0 -9/10| 1016/5]" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "cambio(6,9)" ] }, { "cell_type": "code", "execution_count": 76, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left[1, 2, 3, 4, 5, 6, 7\\right]$$" ], "text/plain": [ "[1, 2, 3, 4, 5, 6, 7]" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/plain": [ "[1/5, 0, 1/10, 0, 1/2, 2/5]" ] }, "execution_count": 76, "metadata": {}, "output_type": "execute_result" } ], "source": [ "pardec()" ] }, { "cell_type": "code", "execution_count": 77, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left[1, 2, 3, 4, 5, 6, 7\\right]$$" ], "text/plain": [ "[1, 2, 3, 4, 5, 6, 7]" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {\\color{green}{s}}_{4} & {\\color{green}{s}}_{5} & {\\color{green}{s}}_{6} & {\\color{green}{s}}_{7} & {b} \\\\\n", "\\hline\n", " {x}_{4} & \\frac{149}{112} & 0 & 0 & 1 & \\frac{1}{10} & 0 & 0 & -\\frac{1}{8} & 0 & \\frac{3}{20} & 0 & \\frac{31}{5} \\\\\n", "{x}_{3} & \\frac{13}{7} & 0 & 1 & 0 & 0 & 0 & 0 & 1 & 0 & 0 & 0 & 6 \\\\\n", "{x}_{2} & \\frac{25}{32} & 1 & 0 & 0 & \\frac{1}{20} & 0 & 0 & \\frac{21}{16} & 0 & -\\frac{7}{40} & 0 & \\frac{31}{10} \\\\\n", "{\\color{green}{s}}_{3} & -\\frac{5}{28} & 0 & 0 & 0 & 0 & 0 & 1 & -\\frac{15}{2} & 0 & 1 & 0 & 2 \\\\\n", "{\\color{green}{s}}_{2} & \\frac{191}{224} & 0 & 0 & 0 & \\frac{1}{4} & 1 & 0 & \\frac{69}{16} & 0 & -\\frac{11}{8} & 0 & \\frac{3}{2} \\\\\n", "{\\color{green}{s}}_{5} & \\frac{1}{14} & 0 & 0 & 0 & \\frac{1}{5} & 0 & 0 & 3 & 1 & -\\frac{6}{5} & 0 & \\frac{2}{5} \\\\\n", "{\\color{green}{s}}_{7} & -\\frac{33}{224} & 0 & 0 & 0 & -\\frac{1}{4} & 0 & 0 & -\\frac{69}{16} & 0 & -\\frac{11}{8} & 1 & -\\frac{1}{2} \\\\\n", "\\hline\n", " {Z_{ind}} & -\\frac{1791}{56} & 0 & 0 & 0 & -\\frac{13}{5} & 0 & 0 & -\\frac{81}{4} & 0 & -\\frac{9}{10} & 0 & \\frac{1016}{5}\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3 s4 s5 s6 s7| rhs]\n", "[--------+--------------------------------------------------------------------------------------------------+--------]\n", "[ x4| 149/112 0 0 1 1/10 0 0 -1/8 0 3/20 0| 31/5]\n", "[ x3| 13/7 0 1 0 0 0 0 1 0 0 0| 6]\n", "[ x2| 25/32 1 0 0 1/20 0 0 21/16 0 -7/40 0| 31/10]\n", "[ s3| -5/28 0 0 0 0 0 1 -15/2 0 1 0| 2]\n", "[ s2| 191/224 0 0 0 1/4 1 0 69/16 0 -11/8 0| 3/2]\n", "[ s5| 1/14 0 0 0 1/5 0 0 3 1 -6/5 0| 2/5]\n", "[ s7| -33/224 0 0 0 -1/4 0 0 -69/16 0 -11/8 1| -1/2]\n", "[--------+--------------------------------------------------------------------------------------------------+--------]\n", "[ Z|-1791/56 0 0 0 -13/5 0 0 -81/4 0 -9/10 0| 1016/5]" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "corte(5)" ] }, { "cell_type": "code", "execution_count": 78, "metadata": {}, "outputs": [ { "data": { "text/plain": [ "[ 217.09 NO NO NO 10.400 NO NO 4.6957 NO 0.65455 NO]" ] }, "execution_count": 78, "metadata": {}, "output_type": "execute_result" } ], "source": [ "cocientesD(7)" ] }, { "cell_type": "code", "execution_count": 79, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {\\color{green}{s}}_{4} & {\\color{green}{s}}_{5} & {\\color{green}{s}}_{6} & {\\color{green}{s}}_{7} & {b} \\\\\n", "\\hline\n", " {x}_{4} & \\frac{46}{35} & 0 & 0 & 1 & \\frac{4}{55} & 0 & 0 & -\\frac{131}{220} & 0 & 0 & \\frac{6}{55} & \\frac{338}{55} \\\\\n", "{x}_{3} & \\frac{13}{7} & 0 & 1 & 0 & 0 & 0 & 0 & 1 & 0 & 0 & 0 & 6 \\\\\n", "{x}_{2} & \\frac{4}{5} & 1 & 0 & 0 & \\frac{9}{110} & 0 & 0 & \\frac{819}{440} & 0 & 0 & -\\frac{7}{55} & \\frac{174}{55} \\\\\n", "{\\color{green}{s}}_{3} & -\\frac{2}{7} & 0 & 0 & 0 & -\\frac{2}{11} & 0 & 1 & -\\frac{117}{11} & 0 & 0 & \\frac{8}{11} & \\frac{18}{11} \\\\\n", "{\\color{green}{s}}_{2} & 1 & 0 & 0 & 0 & \\frac{1}{2} & 1 & 0 & \\frac{69}{8} & 0 & 0 & -1 & 2 \\\\\n", "{\\color{green}{s}}_{5} & \\frac{1}{5} & 0 & 0 & 0 & \\frac{23}{55} & 0 & 0 & \\frac{372}{55} & 1 & 0 & -\\frac{48}{55} & \\frac{46}{55} \\\\\n", "{\\color{green}{s}}_{6} & \\frac{3}{28} & 0 & 0 & 0 & \\frac{2}{11} & 0 & 0 & \\frac{69}{22} & 0 & 1 & -\\frac{8}{11} & \\frac{4}{11} \\\\\n", "\\hline\n", " {Z_{ind}} & -\\frac{1116}{35} & 0 & 0 & 0 & -\\frac{134}{55} & 0 & 0 & -\\frac{1917}{110} & 0 & 0 & -\\frac{36}{55} & \\frac{11158}{55}\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3 s4 s5 s6 s7| rhs]\n", "[---------+-------------------------------------------------------------------------------------------------------------+---------]\n", "[ x4| 46/35 0 0 1 4/55 0 0 -131/220 0 0 6/55| 338/55]\n", "[ x3| 13/7 0 1 0 0 0 0 1 0 0 0| 6]\n", "[ x2| 4/5 1 0 0 9/110 0 0 819/440 0 0 -7/55| 174/55]\n", "[ s3| -2/7 0 0 0 -2/11 0 1 -117/11 0 0 8/11| 18/11]\n", "[ s2| 1 0 0 0 1/2 1 0 69/8 0 0 -1| 2]\n", "[ s5| 1/5 0 0 0 23/55 0 0 372/55 1 0 -48/55| 46/55]\n", "[ s6| 3/28 0 0 0 2/11 0 0 69/22 0 1 -8/11| 4/11]\n", "[---------+-------------------------------------------------------------------------------------------------------------+---------]\n", "[ Z| -1116/35 0 0 0 -134/55 0 0 -1917/110 0 0 -36/55| 11158/55]" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "cambio(7,10)" ] }, { "cell_type": "code", "execution_count": 9, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {\\color{green}{s}}_{4} & {\\color{green}{s}}_{5} & {b} \\\\\n", "\\hline\n", " {x}_{4} & \\frac{631}{462} & 0 & 0 & 1 & \\frac{5}{42} & \\frac{1}{6} & 0 & \\frac{19}{42} & 0 & \\frac{269}{42} \\\\\n", "{x}_{3} & \\frac{71}{42} & 0 & 1 & 0 & -\\frac{1}{42} & \\frac{1}{6} & 0 & \\frac{55}{42} & 0 & \\frac{257}{42} \\\\\n", "{x}_{2} & \\frac{6}{11} & 1 & 0 & 0 & 0 & 0 & 0 & 1 & 0 & 3 \\\\\n", "{\\color{green}{s}}_{3} & \\frac{90}{77} & 0 & 0 & 0 & \\frac{2}{7} & 0 & 1 & -\\frac{40}{7} & 0 & \\frac{18}{7} \\\\\n", "{\\color{green}{s}}_{5} & -\\frac{41}{42} & 0 & 0 & 0 & -\\frac{5}{1554} & -\\frac{1}{6} & 0 & -\\frac{55}{42} & 1 & -\\frac{5}{42} \\\\\n", "\\hline\n", " {Z_{ind}} & -\\frac{4419}{154} & 0 & 0 & 0 & -\\frac{31}{14} & -\\frac{9}{2} & 0 & -\\frac{423}{14} & 0 & \\frac{2897}{14}\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3 s4 s5| rhs]\n", "[---------+-----------------------------------------------------------------------------------------+---------]\n", "[ x4| 631/462 0 0 1 5/42 1/6 0 19/42 0| 269/42]\n", "[ x3| 71/42 0 1 0 -1/42 1/6 0 55/42 0| 257/42]\n", "[ x2| 6/11 1 0 0 0 0 0 1 0| 3]\n", "[ s3| 90/77 0 0 0 2/7 0 1 -40/7 0| 18/7]\n", "[ s5| -41/42 0 0 0 -5/1554 -1/6 0 -55/42 1| -5/42]\n", "[---------+-----------------------------------------------------------------------------------------+---------]\n", "[ Z|-4419/154 0 0 0 -31/14 -9/2 0 -423/14 0| 2897/14]" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "#v=matrix(QQ,1,nv,[-41/42,0,0,0,-5/1554,-1/6,0,-55/42] ); R=-5/42;añadeRes(v,R) #cogemos la ecuacion de x3" ] }, { "cell_type": "code", "execution_count": 10, "metadata": {}, "outputs": [ { "data": { "text/plain": [ "[29.395 NO NO NO 688.20 27.000 NO 23.073 NO]" ] }, "execution_count": 10, "metadata": {}, "output_type": "execute_result" } ], "source": [ "#cocientesD(5)" ] }, { "cell_type": "code", "execution_count": 11, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {\\color{green}{s}}_{4} & {\\color{green}{s}}_{5} & {b} \\\\\n", "\\hline\n", " {x}_{4} & 0 & 0 & 0 & 1 & \\frac{13380}{116809} & -\\frac{30}{451} & 0 & -\\frac{396}{287} & \\frac{631}{451} & \\frac{19694}{3157} \\\\\n", "{x}_{3} & 0 & 0 & 1 & 0 & -\\frac{312}{10619} & -\\frac{5}{41} & 0 & -\\frac{275}{287} & \\frac{71}{41} & \\frac{1697}{287} \\\\\n", "{x}_{2} & 0 & 1 & 0 & 0 & -\\frac{30}{16687} & -\\frac{42}{451} & 0 & \\frac{11}{41} & \\frac{252}{451} & \\frac{1323}{451} \\\\\n", "{\\color{green}{s}}_{3} & 0 & 0 & 0 & 0 & \\frac{32924}{116809} & -\\frac{90}{451} & 1 & -\\frac{2090}{287} & \\frac{540}{451} & \\frac{7668}{3157} \\\\\n", "{x}_{1} & 1 & 0 & 0 & 0 & \\frac{5}{1517} & \\frac{7}{41} & 0 & \\frac{55}{41} & -\\frac{42}{41} & \\frac{5}{41} \\\\\n", "\\hline\n", " {Z_{ind}} & 0 & 0 & 0 & 0 & -\\frac{247601}{116809} & \\frac{180}{451} & 0 & \\frac{2376}{287} & -\\frac{13257}{451} & \\frac{642226}{3157}\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3 s4 s5| rhs]\n", "[--------------+--------------------------------------------------------------------------------------------------------------------------------------+--------------]\n", "[ x4| 0 0 0 1 13380/116809 -30/451 0 -396/287 631/451| 19694/3157]\n", "[ x3| 0 0 1 0 -312/10619 -5/41 0 -275/287 71/41| 1697/287]\n", "[ x2| 0 1 0 0 -30/16687 -42/451 0 11/41 252/451| 1323/451]\n", "[ s3| 0 0 0 0 32924/116809 -90/451 1 -2090/287 540/451| 7668/3157]\n", "[ x1| 1 0 0 0 5/1517 7/41 0 55/41 -42/41| 5/41]\n", "[--------------+--------------------------------------------------------------------------------------------------------------------------------------+--------------]\n", "[ Z| 0 0 0 0 -247601/116809 180/451 0 2376/287 -13257/451| 642226/3157]" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "#cambio(5,1)" ] }, { "cell_type": "code", "execution_count": 12, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left[1, 2, 3, 4, 5, 6, 7\\right]$$" ], "text/plain": [ "[1, 2, 3, 4, 5, 6, 7]" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/plain": [ "[752/3157, 262/287, 421/451, 1354/3157, 5/41]" ] }, "execution_count": 12, "metadata": {}, "output_type": "execute_result" } ], "source": [ "pardec()" ] }, { "cell_type": "code", "execution_count": 13, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left[1, 2, 3, 4, 5, 6, 7\\right]$$" ], "text/plain": [ "[1, 2, 3, 4, 5, 6, 7]" ] }, "metadata": {}, "output_type": "display_data" }, { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {\\color{green}{s}}_{4} & {\\color{green}{s}}_{5} & {\\color{green}{s}}_{6} & {b} \\\\\n", "\\hline\n", " {x}_{4} & 0 & 0 & 0 & 1 & \\frac{13380}{116809} & -\\frac{30}{451} & 0 & -\\frac{396}{287} & \\frac{631}{451} & 0 & \\frac{19694}{3157} \\\\\n", "{x}_{3} & 0 & 0 & 1 & 0 & -\\frac{312}{10619} & -\\frac{5}{41} & 0 & -\\frac{275}{287} & \\frac{71}{41} & 0 & \\frac{1697}{287} \\\\\n", "{x}_{2} & 0 & 1 & 0 & 0 & -\\frac{30}{16687} & -\\frac{42}{451} & 0 & \\frac{11}{41} & \\frac{252}{451} & 0 & \\frac{1323}{451} \\\\\n", "{\\color{green}{s}}_{3} & 0 & 0 & 0 & 0 & \\frac{32924}{116809} & -\\frac{90}{451} & 1 & -\\frac{2090}{287} & \\frac{540}{451} & 0 & \\frac{7668}{3157} \\\\\n", "{x}_{1} & 1 & 0 & 0 & 0 & \\frac{5}{1517} & \\frac{7}{41} & 0 & \\frac{55}{41} & -\\frac{42}{41} & 0 & \\frac{5}{41} \\\\\n", "{\\color{green}{s}}_{6} & 0 & 0 & 0 & 0 & -\\frac{13380}{116809} & -\\frac{4512}{216931} & 0 & -\\frac{297792}{690235} & -\\frac{631}{451} & 1 & -\\frac{752}{3157} \\\\\n", "\\hline\n", " {Z_{ind}} & 0 & 0 & 0 & 0 & -\\frac{247601}{116809} & \\frac{180}{451} & 0 & \\frac{2376}{287} & -\\frac{13257}{451} & 0 & \\frac{642226}{3157}\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3 s4 s5 s6| rhs]\n", "[--------------+-----------------------------------------------------------------------------------------------------------------------------------------------------+--------------]\n", "[ x4| 0 0 0 1 13380/116809 -30/451 0 -396/287 631/451 0| 19694/3157]\n", "[ x3| 0 0 1 0 -312/10619 -5/41 0 -275/287 71/41 0| 1697/287]\n", "[ x2| 0 1 0 0 -30/16687 -42/451 0 11/41 252/451 0| 1323/451]\n", "[ s3| 0 0 0 0 32924/116809 -90/451 1 -2090/287 540/451 0| 7668/3157]\n", "[ x1| 1 0 0 0 5/1517 7/41 0 55/41 -42/41 0| 5/41]\n", "[ s6| 0 0 0 0 -13380/116809 -4512/216931 0 -297792/690235 -631/451 1| -752/3157]\n", "[--------------+-----------------------------------------------------------------------------------------------------------------------------------------------------+--------------]\n", "[ Z| 0 0 0 0 -247601/116809 180/451 0 2376/287 -13257/451 0| 642226/3157]" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "corte(1) # 3" ] }, { "cell_type": "code", "execution_count": 14, "metadata": {}, "outputs": [ { "data": { "text/plain": [ "[ NO NO NO NO 18.505 -19.189 NO -19.189 21.010 NO]" ] }, "execution_count": 14, "metadata": {}, "output_type": "execute_result" } ], "source": [ "cocientesD(6)" ] }, { "cell_type": "code", "execution_count": 15, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {\\color{green}{s}}_{4} & {\\color{green}{s}}_{5} & {\\color{green}{s}}_{6} & {b} \\\\\n", "\\hline\n", " {x}_{4} & 0 & 0 & 0 & 1 & \\frac{3345}{6956} & 0 & 0 & 0 & \\frac{4417}{752} & -\\frac{2405}{752} & 7 \\\\\n", "{x}_{3} & 0 & 0 & 1 & 0 & \\frac{62543}{97384} & 0 & 0 & \\frac{11}{7} & \\frac{44827}{4512} & -\\frac{26455}{4512} & \\frac{307}{42} \\\\\n", "{x}_{2} & 0 & 1 & 0 & 0 & \\frac{3555}{6956} & 0 & 0 & \\frac{11}{5} & \\frac{5131}{752} & -\\frac{3367}{752} & 4 \\\\\n", "{\\color{green}{s}}_{3} & 0 & 0 & 0 & 0 & \\frac{67237}{48692} & 0 & 1 & -\\frac{22}{7} & \\frac{10995}{752} & -\\frac{7215}{752} & \\frac{33}{7} \\\\\n", "{x}_{1} & 1 & 0 & 0 & 0 & -\\frac{13035}{13912} & 0 & 0 & -\\frac{11}{5} & -\\frac{56441}{4512} & \\frac{37037}{4512} & -\\frac{11}{6} \\\\\n", "{\\color{green}{s}}_{2} & 0 & 0 & 0 & 0 & \\frac{14495}{2632} & 1 & 0 & \\frac{726}{35} & \\frac{303511}{4512} & -\\frac{216931}{4512} & \\frac{481}{42} \\\\\n", "\\hline\n", " {Z_{ind}} & 0 & 0 & 0 & 0 & -\\frac{15017}{3478} & 0 & 0 & 0 & -\\frac{21147}{376} & \\frac{7215}{376} & 208\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3 s4 s5 s6| rhs]\n", "[------------+---------------------------------------------------------------------------------------------------------------------------------+------------]\n", "[ x4| 0 0 0 1 3345/6956 0 0 0 4417/752 -2405/752| 7]\n", "[ x3| 0 0 1 0 62543/97384 0 0 11/7 44827/4512 -26455/4512| 307/42]\n", "[ x2| 0 1 0 0 3555/6956 0 0 11/5 5131/752 -3367/752| 4]\n", "[ s3| 0 0 0 0 67237/48692 0 1 -22/7 10995/752 -7215/752| 33/7]\n", "[ x1| 1 0 0 0 -13035/13912 0 0 -11/5 -56441/4512 37037/4512| -11/6]\n", "[ s2| 0 0 0 0 14495/2632 1 0 726/35 303511/4512 -216931/4512| 481/42]\n", "[------------+---------------------------------------------------------------------------------------------------------------------------------+------------]\n", "[ Z| 0 0 0 0 -15017/3478 0 0 0 -21147/376 7215/376| 208]" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "cambio(6,6)" ] }, { "cell_type": "code", "execution_count": 16, "metadata": {}, "outputs": [ { "data": { "text/plain": [ "[ NO NO NO NO 4.6082 NO NO 0.00000 4.4961 NO]" ] }, "execution_count": 16, "metadata": {}, "output_type": "execute_result" } ], "source": [ "cocientesD(5)" ] }, { "cell_type": "code", "execution_count": 17, "metadata": {}, "outputs": [ { "data": { "text/html": [ "" ], "text/latex": [ "$$\\newcommand{\\Bold}[1]{\\mathbf{#1}}\\left(\\begin{array}{r|rrrrrrrrrr|r}\n", "{Basic} & {x}_{1} & {x}_{2} & {x}_{3} & {x}_{4} & {\\color{green}{s}}_{1} & {\\color{green}{s}}_{2} & {\\color{green}{s}}_{3} & {\\color{green}{s}}_{4} & {\\color{green}{s}}_{5} & {\\color{green}{s}}_{6} & {b} \\\\\n", "\\hline\n", " {x}_{4} & \\frac{446}{869} & 0 & 0 & 1 & 0 & 0 & 0 & -\\frac{446}{395} & -\\frac{259}{474} & \\frac{481}{474} & \\frac{1436}{237} \\\\\n", "{x}_{3} & \\frac{62543}{91245} & 0 & 1 & 0 & 0 & 0 & 0 & \\frac{376}{5925} & \\frac{19351}{14220} & -\\frac{3367}{14220} & \\frac{21518}{3555} \\\\\n", "{x}_{2} & \\frac{6}{11} & 1 & 0 & 0 & 0 & 0 & 0 & 1 & 0 & 0 & 3 \\\\\n", "{\\color{green}{s}}_{3} & \\frac{134474}{91245} & 0 & 0 & 0 & 0 & 0 & 1 & -\\frac{37832}{5925} & -\\frac{27121}{7110} & \\frac{17797}{7110} & \\frac{7154}{3555} \\\\\n", "{\\color{green}{s}}_{1} & -\\frac{13912}{13035} & 0 & 0 & 0 & 1 & 0 & 0 & \\frac{13912}{5925} & \\frac{189847}{14220} & -\\frac{124579}{14220} & \\frac{6956}{3555} \\\\\n", "{\\color{green}{s}}_{2} & \\frac{107263}{18249} & 0 & 0 & 0 & 0 & 1 & 0 & \\frac{9257}{1185} & -\\frac{17797}{2844} & \\frac{481}{2844} & \\frac{481}{711} \\\\\n", "\\hline\n", " {Z_{ind}} & -\\frac{60068}{13035} & 0 & 0 & 0 & 0 & 0 & 0 & \\frac{60068}{5925} & \\frac{19943}{14220} & -\\frac{265031}{14220} & \\frac{709406}{3555}\n", "\\end{array}\\right)$$" ], "text/plain": [ "[ B| x1 x2 x3 x4 s1 s2 s3 s4 s5 s6| rhs]\n", "[-------------+-------------------------------------------------------------------------------------------------------------------------------------------+-------------]\n", "[ x4| 446/869 0 0 1 0 0 0 -446/395 -259/474 481/474| 1436/237]\n", "[ x3| 62543/91245 0 1 0 0 0 0 376/5925 19351/14220 -3367/14220| 21518/3555]\n", "[ x2| 6/11 1 0 0 0 0 0 1 0 0| 3]\n", "[ s3| 134474/91245 0 0 0 0 0 1 -37832/5925 -27121/7110 17797/7110| 7154/3555]\n", "[ s1| -13912/13035 0 0 0 1 0 0 13912/5925 189847/14220 -124579/14220| 6956/3555]\n", "[ s2| 107263/18249 0 0 0 0 1 0 9257/1185 -17797/2844 481/2844| 481/711]\n", "[-------------+-------------------------------------------------------------------------------------------------------------------------------------------+-------------]\n", "[ Z| -60068/13035 0 0 0 0 0 0 60068/5925 19943/14220 -265031/14220| 709406/3555]" ] }, "metadata": {}, "output_type": "display_data" } ], "source": [ "cambio(5,5)" ] }, { "cell_type": "code", "execution_count": null, "metadata": {}, "outputs": [], "source": [] } ], "metadata": { "kernelspec": { "display_name": "SageMath 9.5", "language": "sage", "name": "sagemath" }, "language_info": { "codemirror_mode": { "name": "ipython", "version": 3 }, "file_extension": ".py", "mimetype": "text/x-python", "name": "python", "nbconvert_exporter": "python", "pygments_lexer": "ipython3", "version": "3.11.2" } }, "nbformat": 4, "nbformat_minor": 4 }