83110_es-ES

liliconcom

Gráfico de barras variable por lista

Hola,

Intento escribir un gráfico de barras como este.

Graph Builder(
 Size( 534, 418 ),
 Show Control Panel( 0 ),
 Variables(
  Y( :Name( "A" ) ),
  Y( :Name( "B" ), Position( 1 ) ),
  Y( :Name( "C" ), Position( 1 ) ),
 ),
 Elements(
  Bar(
   Y( 1 ),
   Y( 2 ),
   Y( 3 ),
   Legend( 3 ),
   Bar Style( "Stacked" )
  )
 )
)

El desafío es que tengo las variables Y en una lista que se cambiará de vez en cuando (por ejemplo, {A, B, D, Test, Bla}).

Me gustaría que el gráfico de barras se ajustara automáticamente dependiendo de la lista "l", por ejemplo:

l = {"A", "B", "D", "Test", "Bla"};

...the script should then be looks like this: 

Variables(
  Y( :Name( "A" ) ),
  Y( :Name( "B" ), Position( 1 ) ),
  Y( :Name( "D" ), Position( 1 ) ),
                Y( :Name( "Test" ), Position( 1 ) ),
                Y( :Name( "Bla" ), Position( 1 ) ),    
),

Elements(
  Bar(
   Y( 1 ),
   Y( 2 ),
   Y( 3 ),
                        Y( 4 ),
                        Y( 5 ),
   Legend( 3 ),
   Bar Style( "Stacked" )
  )
 )
)
...

 

Después de una consulta en la base de datos, la lista l cambiará y necesito una actualización automática del gráfico de barras.

Ya intenté transformar la lista en una columna y recorrer el número de entradas de la lista, pero genera múltiples gráficos de barras en lugar de uno

for (i=1, i <= Nitems(l), i++,
show (l[i]);
dt << Graph Builder(
 Size( 534, 418 ),
 Show Control Panel( 0 ),
 Variables(
  Y( Eval (l[i] )) 
 ),
 Elements(
  Bar(
   Y( i ),
   Legend( 3 ),
   Bar Style( "Stacked" )
  )
 )
));

Saludos,

Re: Variable del gráfico de barras por lista

Gracias, esto funciona bien!

Re: Variable del gráfico de barras por lista

Si apilas las columnas deseadas, no importa cuántas tengas.  Este código debería ayudarte a comenzar:

dt1 = New Table( "Untitled 27", Add Rows( 3 ),
 New Column( "A", Numeric, "Continuous", Format( "Best", 12 ), Set Values( [6, 5, 4] ) ),
 New Column( "B", Numeric, "Continuous", Format( "Best", 12 ), Set Values( [7, 8, 9] ) ),
 New Column( "C", Numeric, "Continuous", Format( "Best", 12 ), Set Values( [3, 2, 1] ) )
);

col_list = dt1 << get column names(string);

dt2 = dt1 << Stack(
 columns(col_list),
 Source Label Column( "Variable" ),
 Stacked Data Column( "Value" )
);

dt2 << Graph Builder(
 Size( 526, 415 ),
 Show Control Panel( 0 ),
 Variables( Y( :Value ), Overlay( :Variable ) ),
 Elements( Bar( Y, Legend( 8 ), Bar Style( "Stacked" ) ) ),
 SendToReport( Dispatch( {}, "X title", TextEditBox, {Set Wrap( 2 )} ) )
)