Una disculpa,... pero que mal se ve los videos el programa que utilice se ve mal...pero bien mal... algo hice mal, lo voy a corregir.

Reloj Análogo

Un reloj análogo con Excel, la mayoría de las personas piensan que el excel es una herramienta solo de los contadores, en donde ellos llevan los estados de cuenta de los negocios a los que sirven, solo sumar restar sacar impuestos etc. Incluso la mayor parte de Excel esta dedicado a esto. Pero no es asi, en una hoja de calculo o spreadsheet uno puede realizar cualquier operación matemática, las herramienta esta ahí, cada celda de Excel lo puede hacer (16,348 x 1,048,576 = 17,179,869,184 celdas en Excel 2010).
Para realizar el reloj analogo necesitamos trabajar con un poco de matematicas y en concreto con radianes, senos y cosenos y un poco de VBA (para animar el reloj).

Un radian es, la longitud del arco formado por la extensión del radio de una circunferencia osea que la longitud del arco es igual al radio, los tamaños del radio depende del tamaño de la circunferencia

http://www.disfrutalasmatematicas.com/geometria/radianes.html

También sabemos que pi (3.1416) es igual a 180º (grados) y dos pi es igual a 360º --para teoría de porque es ésto así, existe toneladas de información en la red nosotros solo lo damos por hecho.

Si graficamos las funciones Seno y Coseno utilizando radianes tenemos este comportamiento 

http://kambry.es/Apuntes%20Web/Paginas%20web%20de%20Matematicas/Analisis_Algebra/Fisica/Ondas.htm

La gráfica corresponde al seno, la del coseno es igual pero desfasada 180º

Con esta teoría podemos empezar a realizar el reloj análogo usando Excel
Primero realizamos la tabla

Pi lo pueden cambiar por 3.1416 o por la funcion =pi() dará casi el mismo resultado ( Excel usa 15 digitos para calcular pi )

Graficamos estas coordenadas utilizando el tipo de gráfica de dispersión con lineas rectas

Invertimos Columna por renglón

Ya en la grafica seleccionamos cualquiera de los ejes, con el botón derecho del mouse.

Hacemos lo mismo con el otro eje

A la gráfica le borramos la cabecera y las etiquetas de las series para obtener una imagen "limpia"

Ya sabemos que de cero a pi hay una mitad de circunferencia o 180 grados o sea que cada grado lo podemos representar como pi*(1/180).

Transformamos nuestra ecuaciones para obtener la relación de cambio de por cada grado.

Cada nuevo valor que se ponga transforma el resultado de las coordenadas (x,y) de la gráfica.

Ya quedo una parte del reloj, que tal si lo animamos...

En la celda A4 pondremos un contador consecutivo que llegue a 180 y cambie a cero para comenzar de nuevo. Excel cuenta con un editor de visual basic que se activa con las teclas Alt+F11.

En el modulo nuevo se inserta el siguiente código visual basic:

Dim boton As Boolean

Sub animacion_reloj()

boton = Not (boton)
inicio:
C = 0
Do While boton = True
DoEvents
C = C + 1
[A4] = C
If C = 180 Then GoTo inicio:
Loop


End Sub

Observaron que al llegar a 180 regresaba al punto de partida, ésto es porque solo estamos utilizando un pi, para que de la vuelta completa necesitamos 2 pi y ya no necesitamos que cuando llegue a 180 se regrese a cero.

En un Reloj análogo, la caratula tiene 60 segundos, 60 minutos y 12 horas los cuales serán nuestros valores máximo para la circunferencia, estos valores remplazaran los 360 grados.

Para los segundos quedaran valor/60 en vez de valor/360 para que grafique segundos en vez de grados

Pero es tan rápido que los 60 segundos representados parecen que son de 5 segundos, necesitamos un timer que nos de los segundos de a segundo.

En la celda A4 colocamos la funcion =now() en español sería?
=ahora() para aquellos que tengan Excel en Español. Y en la celda B4 colocamos la funcion =second(A4) o =segundo(A4), el resto quedara igual

Para que se este reflejando en tiempo real los cambios de segundo es necesario presionar F9 que fuerza a Excel a recalcular las funciones.

Si modificamos nuestro código para que este cálculo sea automático, lo podemos hacer de esa forma un código que diga a excel que recalcule las funciones o un código que escriba en la celda el valor del tiempo actual.

Ya quedo el resto se puede hacer lo mismo para los minutos y para las horas

Para los minutos la circunferencia se divide en 60 pasos y la función es =minute(a4)

Para las horas se divide en 12 pasos y la función es =hour(a4)

Y así quedo esto... nos vemos

Nueva Computadora

Estoy estrenando Laptop, la anterior le callo cafe y me la heche....un error que ya no voy a repetir... sorry
.
No es publicidad pero es una Dell Latitud E6530 con 4 procesadores, y solo 8 gigas de RAM
.

