利用數學中的「填寫」功能時，我怎樣才能改變邊緣線的顏色？

在Mathematica中使用填充功能時，我想改變邊線的樣式，它的方式有： a）與填充/無邊線相同的顏色 b）它將被覆蓋/覆蓋由另一條曲線用來框填充爲邊緣線。利用數學中的「填寫」功能時，我怎樣才能改變邊緣線的顏色？

爲餡當前代碼如下：

fill1 = Plot[{demand1[t1], demand1[t34]}, {t1, 0, t34}, 
Filling -> {1 -> {2}}, 
FillingStyle -> Directive[LightGray]];

編輯：我已經調整了我的第二個問題（現在被標記粗體），因爲它不是在第一個版本清晰插入「剩餘截圖「問題 enter image description here

來源

2012-09-05 user1426522

這裏的Cos &仙線彩色同爲餡，和他們躺在下面的另一條線，如果這就是你的‘邊緣’的意思。

Show[Plot[{Cos[x], Sin[x]}, {x, 0, 2 Pi}, Filling -> {1 -> {2}}, 
    FillingStyle -> Directive[LightGray], PlotStyle -> LightGray], 
Plot[Sech[x], {x, 0, 2 Pi}]]

enter image description here

附錄

感謝接受。這裏有一個更全面的答案，以下您的編輯：

Show[Plot[{Sech[x], 
    If[Sech[x] > 0.8, 0.8], 
    If[Sech[x] > 0.5, 0.5], 
    If[Sech[x] > 0.3, 0.3], 
    If[0.5 > Sech[x] > 0.3, Sech[x]]}, 
    {x, 0, 2 Pi}, Filling -> {1 -> {2}, 3 -> {4}, 4 -> {5}}, 
    FillingStyle -> LightGray, PlotStyle -> LightGray], 
Plot[Sech[x], {x, 0, 2 Pi}, PlotStyle -> Gray], 
Plot[If[0.3 > Sech[x], Sech[x]], {x, 0, 2 Pi}, 
    PlotStyle -> Directive[{Thick, Black}]], 
Plot[If[0.8 > Sech[x] > 0.5, Sech[x]], {x, 0, 2 Pi}, 
    PlotStyle -> Directive[{Thick, Black}]], 
Map[Graphics[Style[Line[{ 
     {ArcSech[#], 0}, {ArcSech[#], #}}], 
    Thick, Dashed, Antialiasing -> False]] &, 
    {0.8, 0.5, 0.3}]]

enter image description here

來源

2012-09-05 11:47:21

，謝謝，我已經調整的問題。第一部分正是我問 – user1426522

OK，理解。這是內「秀」定義的順序說謊下面有什麼 – user1426522

利用數學中的「填寫」功能時，我怎樣才能改變邊緣線的顏色？

回答

相關問題