2

Gtk3 アプリ内で (PLplot を使用して) PDL によって生成されたグラフを表示しようとしています。次のコードを試すと、2 つの問題が発生します。

  1. $pdlImg は GdkPixbuf ではないため、new_from_pixbuf() は機能しません。
  2. $pdlImg は、エラー メッセージが 10x10x3 配列を文字列として出力し、それらがすべてゼロであるため、空のように見えます。

コード:

#!/usr/bin/perl -w

use strict;
use PDL;
use PDL::Graphics::PLplot;
use Gtk3 -init;

my $pdlImg = zeroes(byte, 10, 10, 3);
my $pl = PDL::Graphics::PLplot->new(DEV => 'mem', MEM => $pdlImg);
my $x = sequence(10);
my $y = $x**2;
$pl->xyplot($x, $y);
$pl->close;

my $win = Gtk3::Window->new;
my $img = Gtk3::Image->new_from_pixbuf($pdlImg);
$win->add($img);
$win->show_all;
Gtk3::main();
4

1 に答える 1