topic-14373

Posts: 189

Joined: Fri Oct 14, 2005 12:33 AM

Series incompletas en tGraph
Posted: Sun Jan 25, 2009 07:39 PM

Hola a todos,

Realmente no encontré nada en los foros sobre esto, así que hago aquí la pregunta, o en su defecto, la pregunta será a Alfredo Arteaga, el autor:

Muestro una gráfica que contiene varias series que tienen varios valores horarios en el día, o sea, 24 valores. El problema viene de que algunas de estas series no registran todos los 24 valores del día, sino algunas horas, en las cuales los valores faltantes (interrupciones) pueden estar al inicio, al final o en el medio.

Creia que podía incluir valores NIL, pero no se puede. Si al definir las series, las creo de 24 valores, pero otras de 23 o de 20, tampoco se puede (marca error en ejecución). Lo probé haciendolo con \FWH\SAMPLES\graph.prg.

No se que hacer, o si habrá respuesta para esto... :cry:

Abrazos,

Julio Llinás
Visita mi Blog en http://mangucybernetico.blogspot.com/
xHarbour 1.1.0 + FWH810 + Borland 5.5.1

jllinas

Posts: 189

Joined: Fri Oct 14, 2005 12:33 AM

Re: Series incompletas en tGraph
Posted: Fri Jan 30, 2009 12:40 AM

¿¿¿ NADIE ???

.... por Dios !

Julio Llinás
Visita mi Blog en http://mangucybernetico.blogspot.com/
xHarbour 1.1.0 + FWH810 + Borland 5.5.1

mantonio_08

Posts: 330

Joined: Fri May 25, 2007 09:06 PM

Re: Series incompletas en tGraph
Posted: Fri Jan 30, 2009 01:50 AM

podrias dar mas datos.. un ejemplo numerico podria ser de mucha utilidad para comprender mejor q quieres hacer::

jllinas

Posts: 189

Joined: Fri Oct 14, 2005 12:33 AM

Re: Series incompletas en tGraph
Posted: Fri Jan 30, 2009 03:48 AM

Pues no faltaba menos....

Este es un ejemplo que NO funciona, de una modificación de \FWH\Samples\graph.prg

Code: Select all Collapse

#include "Fivewin.ch"
#include "TGraph.ch" 


FUNCTION MAIN() 

    LOCAL oDlg, oGraph 

    DEFINE DIALOG oDlg; 
           SIZE 600, 500 

    @ 1, 1 GRAPH oGraph; 
           SIZE 250, 200; 
           TYPE 1; 
           YVALUES 3D XGRID YGRID XVALUES LEGENDS 

//    oGraph:aSeries = { { "Serie 1", CLR_CYAN } } 

//                    { cLegend, nColor, nType, l3D }

    oGraph:aSeries = { { "Serie 1", CLR_CYAN , , },;
                       { "Serie 2", CLR_YELLOW, 2, .T. },;
                       { "Serie 3", CLR_HRED, 3, .F. } }

    oGraph:aYVals = { "Jan", "Feb", "Mar", "Apr", "May" } 

//    oGraph:aData = { { 14280, 20420, 12870, 25347, 7640 } } 

    oGraph:aData = { { 14280, 20420, 12870, 25347, 7640 },; 
                     { 8350, 10315, 15870, 5347, 12340 },; 
                     { 12345, -8945, 10560, 15600      } }  //, 17610 } } 

    oGraph:nClrX = CLR_GREEN 
    oGraph:nClrY = CLR_RED 

    @ 0, 0 BUTTON "Cambia" ACTION ( oGraph:nType := 4, oGraph:Refresh() ) 
//    @ 0, 0 BUTTON "Cambia" ACTION oDlg:Print() 

    ACTIVATE DIALOG oDlg; 
             CENTER 

    RETURN NIL

Como vez, en la tercera serie, a propósito, he eliminado el último valor. Eso es lo que les cuento que me ocurre: en ocasiones, no todas las series son del mismo tamaño, entonces, no se que hacer, pues la realidad de la vida, es que para mi caso así ocurre. Lo ideal sería definir ese valor que falta de alguna manera (¿con un NIL?).

Ojala y no sea el "único burro en la sabana"...

Abrazos,

Julio Llinás
Visita mi Blog en http://mangucybernetico.blogspot.com/
xHarbour 1.1.0 + FWH810 + Borland 5.5.1

Marcelo Via Giglio

Posts: 1088

Joined: Fri Oct 07, 2005 03:33 PM

Re: Series incompletas en tGraph
Posted: Fri Jan 30, 2009 11:55 AM

Hola,

de memoria te respondo, creo que para hacer lo que tu quieres deberias modificar la clase, no creo que sea un problema, para que no grafique nada cuando no esta el elemento en la serie, ademas, de definir el grafico en funcion de la serie mas larga. Otra opcion poner en cero los valores faltantes, pero claro cero es un valor y se graficaria

Como te dije te respondo de memoria

saludos

Marcelo

jllinas

Posts: 189

Joined: Fri Oct 14, 2005 12:33 AM

Re: Series incompletas en tGraph
Posted: Sat Jan 31, 2009 06:37 PM

Gracias Mauricio,

Realmente, eso mismo es lo que he estado haciendo, pero la verdad que se ve bien "cutre", pues se grafica bien, hasta que aparece el cero, y no se ve bien.

Parece que los petardos van por meterle a la clase.

Veré que hago...

Abrazos,

Julio Llinás
Visita mi Blog en http://mangucybernetico.blogspot.com/
xHarbour 1.1.0 + FWH810 + Borland 5.5.1

FiveTech Support Forums

Continue the discussion