nm9505

Un Problema De Areas

Apr 7th, 2023
265
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Latex 7.70 KB | Science | 0 0
  1. \documentclass{article}[pstricks,border=8pt,12pt]
  2. \usepackage[utf8]{inputenc}
  3. \usepackage{geometry} [a4paper,lmargin=1.5cm,rmargin=1.5cm,Botton=1.5cm,top=1.75cm]
  4. \usepackage{graphicx}
  5. \usepackage{wrapfig}
  6. \usepackage{color}
  7. \usepackage{amsmath}
  8. \usepackage[T1]{fontenc}
  9. \usepackage{amsfonts} \usepackage{amssymb}
  10. \usepackage{mathrsfs}
  11. \usepackage{cancel}
  12. \usepackage[all]{xy}
  13. \usepackage{pstricks}
  14. \usepackage{pst-all}
  15. \usepackage{pst-solides3d}
  16. \usepackage{fancybox}
  17. \usepackage{tikz}
  18. \usepackage{tikz-3dplot}
  19. \usepackage{gnuplottex}
  20. \usepackage{array}
  21. \usepackage{etoolbox}
  22.  
  23. \tikzset{flippedeventlabel/.append style={align=center}}
  24. \usetikzlibrary{matrix.skeleton}
  25. \usetikzlibrary[shapes,arrows,positioning,fit,backgrounds,intersections,shadows,calc,shadings]
  26. \usetikzlibrary{positioning} \usetikzlibrary{decorations.text} \usetikzlibrary{decorations.pathmorphing}
  27.  
  28. \pgfdeclarelayer{background layer}
  29. \pgfdeclarelayer{foreground layer}
  30. \pgfsetlayers{background layer,main,foreground layer}
  31. %\usetikzlibrary{datavisualization.formats.functions}
  32. \usepackage{pgf-pie}
  33. \usepackage{color,colortbl}
  34. \usepackage{lscape}
  35.  
  36.  
  37. \usepackage{pgfplots}
  38. \pgfplotsset{compat=newest}
  39. \usetikzlibrary{datavisualization} \usetikzlibrary[shapes,arrows,positioning,fit,backgrounds,intersections,shadows,calc,datavisualization.formats.functions]
  40. \usetikzlibrary{patterns}
  41. \usepackage[colorlinks=true,linkcolor=black,citecolor=black,filecolor=magenta,urlcolor=blue]{hyperref}
  42. %Paquete de estilo de referencias
  43. \urlstyle{same}
  44. \title{\textcolor{magenta}{\textbf{Pero Es Un Problema De Geometria Plana}}}
  45. \author{Nimrod Rodríguez\\
  46. \href{SITIO WEB}{\underline{\textcolor{red}{enlace:}
  47. Código \LaTeX }}}
  48. \date{\today}
  49. % Start the document
  50.  
  51. \begin{document}
  52. \pagecolor{orange!30}
  53. % Definición local de colores
  54. \colorlet{verde}{green!50!black}
  55. \renewcommand{\l}{\lambda}
  56. %\begin{landscape}
  57. %\tikz \draw (3,10)  node[scale=0.5,rotate=15,circle,fill=yellow!40,text width=3cm]{};
  58. \maketitle
  59.  
  60. \begin{figure}[ht!]
  61. \centering
  62. \caption{Problema}
  63. \includegraphics[scale=0.1]{problemaNLP.png}
  64. \end{figure}
  65.  
  66. \tdplotsetmaincoords{70}{110}
  67. \pgfmathsetmacro{\res}{(3-2*sqrt(2))/4}
  68. \begin{figure}[ht!]
  69. \centering
  70. \caption{Disposición del terreno}
  71. \begin{tikzpicture}[scale=1,tdplot_main_coords, information text/.style={rounded corners, fill=orange!20,inner sep=2ex}]
  72.  
  73. \draw  (5,-0.5,0)node[blue, below]{$y$};
  74. \draw  (-1.5,6,0)node[blue, right]{$x$};
  75. \draw  (3.5,6,0)node[blue, right]{$a-x$};
  76. \draw  (5,5,0)node[blue, below]{$b-y$};
  77.  
  78. \draw [fill=gray](-5,-5,0) -- (5,-5,0) -- (5,6,0) -- (-5,6,0) --cycle;
  79. \draw [fill=green] (5,4,0) -- (5,6,0) -- (2,6,0) --cycle;
  80. \draw [fill=orange!30] (-5,-5,0) -- (5,4,0) -- (2,6,0) --cycle;
  81. \draw [fill=white](4.5,-5,0) -- (4.5,-4.5,0)--(5,-4.5,0)--(5,-5,0)--cycle;
  82. \draw [fill=white](-5,6,0) -- (-5,5.5,0)--(-4.5,5.5,0)--(-4.5,6,0)--cycle;
  83.  
  84. %nodos
  85. \draw  (-5,0,0)node[blue, above]{$b$};
  86. \draw  (0,-5,0)node[blue, left]{$a$};
  87. \draw  (1.5,1,0)node[blue, right]{$A_1 = \frac{1}{4}ab$};
  88. \draw  (2,-2,0)node[white]{$A_2$};
  89. \draw  (-3,1,0)node[white]{$A_3$};
  90. \draw  (4,5.5,0)node[black]{$A_P$};
  91. \end{tikzpicture}
  92. \end{figure}
  93.  
  94. La figura muestra la disposición del terreno rectangular repartido por Pedro. De acuerdo a la condición de que $A_1 = \frac{1}{4}ab$, se tendría de la figura que;
  95. \begin{align*}
  96. A_P + A_2 + A_3 & = \frac{3}{4}ab\\
  97. \frac{1}{2}(a-x)(b-y) + \frac{1}{2}ay + \frac{1}{2}bx &= \frac{3}{4}ab\\
  98. ab + xy &= \frac{3}{2}ab\\
  99. xy &= \frac{1}{2}ab\\
  100. \end{align*}
  101. Esta relación, que puede escribirse como $y = \frac{ab}{2x}$ corresponde a una curva simetrica en el plano $\mathbb{R}^2$, y es en la cual se confinan los valores posibles de $x$ e $y$, con los cuales Pedro puede hacer tal repartición, es de tipo hipérbole y solo interesa su seccion positiva, pues su dominio seria $\{x: 0<x<a\}$
  102. Lo cual indica que para valores dados de $a$ y $b$, se tiene un considerable número de posibilidades para $x$ e $y$. Sobre estos valores es que habrá que buscar aquel, o aquellos, para los cuales el valor del área $f(x,y)= \frac{1}{2}(a-x)(b-y)$, de terreno que corresponde a Pedro, es la máxima.\\
  103. De modo que el problema ahora consiste en elegir un método para encontrar la posible solución. Uno inicial y tentativo es el ensayo. La forma más simple, es elegir una de las dos variables como parámetro independiente, para despejar la otra en función de esta, en este caso es indistinto, pero elegimos $x$ y despejamos $y$. Así tendremos $y = \frac{ab}{2x}$, con esto, sabiendo que $0<y<b$ obtendriamos que $x>\frac{a}{2}$, de modo que $(\frac{a}{2},a)$ puede utilizarse como como referencia para ensayar con algunos valores de $x$, evaluando la función para el área de terreno de Pedro.  A continuación unos ensayos para $a=5$ y $b=6$. En este caso como $\frac{a}{2}=2.5$ evaluando con \LaTeX \ el conjunto de valores $3.40,3.45,...,3.80$ se obtiene lo siguiente:
  104.  
  105. \pgfmathsetmacro{\m}{5}
  106. \pgfmathsetmacro{\n}{6}
  107. \foreach \r in {3.40,3.45,...,3.80}
  108. {
  109. \pgfmathsetmacro{\s}{\m*\n/(2*\r)}
  110. \pgfmathsetmacro{\t}{0.5*(5-\r)*(6-\s)}
  111. \begin{center}
  112. $x = \r$ \qquad $y = \s$ \qquad $A_P = \t$ \\
  113. \end{center}
  114. }
  115. Acá puede notarse que $A_p$ comienza creciendo y luego termina decreciendo, esto hace pensar que luego de crecer alcanza, por lo menos, un extremo relativo como máximo, para luego ir decreciendo. Asi podría irse eligiendo interpolaciones para aproximar una solución. Lo que hace notoria la dificultad para resolver por aritmetica, es que tanto la condición principal del problema, como la función a optimizar, son funciones cuadráticas, pues vienen de una relación de áreas.\\
  116.  
  117. Un metodo del cálculo más directo, y también conocido en  programación no lineal, es el de optimización lagrangeana:
  118. \begin{center}
  119. Maximizar: $f(x,y) = \frac{1}{2}(a-x)(b-y)$\\
  120. Sujeto a:\ $g(x,y)=xy - \frac{1}{2}ab = 0,$\\
  121. $0<x<a;\ 0<y<b$
  122. \end{center}
  123. Asi, habria que hechar mano del calculo diferencial y resolver por los valores extremos de la función lagrangeana: $L(x,y,\l)=\nabla f(x,y) +\l\nabla g(x,y),$\footnote
  124. {En donde se recuerda que $\vec{\nabla}=\frac{\partial}{\partial x}\hat{i}+\frac{\partial}{\partial y}\hat{j}+ \frac{\partial}{\partial z}\hat{k}$}
  125. mediante el sistema de ecuaciones
  126. $$L_x=\frac{\partial L}{\partial x}=0;\ L_y=\frac{\partial L}{\partial y}=0;\ L_\l=\frac{\partial L}{\partial \l}=0$$
  127. De las primeras dos, igualando los valores de $\l $ se obtiene que $ay=bx$, y combinando a esto la tercera (que resulta igualmente $g(x,y)=0$) se obtiene que $x=\frac{a}{\sqrt{2}}$ en tanto $y=\frac{b}{\sqrt{2}}$. De modo que $A_p = \frac{3-2\sqrt{2}}{4}ab=\res ab < 0.05 ab = \frac{1}{20} ab$. De modo que Pedro efectivamente se queda, en cualquier caso, con menos del veinteavo del terreno.
  128.  
  129.  
  130. %Gráfico de superficies
  131. \begin{figure}[ht!]
  132. \centering
  133. \caption{Intersección con $a=5$ y $b=6$ mediante $\frac{max(0,f=g) + min(f=g, \frac{ab}{2})}{2}$}
  134. \begin{tikzpicture}[scale=1.2] \begin{axis}[legend style={rounded corners,fill=brown!40},legend pos=outer north east, view={45}{35}]  
  135. \pgfmathsetmacro{\u}{5/sqrt(2)}
  136. \pgfmathsetmacro{\v}{6/sqrt(2)}
  137. \pgfmathsetmacro{\z}{0.5*(5-\u)*(6-\v)}
  138. \addplot3[color=green, domain=0:5,samples=70] {0.5*x*y-3*x-2.5*y+15};
  139. \addplot3[color=brown,domain=0:6,samples=60] {x*y-15};
  140. \addplot3[color=red, domain=3:5,samples=10,mesh,very thick] ({x},{15/x},{(max(22.5-3*x-37.5/x,0)+min(22.5-3*x-37.5/x,15))/2});
  141. \addplot3 [color=blue,mark=*] coordinates {(\u,\v,\z)};
  142. \addlegendentry{$\frac{1}{2}(a-x)(b-y),$\ \ \tiny{$0<x<a;\ 0<y<b$}};
  143. \addlegendentry{$xy-\frac{1}{2}ab,$\ \ \tiny{$0<x<a;\ 0<y<b$}};
  144.  
  145. \draw [verde,fill](6,6,21)circle(1.5pt);
  146. \draw (6,6,21) node[verde,left]{\tiny{21}};
  147.  
  148. \end{axis}
  149. \end{tikzpicture}
  150. \end{figure}
  151. %\end{landscape}
  152. \end{document}
  153.  
  154.  
Add Comment
Please, Sign In to add comment