Wolfram言語

可視化:ラベル,スケール,除外

さまざまなコールアウト

さまざまなスタイルのCalloutの例.名前付きのAppearanceがラベルで表されている.

完全なWolfram言語入力を表示する
In[1]:=
Click for copyable input
Block[{inputOrdered, input = {(* appearance name, label, marker loc, label loc, options *) (* 1 *){"Leader", "Leader", {0.45, -0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, (2 \[Pi])/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 2 *){"CurvedLeader", \!\(\* StyleBox["\"\<Curved\\nLeader\>\"", StripOnInput->False, LineSpacing->{0, 10}, "NodeID" -> 126]\), {0.5, 0.5}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, 4 \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 3 *){"SlantedLabel", \!\(\* StyleBox["\"\<Slanted\\nLabel\>\"", StripOnInput->False, LineSpacing->{0, 10}, "NodeID" -> 127]\), {0.5, 0.5}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 3, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, (7 \[Pi])/6, 0}, {10, (7 \[Pi])/6}}, RoundingRadius -> 0}}, (* 4 *){"Frame", "Frame", {-0.4, -0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 5 *){"Line", "Line", {-0.4, 0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, 5 \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 6 *){"Corners", "Corners", {0.45, 0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{False, False}, {False, False}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, 4 \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 7 *){"Balloon", "Balloon", {0.3, -0.4}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{False, False}, {False, False}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, (2 \[Pi])/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 8 *){"LineBalloon", \!\(\* StyleBox["\"\<Line\\nBalloon\>\"", StripOnInput->False, LineSpacing->{0, 10}, "NodeID" -> 128]\), {0.2, -0.4}, Automatic, {Background -> Opacity[1, RGBColor[0.97, 0.606, 0.081]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{False, False}, {False, False}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{20, (2 \[Pi])/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 9 *){"Balloon", "Balloon", {-0.3, -0.4}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{False, False}, {False, False}}, FrameMargins -> 10, LabelStyle -> GrayLevel[0], LeaderSize -> {{15, \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 10.}}, (* 10 *){"Leader", "Leader", {-0.4, -0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {"Point", 5}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 11 *){"Leader", "Leader", {0.4, -0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {"CirclePoint", 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, (2 \[Pi])/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 12 *){"Leader", "Leader", {-0.4, 0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {"Circle", 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, 5 \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 13 *){"Leader", "Leader", {0.4, 0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {"BoxPoint", 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, 4 \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 14 *){"Leader", "Leader", {-0.4, 0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {"Box", 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, 5 \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 15 *){"Leader", "Leader", {-0.4, -0.3}, Automatic, {Background -> Opacity[1, ColorData[106, 3]], CalloutMarker -> {"Star", 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, ColorData[106, 3]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> RGBColor[1., 1., 1.], LeaderSize -> {{30, \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 16 *){"Leader", "Leader", {0.4, 0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {"OpenStar", 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, (4 \[Pi])/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 17 *){"Leader", "Leader", {-0.4, 0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {"Arrow", 8}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, 5 \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 18 *){"Leader", "Leader", {0.4, 0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {"OpenArrow", 8}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, 4 \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 19 *){"Leader", "Leader", {-0.4, 0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {"Point", 6}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, 5 \[Pi]/3, 6}, {10, Automatic}}, RoundingRadius -> 0}}, (* 20 *){"Leader", "Leader", {0., 0.5}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 6}, CalloutStyle -> {Directive[AbsoluteThickness[2], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{28, (3 \[Pi])/2, 0}, {0, Automatic}}, RoundingRadius -> 6.5}}, (* 21 *){"Leader", "Leader", {0.4, -0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{1, 2}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{False, False}, {False, False}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, (2 \[Pi])/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 22 *){"Leader", "Leader", {-0.4, -0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, True}, {False, False}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 23 *){"Leader", "Leader", {0.4, -0.4}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{False, False}, {True, False}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, (2 \[Pi])/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 24 *){"Frame", "Frame", {0., 0.5}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{False, False}, {False, False}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{15, (3 \[Pi])/2, 0}, {10, Automatic}}, RoundingRadius -> 15.}}, (* 25 *){"SlantedLabel", \!\(\* StyleBox["\"\<Slanted\\nLabel\>\"", StripOnInput->False, LineSpacing->{0, 10}, "NodeID" -> 129]\), {-0.4, -0.4}, Automatic, {Background -> Opacity[0, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{False, False}, {False, False}}, FrameMargins -> 2, LabelStyle -> GrayLevel[0], LeaderSize -> {{40, \[Pi]/6, 0}, {0, \[Pi]/6}}, RoundingRadius -> 0}}, (* 26 *){"Corners", "Corners", {-0.45, 0.3}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, True}, {False, False}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{30, 5 \[Pi]/3, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 27 *){"Balloon", "Balloon", {0., -0.5}, Automatic, {Background -> Opacity[1, RGBColor[0., 0., 0.]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[2], AbsoluteDashing[{}], Opacity[1, RGBColor[ 0.5000076295109483, 0.5000076295109483, 0.5000076295109483]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{False, False}, {False, False}}, FrameMargins -> 5, LabelStyle -> RGBColor[1., 1., 1.], LeaderSize -> {{20, \[Pi]/2, 0}, {10, Automatic}}, RoundingRadius -> 4.}}, (* 28 *){"CurvedLeader", \!\(\* StyleBox["\"\<Curved\\nLeader\>\"", StripOnInput->False, LineSpacing->{0, 10}, "NodeID" -> 130]\), {-0.5, -0.4}, Automatic, {Background -> Opacity[0., GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, False}, {False, False}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{51, \[Pi]/3, 0}, {20, (16 \[Pi])/9}}, RoundingRadius -> 4.5}}, (* 29 *){"LineBalloon", \!\(\* StyleBox["\"\<Line\\nBalloon\>\"", StripOnInput->False, LineSpacing->{0, 10}, "NodeID" -> 131]\), {0., -0.5}, Automatic, {Background -> Opacity[0., GrayLevel[1]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{False, False}, {False, False}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{20, \[Pi]/2, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 30 *){"Frame", "Frame", {-0.4, 0.}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {"Circle", 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 8, LabelStyle -> GrayLevel[0], LeaderSize -> {{20, 0, 0}, {0, 0}}, RoundingRadius -> 10.}}, (* 31 *){"Leader", "Leader", {0., 0.4}, Automatic, {Background -> Opacity[1, GrayLevel[1]], CalloutMarker -> {"Box", 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{15, (3 \[Pi])/2, 0}, {10, Automatic}}, RoundingRadius -> 0}}, (* 32 *){"Balloon", "Balloon", {0.4, 0.}, Automatic, {Background -> Opacity[1, RGBColor[ 1., 0.9999694819562066, 0.9999847409781033]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> 8, LabelStyle -> GrayLevel[0], LeaderSize -> {{20, \[Pi], 0}, {10, Automatic}}, RoundingRadius -> 10.}}, (* 33 *){None, "None", {-0.45, 0.}, Automatic, {Background -> Opacity[1, RGBColor[1., 1., 1.]], CalloutMarker -> {None, 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, RGBColor[0., 0., 0.]]], Directive[AbsoluteThickness[1], Opacity[0, 0]]}, Frame -> {{True, True}, {True, True}}, FrameMargins -> {15, 10}, LabelStyle -> RGBColor[0., 0., 0.], LeaderSize -> {{10, 0, 0}, {10, Automatic}}, RoundingRadius -> 10}}, (* 34 *){None, "None", {0., -0.1}, Automatic, {Background -> Opacity[0., GrayLevel[1]], CalloutMarker -> {"CirclePoint", 10}, CalloutStyle -> {Directive[AbsoluteThickness[1], AbsoluteDashing[{}], Opacity[1, GrayLevel[0]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{False, False}, {False, False}}, FrameMargins -> 5, LabelStyle -> GrayLevel[0], LeaderSize -> {{6, \[Pi]/2, 0}, {0, Automatic}}, RoundingRadius -> 4.}}, (* 35 *){"Leader", "Leader", {0., -0.3}, Automatic, {Background -> Opacity[0., GrayLevel[1]], CalloutMarker -> {"OpenArrow", 7}, CalloutStyle -> {Directive[AbsoluteThickness[2], AbsoluteDashing[{}], Opacity[1, ColorData[106, 1]]], Directive[AbsoluteThickness[1], Opacity[0, GrayLevel[1]]]}, Frame -> {{False, False}, {False, False}}, FrameMargins -> 5, LabelStyle -> ColorData[106, 1], LeaderSize -> {{23, \[Pi]/2, 0}, {0, Automatic}}, RoundingRadius -> 4.}} }}, (* set order *) inputOrdered = input[[#]] & /@ { 1, 7, 29, 4, 28, 8, 23, 35, 9, 10, 11, 21, 27, 15, 22, 33, 32, 34, 25, 30, 16, 2, 24, 12, 5, 6, 13, 31, 14, 17, 3, 18, 20, 19, 26}(*[[#]]&/@(SeedRandom[2];RandomSample[Range[Length@input],\ Length@input])*); (* set color *) Do[ (* background *) inputOrdered[[n]][[5]][[1]][[-1]][[2]] = ColorData[106, n]; (* leader; background opacity 0 not darker *) inputOrdered[[n]][[5]][[3]][[-1]][[1]][[3]][[2]] = If[inputOrdered[[n]][[5]][[1]][[-1]][[1]] == 0, ColorData[106, n], Darker[ColorData[106, n], .4]]; (* label; background opacity 0 then Black *) inputOrdered[[n]][[5]][[6]][[-1]] = If[OddQ[n] || inputOrdered[[n]][[5]][[1]][[-1]][[1]] == 0, Black, White]; , {n, Length@inputOrdered}]; (* render *) Grid[Partition[ Table[Row[{ListPlot[{Callout[inputOrdered[[n]][[3]], inputOrdered[[n]][[2]], inputOrdered[[n]][[4]], Appearance -> inputOrdered[[n]][[1]], Sequence @@ inputOrdered[[n]][[5]]]}, PlotRange -> {{-.5, .5}, {-.5, .5}}, AspectRatio -> 1/1.5, ImageSize -> 80, Axes -> False, PlotMarkers -> {""}]}], {n, Length@inputOrdered}], 5, 5, 1, {}], Background -> LightGray, Dividers -> All, FrameStyle -> Directive[Thick, White]]]
Out[1]=

関連する例

de en es fr ko pt-br ru zh