Excel VBAによる計算結果の図示

gnuplotは、 2次元や3次元のグラフを作成するためのアプリケーションソフトウェアで、Linux、Windows、macOSで利用できます。

計算結果をテキストファイルに出力する

  1. x とy の値を少しずつ変化させ、各x, yに対する z = Sin(x) Cos(y) の値を計算し、 x, y, zの値をファイルに出力します。
  2. gnuplotを利用してグラフを描きます。

Excel VBAプログラムの作成

牛島省著「数値計算のためのFortran90/95プログラミング入門」森北出版，p.30の例題を簡略化した例を示します。

Sub graph()
  Dim d, x, y, z As Single
  Dim i, j As Integer
  Const n As Integer = 51   ' 分割数
  
  d = 10# / (n - 1)    '増分

  Open "graph.out" For Output As #1

  For j = 1 To n
    y = -5# + (j - 1) * d    ' yの値を設定
    For i = 1 To n
      x = -5# + (i - 1) * d  ' xの値を設定
      z = Sin(x) * Cos(y)
      Write #1, x, y, z
    Next
    Write #1,
  Next
  Close #1
End Sub

プログラムの実行

マクロを実行します。

データファイル graph.out が作成されます。

-5,-5,.2720106
-4.8,-5,.2825742
-4.6,-5,.2818726
 .................

gnuplotによるグラフの表示

  1. gnuplotを起動します。
  2. メニューの「ファイル」－「ディレクトリの移動」を選択し、データファイルのあるフォルダーに移動します。
  3. ファイル graph.out を読み込んでグラフを表示する命令を入力します。
    データの区切り文字として　"," を指定します。

グラフの描画命令

  1. グラフが表示されます。ウィンドウ・サイズを変えて、図の大きさを変更することができます。

グラフの表示

  1. 図をファイルとして保存するには、optionsメニューからCopy to Clipboardを選択し、ペイントなどで貼り付けるか、 Save as EMFを選びます。

オプションメニュー

gnuplotによるEPS形式のPostscriptファイルの保存

  1. ターミナル・タイプを変更します。
  2. 保存ファイル名を指定します。
  3. 再プロットします。

るeps形式ファイルの作成命令

  1. EPSファイル graph.eps が作成されます。

戻る