PowerTools SPREAD for Windows Forms 10.0J
QuartileMethodType 列挙体


四分位数計算タイプを指定します。
構文
'Declaration
 
Public Enum QuartileMethodType 
   Inherits System.Enum
'使用法
 
Dim instance As QuartileMethodType
public enum QuartileMethodType : System.Enum 
メンバ
メンバ説明
ExclusiveN(データに含まれる値の数)が奇数の場合、中央値は計算から除外されます。
InclusiveN(データに含まれる値の数)が奇数の場合、中央値は計算に含まれます。
次のサンプルコードは、QuartileMethodプロパティを設定します。
fpSpread1.ActiveSheet.Cells[0, 1].Text = "Cheese";
fpSpread1.ActiveSheet.Cells[0, 2].Text = "Store1";
fpSpread1.ActiveSheet.Cells[0, 3].Text = "Store2";
fpSpread1.ActiveSheet.Cells[0, 4].Text = "Store3";
fpSpread1.ActiveSheet.Cells[1, 1].Text = "Asiago";
fpSpread1.ActiveSheet.Cells[2, 1].Text = "Gouda";
fpSpread1.ActiveSheet.Cells[3, 1].Text = "Havarti";
fpSpread1.ActiveSheet.Cells[4, 1].Text = "Swiss";
fpSpread1.ActiveSheet.Cells[5, 1].Text = "Asiago";
fpSpread1.ActiveSheet.Cells[6, 1].Text = "Gouda";
fpSpread1.ActiveSheet.Cells[7, 1].Text = "Havarti";
fpSpread1.ActiveSheet.Cells[8, 1].Text = "Swiss";
fpSpread1.ActiveSheet.Cells[9, 1].Text = "Asiago";
fpSpread1.ActiveSheet.Cells[10, 1].Text = "Gouda";
fpSpread1.ActiveSheet.Cells[11, 1].Text = "Havarti";
fpSpread1.ActiveSheet.Cells[12, 1].Text = "Swiss";
fpSpread1.ActiveSheet.Cells[1, 2].Value = 20;
fpSpread1.ActiveSheet.Cells[2, 2].Value = 25;
fpSpread1.ActiveSheet.Cells[3, 2].Value = 21;
fpSpread1.ActiveSheet.Cells[4, 2].Value = 30;
fpSpread1.ActiveSheet.Cells[5, 2].Value = 10;
fpSpread1.ActiveSheet.Cells[6, 2].Value = 26;
fpSpread1.ActiveSheet.Cells[7, 2].Value = 18;
fpSpread1.ActiveSheet.Cells[8, 2].Value = 28;
fpSpread1.ActiveSheet.Cells[9, 2].Value = 12;
fpSpread1.ActiveSheet.Cells[10, 2].Value = 20;
fpSpread1.ActiveSheet.Cells[11, 2].Value = 17;
fpSpread1.ActiveSheet.Cells[12, 2].Value = 35;
fpSpread1.ActiveSheet.Cells[1, 3].Value = 15;
fpSpread1.ActiveSheet.Cells[2, 3].Value = 18;
fpSpread1.ActiveSheet.Cells[3, 3].Value = 19;
fpSpread1.ActiveSheet.Cells[4, 3].Value = 22;
fpSpread1.ActiveSheet.Cells[5, 3].Value = 10;
fpSpread1.ActiveSheet.Cells[6, 3].Value = 19;
fpSpread1.ActiveSheet.Cells[7, 3].Value = 15;
fpSpread1.ActiveSheet.Cells[8, 3].Value = 25;
fpSpread1.ActiveSheet.Cells[9, 3].Value = 14;
fpSpread1.ActiveSheet.Cells[10, 3].Value = 19;
fpSpread1.ActiveSheet.Cells[11, 3].Value = 16;
fpSpread1.ActiveSheet.Cells[12, 3].Value = 24;
fpSpread1.ActiveSheet.Cells[1, 4].Value = 5;
fpSpread1.ActiveSheet.Cells[2, 4].Value = 12;
fpSpread1.ActiveSheet.Cells[3, 4].Value = 20;
fpSpread1.ActiveSheet.Cells[4, 4].Value = 25;
fpSpread1.ActiveSheet.Cells[5, 4].Value = 8;
fpSpread1.ActiveSheet.Cells[6, 4].Value = 10;
fpSpread1.ActiveSheet.Cells[7, 4].Value = 11;
fpSpread1.ActiveSheet.Cells[8, 4].Value = 22;
fpSpread1.ActiveSheet.Cells[9, 4].Value = 13;
fpSpread1.ActiveSheet.Cells[10, 4].Value = 12;
fpSpread1.ActiveSheet.Cells[11, 4].Value = 15;
fpSpread1.ActiveSheet.Cells[12, 4].Value = 21;
fpSpread1.ActiveSheet.AddChart(new FarPoint.Win.Spread.Model.CellRange(0, 1, 13, 4), typeof(FarPoint.Win.Chart.ClusteredBoxWhiskerSeries), 550, 450, 300, 0);

