2

特定の元素のX線エネルギーのインタラクティブなプロットを作成しようとしています。

これを行うために、一連のx、yポイントを作成しました(各要素のX線エネルギーと任意のy値を表します)。次に、[塗りつぶし]-> [軸]を指定したListPlotを使用して、表示可能な線を作成しました。「Filling」がデフォルトのベージュの配色を使用して各要素にラベルを付けることを除いて、すべて良好です。これは読み/比較するのが非常に難しいです。「FillingStyle->blah」を使用して配色、厚さ、不透明度などを変更しようとすると、プロットがクラッシュするか、すべての要素でデフォルトで黒になります。

たとえば、機能する唯一のオプションは、すべての塗りつぶしを「青」に変更することです(要素を比較して対比するのに実際には役立ちません)。PlotStyleも変更してみましたが、塗りつぶしには効果がないようです(驚くことではありませんが、良かったと思います)。

 Manipulate[
 Grid[{
   {(*grid group 1*)
    Show[
     {
      ListPlot[
       {mNe ne, mNa na, mMg mg, mAm am},
       Filling -> Axis, FillingStyle -> Blue, PlotMarkers -> {""}, 
       AspectRatio -> .25, ImageSize -> 500, AxesLabel -> {"eV", ""}, 
       PlotRange -> {{0, 20000}, {0, 1}}
       ]
      }
     ], "Full View"}}
  ],
 {{mNe, 1, "Ne"}, {0, 1}, Checkbox},
 {{mNa, 0, "Na"}, {0, 1}, Checkbox},
 {{mMg, 0, "Mg"}, {0, 1}, Checkbox},
 {{mAm, 1, "Am"}, {0, 1}, Checkbox}]

明らかに、I Haventが元のデータを提供したため、このコードはコンパイルされません。このフォーラムは初めてなので、まだスクリーングラブを投稿できません。ごめん。

したがって、最終的な目標は、各要素を一意の(高コントラストの色)で表示することです。各要素の色を指定する必要はありません(プロットするには93!)。

どんな助けでも大歓迎です!

4

1 に答える 1

1

Filling次のように、オプション内の各データ セットの塗りつぶしを指定する必要があります。

{one, two, three} = 
  Table[{RandomReal[30, 30], RandomReal[1, 30]}\[Transpose], {3}];

ListPlot[{one, two, three}, PlotStyle -> None, AspectRatio -> .25,
  Filling -> {1 -> {Axis, Red}, 2 -> {Axis, Darker@Green}, 3 -> {Axis, Blue}}
]

Mathematica グラフィックス

のドキュメントのFilling詳細情報から:

Mathematica グラフィックス

于 2012-10-04T12:05:02.783 に答える