Dashboard Continuación

El dashboard ya  quedo terminado. La información visual que nos da es el comportamiento de toda una línea de producción y el métrico es RTYL ( Rolling Troughput Yield Loss ), su fórmula es RTYL = 1-e(-dpu) ,  en su análisis están envueltos cuatro procesos: Recibos o Incoming Gruner Test –Prueba eléctrica que se realiza al componente principal. Al ensamble del componente principal –Prueba ICT que se realiza al ensamble en PCB. Hipot –Prueba eléctrica al catálogo ensamblado. Y la prueba funcional.

Tal y como se había planeado, solo se le agrego unos velocímetros y una graficas de barra y todos dinámicos o sea que las gráficas se actualizarán automáticamente y siempre presentaran el último valor alimentado en la hoja fuente.

La estructura del archivo es:

Del Raw

Y de aquí se alimentan las hojas: Cálculo, Histograma, FPYL por Semana y los velocímetros

Calculo: Se acumulan los datos para dar la información por mes del total (RTYL) y el de cada proceso que contribuyen

Histograma:

FPYL per Week:

Y los Velocimetros:

Dashboard, continuación del post anterior

El “dashboard” ya quedo, además de lo anterior mencionado  se le agregó otras graficas de barras y unos “speedometers” o velocímetros (avance 100%).

Al código se le agregaron modulos que realizan la función de registrar en bitácoras la información obtenida del “query” (avance = 90%).

Para empezar a usar estoy creando un tutorial para interpretarlo (avance 50%)

Mi plan es empezar a publicarlo los primeros días de Marzo.

Ahí vamos…cuando esté empezare a presentar los gadgets del dashboard..

Domingo 16 de Febrero 2014

Estoy enfrascado en un proyecto y no he podido actualizar el blog. Estoy atareado con esto:

La hoja de datos debe de ser actualizada a diario con información del comportamiento de pruebas eléctricas, estas a su vez se reflejaran en la "portada" que en la gráfica de barras será el acumulado de los meses, en la de líneas el acumulado de la semana y en la de SPC para datos Individuales utilizando los UCL calculados para "Moving Range" los datos de día anterior, se graficarán los últimos 30 días, tambien tiene un Histograma y analiza los datos para determinar su "normalidad".

También debe de determinar si el día del análisis es lunes, para mandar un correo con los datos acumulados de la semana pasada.

La información es obtenida de un "query" que es presentada de esta forma:

Y esto lo quiero hacer con solo un botón y el poder de VBA.

Hasta ahora ya está a un 90% solo hace falta que: Alimente unas bitácoras de seguimiento, se guarde por día con la fecha del análisis para su consulta --cuando se requiera.

A parte de código VBA también contiene las funciones de Excel:

Hloockup

Indirect

Match

Vloockup

Large

Max

Min

Average

Median

Stdev

Counta

Count

Countif

Sumif

Funciones UDF

If then

Y los operadores aritméticos (+, -, / , *)

Además para lograr que las gráfica presenten los últimos 30 datos y que se actualice con cada nuevo dato, se tuvieron que hacer gráficas dinámicas “nombrando” campos y formulas.

Pues eso és....

Sorteo Parte 2 ó Acomodar

Sorteo ó Acomodar en Excel 2010 Parte 2

Puras Formulas --No VBA, Juegos mentales

4/5/2012

Comencemos con una serie de números sin orden y queremos que se acomoden de forma ascendente de izquierda a derecha, para que el de mayor valor este hasta el extremo derecha. Este acomodo lo hará dinámicamente.

Los valores a ordenar estarán en la celda B3 hasta F3; 6,5,8,3,1.

Iteración 1: El valor de la celda B3 se compara con el siguiente el de la celda C3, si es mayor se intercambian de posición, si son iguales o menor se queda en la misma posición.

Iteración 2: Ahora le toca al valor en la posición C3 que se compare con el valor de la posición que está en D3.

Esta comparación continua hasta llegar al compararse el penúltimo valor con el ultimo.

Si tenemos una serie de 5 valores entonces serian cuatro comparaciones ó n-1 en donde n es la cantidad de valores de la serie a ordenar.

Para realizar esta comparación utilizaremos la formula If Then y gráficamente seria:

Diagrama de flujo  de If tHen

Primera Iteración: Debajo de los renglones de la serie desordenada , pondré   en cada celda la siguiente formula

Celda B4 tendrá la formula =If(B3>C3,C3,B3) y en la siguiente,

C4 =IF(C3>B3,C3,B3)

D4 =D3

E4 =E3

F4 =F3

Segunda Iteración : En el siguiente renglón  pondré las siguientes formulas

B5 =B4

