Hola:
Estoy haciendo gráficas con chart... y me gustaria saber como puedo, por ejemplo, para un set de 100 datos mosttrar sólo 10 ticks en la gráfica (uso Chart::Lines). Crei que era con el parámetro max_x_ticks... lo puse en 10, pero igual me muestra los 100.
Gracias
-
- Publicidad
Gráficos con Chart
7 mensajes
• Página 1 de 1
Gráficos con Chart
por purrutia » 2006-09-13 19:09 @839
- purrutia
- Perlero nuevo
- Mensajes: 16
- Registrado: 2006-07-24 14:32 @647
Publicidad
por kidd » 2006-09-13 19:21 @848
Hola:
Sin ver tu código estoy un poco a ciegas, pero el manual si dice que el max_x_ticks debe de ser por lo menos 5 veces mayor a min_x_ticks, quizá eso está evitando que te ponga los datos correctamente.
Si pones el código te podemos ayudar más.
Saludos
Sin ver tu código estoy un poco a ciegas, pero el manual si dice que el max_x_ticks debe de ser por lo menos 5 veces mayor a min_x_ticks, quizá eso está evitando que te ponga los datos correctamente.
Si pones el código te podemos ayudar más.
Saludos
-
kidd - Creador de Perl en Español
- Mensajes: 1166
- Registrado: 2003-10-15 16:52 @744
- Ubicación: México
por purrutia » 2006-09-13 19:26 @851
Tambien lei eso, en un principio habia definido solo max_x_ticks, asi que como hago dos graficos, probe con y sin min_x_ticks, acá va el código:
Using perl Syntax Highlighting
use strict;
use Chart::Lines;
my @valores_x = ( 1 .. 100 );
my @tiempos;
my @optimos;
open(TIEMPOS, "../tiempos.txt");
open(OPTIMOS, "../optimos.txt");
@tiempos = <TIEMPOS>;
@optimos = <OPTIMOS>;
close TIEMPOS;
close OPTIMOS;
my $graf_t = Chart::Lines->new();
my $graf_op = Chart::Lines->new();
$graf_t->add_dataset (@valores_x);
$graf_t->add_dataset (@tiempos);
$graf_op->add_dataset (@valores_x);
$graf_op->add_dataset (@optimos);
$graf_t->set('title' => "Tiempos de Procesamiento",
'legend'=> 'none',
'brush_size' => 4,
'sub_title' => 'Algoritmos Geneticos',
#'grid_lines' => 'true',
'min_x_ticks' => 2,
'max_x_ticks' => 10,
'colors' => {'dataset0' => 'blue'});
$graf_op->set('title' => "Valores Optimos",
'legend' => 'none',
'brush_size' => 4,
'sub_title' => 'Algoritmos Geneticos',
'#grid_lines' => 'true',
'max_x_ticks' => 10,
'colors' => {'dataset0' => 'blue'});
$graf_t->png("GAtiempos.png");
$graf_op->png("GAoptimos.png");
use Chart::Lines;
my @valores_x = ( 1 .. 100 );
my @tiempos;
my @optimos;
open(TIEMPOS, "../tiempos.txt");
open(OPTIMOS, "../optimos.txt");
@tiempos = <TIEMPOS>;
@optimos = <OPTIMOS>;
close TIEMPOS;
close OPTIMOS;
my $graf_t = Chart::Lines->new();
my $graf_op = Chart::Lines->new();
$graf_t->add_dataset (@valores_x);
$graf_t->add_dataset (@tiempos);
$graf_op->add_dataset (@valores_x);
$graf_op->add_dataset (@optimos);
$graf_t->set('title' => "Tiempos de Procesamiento",
'legend'=> 'none',
'brush_size' => 4,
'sub_title' => 'Algoritmos Geneticos',
#'grid_lines' => 'true',
'min_x_ticks' => 2,
'max_x_ticks' => 10,
'colors' => {'dataset0' => 'blue'});
$graf_op->set('title' => "Valores Optimos",
'legend' => 'none',
'brush_size' => 4,
'sub_title' => 'Algoritmos Geneticos',
'#grid_lines' => 'true',
'max_x_ticks' => 10,
'colors' => {'dataset0' => 'blue'});
$graf_t->png("GAtiempos.png");
$graf_op->png("GAoptimos.png");
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4
- purrutia
- Perlero nuevo
- Mensajes: 16
- Registrado: 2006-07-24 14:32 @647
por explorer » 2006-09-13 19:29 @853
Si el eje X es numérico, entonces debes activar la opción de que el gráfico es de tipo xy_plot (página 8 del manual).
Si no, puedes probar con la opción custom_x_ticks (página 9 del manual).
Si no, puedes probar con la opción custom_x_ticks (página 9 del manual).
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
-
explorer - Administrador
- Mensajes: 14480
- Registrado: 2005-07-24 18:12 @800
- Ubicación: Valladolid, España
por explorer » 2006-09-14 05:05 @253
La opción xy_plot está. Sólo tienes que buscarla... acabo, además, de encontrarla en la página de CPAN.purrutia escribiste:Hola:
estoy leyendo el manual... (debe ser el que te refieres, ya que me lo diste en otro post), y no encuentro la opcion xy_plot...
funciona como 'xy_plot' => 'true'
???????''
Gracias
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
-
explorer - Administrador
- Mensajes: 14480
- Registrado: 2005-07-24 18:12 @800
- Ubicación: Valladolid, España
7 mensajes
• Página 1 de 1
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 12 invitados