FarPoint.Win.Chart.ClusteredBoxWhiskerSeries cboxseries = (FarPoint.Win.Chart.ClusteredBoxWhiskerSeries)fpSpread1.Sheets[0].Charts[0].Model.PlotAreas[0].Series[0];
foreach (FarPoint.Win.Chart.BoxWhiskerSeries boxseries in cboxseries.Series)
{
    boxseries.QuartileMethod = FarPoint.Win.Chart.QuartileMethodType.Exclusive;
}
FpSpread1.ActiveSheet.Cells(0, 1).Text = "Cheese"
FpSpread1.ActiveSheet.Cells(0, 2).Text = "Store1"
FpSpread1.ActiveSheet.Cells(0, 3).Text = "Store2"
FpSpread1.ActiveSheet.Cells(0, 4).Text = "Store3"
FpSpread1.ActiveSheet.Cells(1, 1).Text = "Asiago"
FpSpread1.ActiveSheet.Cells(2, 1).Text = "Gouda"
FpSpread1.ActiveSheet.Cells(3, 1).Text = "Havarti"
FpSpread1.ActiveSheet.Cells(4, 1).Text = "Swiss"
FpSpread1.ActiveSheet.Cells(5, 1).Text = "Asiago"
FpSpread1.ActiveSheet.Cells(6, 1).Text = "Gouda"
FpSpread1.ActiveSheet.Cells(7, 1).Text = "Havarti"
FpSpread1.ActiveSheet.Cells(8, 1).Text = "Swiss"
FpSpread1.ActiveSheet.Cells(9, 1).Text = "Asiago"
FpSpread1.ActiveSheet.Cells(10, 1).Text = "Gouda"
FpSpread1.ActiveSheet.Cells(11, 1).Text = "Havarti"
FpSpread1.ActiveSheet.Cells(12, 1).Text = "Swiss"
FpSpread1.ActiveSheet.Cells(1, 2).Value = 20
FpSpread1.ActiveSheet.Cells(2, 2).Value = 25
FpSpread1.ActiveSheet.Cells(3, 2).Value = 21
FpSpread1.ActiveSheet.Cells(4, 2).Value = 30
FpSpread1.ActiveSheet.Cells(5, 2).Value = 10
FpSpread1.ActiveSheet.Cells(6, 2).Value = 26
FpSpread1.ActiveSheet.Cells(7, 2).Value = 18
FpSpread1.ActiveSheet.Cells(8, 2).Value = 28
FpSpread1.ActiveSheet.Cells(9, 2).Value = 12
FpSpread1.ActiveSheet.Cells(10, 2).Value = 20
FpSpread1.ActiveSheet.Cells(11, 2).Value = 17
FpSpread1.ActiveSheet.Cells(12, 2).Value = 35
FpSpread1.ActiveSheet.Cells(1, 3).Value = 15
FpSpread1.ActiveSheet.Cells(2, 3).Value = 18
FpSpread1.ActiveSheet.Cells(3, 3).Value = 19
FpSpread1.ActiveSheet.Cells(4, 3).Value = 22
FpSpread1.ActiveSheet.Cells(5, 3).Value = 10
FpSpread1.ActiveSheet.Cells(6, 3).Value = 19
FpSpread1.ActiveSheet.Cells(7, 3).Value = 15
FpSpread1.ActiveSheet.Cells(8, 3).Value = 25
FpSpread1.ActiveSheet.Cells(9, 3).Value = 14
FpSpread1.ActiveSheet.Cells(10, 3).Value = 19
FpSpread1.ActiveSheet.Cells(11, 3).Value = 16
FpSpread1.ActiveSheet.Cells(12, 3).Value = 24
FpSpread1.ActiveSheet.Cells(1, 4).Value = 5
FpSpread1.ActiveSheet.Cells(2, 4).Value = 12
FpSpread1.ActiveSheet.Cells(3, 4).Value = 20
FpSpread1.ActiveSheet.Cells(4, 4).Value = 25
FpSpread1.ActiveSheet.Cells(5, 4).Value = 8
FpSpread1.ActiveSheet.Cells(6, 4).Value = 10
FpSpread1.ActiveSheet.Cells(7, 4).Value = 11
FpSpread1.ActiveSheet.Cells(8, 4).Value = 22
FpSpread1.ActiveSheet.Cells(9, 4).Value = 13
FpSpread1.ActiveSheet.Cells(10, 4).Value = 12
FpSpread1.ActiveSheet.Cells(11, 4).Value = 15
FpSpread1.ActiveSheet.Cells(12, 4).Value = 21
FpSpread1.ActiveSheet.AddChart(New FarPoint.Win.Spread.Model.CellRange(0, 1, 13, 4), GetType(FarPoint.Win.Chart.ClusteredBoxWhiskerSeries), 550, 450, 300, 0)
Dim cboxseries As FarPoint.Win.Chart.ClusteredBoxWhiskerSeries = DirectCast(FpSpread1.Sheets(0).Charts(0).Model.PlotAreas(0).Series(0), FarPoint.Win.Chart.ClusteredBoxWhiskerSeries)
For Each boxseries As FarPoint.Win.Chart.BoxWhiskerSeries In cboxseries.Series
    boxseries.QuartileMethod = FarPoint.Win.Chart.QuartileMethodType.Exclusive
Next
継承階層

System.Object
   System.ValueType
      System.Enum
         FarPoint.Win.Chart.QuartileMethodType

参照

FarPoint.Win.Chart 名前空間

 

 


© 2004-2017, GrapeCity inc. All rights reserved.