7.1 フレームの分割

同じ様な図形を沢山並べたい時, Dev.open のあとで Frame.divメソッド を呼ぶと, 第1レベルめ(用紙全体)のフレームが分割され, 次のレベルのフレー ムが定義されます. 分割されたフレームをあたかも1枚の紙のように扱って, Frame.new の実行により, 次のフレームに自動的に移っていきます.

次のプログラム LAY1 では, ループの中で, 普通に改 ページをしながら描画するのと同じように, Frame.newPlot.draw を 呼んで折れ線グラフを描いています. Frame.new メソッドでは 3×2=6分割していますから, 7番めの図は自動的に次のページに移って います. また, 第5.2節の出力結果と比較して, 文字の大きさが 分割されたフレームの大きさに応じて小さくなっていることにも注意して下さ い.

#
# lay1.rb

require "narray"
require "numru/advanceddcl"

include NumRu::AdvancedDCL
include NMath

nmax = 401
jmax = 51

y = NArray.sfloat(nmax)

#-- data ----
y0 = 0.5
for n in 0..nmax-1
  y[n] = 5.0*y0 + 10.0
  y0 = 3.7*y0*(1.0-y0)
end

rundef = Common.rundef

#-- graph ----
Dev.open
Frame.div('Y', 3, 2)

for i in 1..8

  Frame.new

  j = (i-1)*(jmax-1)
  xmin = j + 1600.0
  xmax = xmin + jmax - 1

  Fig.window = [xmin, xmax, rundef, rundef]
  Axis.title('TIME', 'YEAR', 'TEMPERATURE', 'DEG')
  
  Plot.draw(rundef, y[j..j+jmax-1])
  Axis.draw

end

Dev.close

 
PROGRAM LAY1

\resizebox{10cm}{!}{\includegraphics{layout/lay1_001.eps}}
lay1.rb: page1

\resizebox{10cm}{!}{\includegraphics{layout/lay1_002.eps}}
lay1.rb: page2