Método del centro de gravedad

[pic 1][pic 2][pic 3]

Método del centro de gravedad

Como equipo decidimos utilizar macros ya que de acuerdo al problema planteado resulta más viable utilizar una herramienta acompañado de Excel que nos permita ejecutar varias veces para obtener diferentes resultados. En el presente trabajo se desarrolla un algoritmo de localización de una instalación para determinar la ubicación de fábricas. Utilizamos un sistema de coordenadas X,Y.

¿Qué es una macro?

Es un conjunto de comandos que se almacena en un lugar especial de Excel de manera que están siempre disponibles cuando los necesites ejecutar.

Lo que se realizo fue ejecutar la misma acción una y otra vez hasta que llegara a lo indicado. [pic 4]

La solución se buscó mediante utilizar el Macros de Excel de la herramienta Microsoft visual Basic, en el cual al ya tener el centro de gravedad que nos arroja solver anteriormente, mediante matrices y comandos los cuales fueron para que las x, y fueran evaluadas después de eso pasar las x´, y´ (primas) a los lugares nuevos ver el criterio si ya se cumple si no es así pasar las x´, y´ debajo de las x,y originales y realiza la acción hasta que el criterio establecido de .01 se cumpla.

Al terminar el programa se observo que la macro al detenerse en el valor del criterio (.01), en los datos arrojados observamos que el criterio de 2.39828 e-08, nos indica que tanto X, Y, como  X’, Y’, se encontraron los valores 681.304121 correspondiente a X y X’ y el valor de 881.9970205 para los valores de Y y Y[pic 5]

CODIGO INSERTADO

Sub macro()

'

' Macro Macro

'

'

criterio = Cells(18, 6).Value

ren = 26

nvocriterio = 5000

While nvocriterio > criterio

Cells(15, 2).Value = Cells(ren, 2).Value

'para_x'

...