perl - "First steps with PDL"使用 Gnuplot 创建的图像与 PDL Book 中的图像不同

Question

我从http://pdl.perl.org/?page=FirstSteps找到了一个例子即:

pdl> use PDL::Graphics::Simple
pdl> imag (sin(rvals(200,200)+1)

我尝试运行这个示例，但是 unsuccessfully 。因此，我尝试调整示例，使其能够在 Windows 上与 Gnuplot 一起使用:

pdl> use PDL::Graphics::Gnuplot;
pdl> gplot(with => 'image', sin(rvals(200,200)+1) );

但是，结果图与 PDL 书中给出的图不同，因为它包含额外的“V”形蓝色条纹:

来自 PDL Book 的比较图像看起来干净得多:

我不知道是什么导致了这种差异。

Answer 1

我刚刚使用 Gnuplot 5.2、前沿 PDL、最新的 PDL::Graphics::Gnuplot (PGG) 和 PDL::Graphics::Simple (PGS) 进行了尝试。我对 PGG 以及使用 PGS 的书得到了与您相同的结果。

使两者的颜色方案相同的方法是更改​​ Gnuplot 调用以首先提供绘图选项:

pdl> use PDL::Graphics::Gnuplot
pdl> gplot({clut => 'sepia', colorbox => '', justify =>1}, with => 'image', sin(rvals(200,200)+1))

因为，无论好坏，PGS 默认为棕褐色调。 colorbox 选项是色标，如果它不存在并且您希望数据仍然是正方形，则必须添加一个真正的 justify 值。