[DataWith]気の向くままソフトについて書いてます。エンジニアではないのであくまでも初心者目線で。EngineをVisualBasicで使う(5:グラフィックスの対応範囲を広げる)前回のGraphics3D関数に対応せるとと同時に、他のグラフ系の関数の対応を増やすことにしました。関数名に共通した文字列を判断するようにIf文を拡張します。Researchのドキュメントセンターからめぼしい関数名をピックアップすると...「データの可視化」セクションListPlotListLinePlotListStepPlotStackedListPlotListPlot3DListPointPlot3DListDensityPlotListLogLinerPlotListLogLogPlotListPolarPltMatrixPlotParallelAxisPlotなどなど。共通部分は「Plot」なので、”*Plot*”とすれば、「Histgram」以外はほぼ拾えそう。今回は関数のプロットを想定しているので、棒グラフ「BarChart」や円グラフ「PieChart」などは含まれない。「関数の可視化」セクションPlotLogPlotPlot3DContourPlotContourPlot3DDensityPlotDensityPlot3DParametricPlotPolarPlotRegionPlotComplexPlotDiscretePlotなどなど。これらも”*Plot*”で吸収できる。前回のような”Sphere”のようなものは少し特殊なケースだが、”*2D*”と”*3D*”も判断すればかなり範囲が広がりそう。いうことで、If文に条件を追加します。Subのようにします。0}]]を入力すると、「Graphics3D」の「3D」の部分が拾われて、次のような結果となりました。OK!Sphereが表示されたMathematicaでは、1つの関数の記述でグラフを横に並べて表示したりできるので、今回のプログラムでも実行できるか試してみました。"Row"]を入力してみます。ベクタープロットの表示(一部)画像領域に収まらなかった。200)のように横長にして、再実行。ベクタープロットを横に並べて表示まだまだ見栄えの調整の余地はありますが、Wolfram言語内で複数並べて実行できることは確認できました。今回はページ稼ぎでスミマセン。2引用をストックしましたストック一覧を見る閉じる引用するにはまずログインしてくださいログイン閉じる引用をストックできませんでした。再度お試しください閉じる限定公開記事のため引用できません。