C5 =IF(C4>D4,D4,C4)

D4 =IF(D4>C4,D4,C4)

E4 =E3

F4 =F3

Y así hasta colocar el valor Mayor al final de la serie, quedarian las formulas de la siguiente forma

Con el dato de mayor valor colocado en su posición, se tiene que realizar los mismos pasos para el resto de los valores y  colocarlos en la orden prefijado.

Al final obtendremos, una serie ordenada desde el valor mayor al menor 1,3,5,6,8 Iteración Serie -- 6 5 8 3 1 I 5 6 8 3 1 II 5 6 8 3 1 III 5 6 3 8 1 IV 5 6 3 1 8 V 5 6 3 1 8 VI 5 3 6 1 8 VII 5 3 1 6 8 VIII 3 5 1 6 8 IX 3 1 5 6 8 X 1 3 5 6 8

Y para que tanto esfuerzo?   Por este momento esta has ta la mitad.

Sorteo, utilizando una hoja de calculo

El siguiente post lo publique en un blog que cree hara tiempo atras, este blog ya no lo pude editar o postear mas :-(, no se que paso pero aqui esta lo que comence en aquel tiempo

Sorteo
Sorteo ó Acomodar en Excel 2010 Parte 1
Bubble Sort

En Excel sorteo es la colocación de una serie de elementos en un orden. Ascendente; cuando los elementos son números, empezaría el orden del numero de menor valor al numero de mayor valor ejemplo, 1, 2, 3,…,9, 10. Descendente; seria al revés, la serie ordenada en forma descendente empezaría del numero de mayor valor y terminaría en el numero de menor valor.

En Excel 2010 existen dos Menús en la Barra Ribbon que realizan la operación en Home y en Data.

Básicamente funciona de la siguiente forma:  Se tiene una serie de columnas con datos ordenados aleatoriamente y si quisiéramos que alguna serie estuviera ordenada, solo se selecciona y se ejecuta algún a de las funciones del Menú, Excel pregunta si se continua el sorteo con la siguiente selección o solo se expande a las siguientes columnas, si los valores de las columnas contiguas están relacionados.

En siguiente tenemos un ejemplo de como funciona.



Seleccionamos los Datos desde la cabecera B hasta el dato del Renglón VI, como se muestra.

Seleccionamos A-Z, Descendente.

Si seleccionamos NO expandir, el resultado será:

Y si seleccionamos expandir, será:

Hasta el momento no he encontrado algún problema con el método, cada vez que la tabla o base de datos se actualiza se tiene que realizar los pasos anterior para sortear o acomodar los datos.

Si se tiene una tabla que constantemente se esta actualizando o esta "viva" es necesario contar con un templete que automáticamente los ordene y que nos visualice a el procesos o articulo que este dando mayor o menor rendimiento.

Por ejemplo la siguiente tabla, necesitamos graficar un Pareto (http://en.wikipedia.org/wiki/Pareto_chart ) para determinar que articulo es el que da mayor rendimiento, necesitamos que al abrir el archivo nos los visualice instantaneamente.

Existen algunos métodos que van desde formulas hasta eventos y por último si se necesita se puede incluir en algún algoritmo VBA para realizar una especifica tarea.

Antes de empezar con las formulas, vamos a ver como funcionan los algoritmo "bubble sort" existen varios pero este es el mas fácil de entender --para mi-- y es el que voy a usar.

Para mayor información sobre algoritmos, la pueden encontrar en Wikipediahttp://en.wikipedia.org/wiki/Sorting_algorithm

Bubble comienza con los dos números iniciales de la serie y los compara uno a otro si son iguales los deja como están si uno de los dos es mayor  o menor entonces intercambia sus posiciones.

La siguiente Grafica --Fuente Wikipidia-- nos ilustra lo anterior

Inicio -- 1/11/2014

Hola,

De alguna forma se tiene que comenzar,

Comenzaré con la intensión de la creación de este blog el medio que he escogido para plasmar lo que a diario aprendo. Sin estar acotado a un tema en particular.

Me gusta aprender... y si no lo uso se esconde en algún rincón de la mente.

Tengo bien presente cuando me di cuenta de esta manía, fue en la clase de integrales con Ramos Osuna en el ITT, a mediados del semestre de Mate 1 y estaba con el tema de máximos y mínimos, tenía la ecuación de la campana de Gauss y entendí lo que el maestro estaba explicando,... en ese momento sentí que la piel de la nuca se me "enchino" ... visualice lo abstracto de la clase con lo práctico, …cuando la curva cambiaba de cóncava a convexa, la ecuación es igual a cero, y en este punto de inflexión de la curva es el punto que conocemos como la desviación estándar de la distribución Normal.

Pues así es, tratare de alimentar-postear el blog frecuentemente y convertirlo en hábito…