lognormaldistribution.aspx

来自「掌握学习.net开发的非常好的资料」· ASPX 代码 · 共 72 行

ASPX
72
字号
<%@ Page Language="VB" Description="dotnetCHARTING Component" %>
<%@ Register TagPrefix="dotnet"  Namespace="dotnetCHARTING" Assembly="dotnetCHARTING"%>
<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Drawing.Drawing2D" %>
<%@ Import Namespace="dotnetCHARTING"%>

<HTML>
	<HEAD>
		<TITLE>.netCHARTING Sample</TITLE>
		<script runat="server">


Sub Page_Load(sender As [Object], e As EventArgs)
   
   ' This sample demonstrates the use of LognormalDistribution method from the StatisticalEngine. This method return the lognormal distribution for a series when the standard deviation is known. 
   
   ' The Probability Chart
   ProbabilityChart.Title = "Lognormal distribution"
   ProbabilityChart.TempDirectory = "temp"
   ProbabilityChart.Debug = True
   ProbabilityChart.Size = "800x400"
   ProbabilityChart.LegendBox.Template = "%icon %name"
   'ProbabilityChart.XAxis.Scale = Scale.Normal;
   ProbabilityChart.TitleBox.Position = TitleBoxPosition.FullWithLegend
   ProbabilityChart.DefaultSeries.DefaultElement.Marker.Visible = True
   ProbabilityChart.DefaultSeries.Type = SeriesType.Spline
   ProbabilityChart.ChartAreaLayout.Mode = ChartAreaLayoutMode.Vertical
   
   Dim sprobability As New SeriesCollection()
   
   ' Generate the sample data.
   Dim sampledata1 As New Series("Sample Data")
   sampledata1.Elements.Add(New Element("", 13.5, 5.0))
   sampledata1.Elements.Add(New Element("", 31.3, 10.0))
   sampledata1.Elements.Add(New Element("", 54.8, 20.0))
   sampledata1.Elements.Add(New Element("", 75.9, 30.0))
   sampledata1.Elements.Add(New Element("", 94.3, 50.0))
   sampledata1.Elements.Add(New Element("", 99.9, 100.0))
   sampledata1.Elements.Add(New Element("", 100.0, 200.0))
   sampledata1.Elements.Add(New Element("", 110.0, 500.0))
   sampledata1.Elements.Add(New Element("", 120.0, 1000.0))
   sprobability.Add(sampledata1)
   
   ' Add the series collection to the chart
   ProbabilityChart.SeriesCollection.Add(sprobability)
   
   ' Create a new chart area for the lognormal distribution.
   Dim lognormalChartArea As New ChartArea("Lognormal")
   lognormalChartArea.HeightPercentage = 30
   lognormalChartArea.YAxis = New Axis()
   lognormalChartArea.XAxis = New Axis()
   ProbabilityChart.ExtraChartAreas.Add(lognormalChartArea)
   
   ' The second parameter of this method is the standard deviation of the normal probability distribution
   Dim lognormalDistribution As Series = StatisticalEngine.LognormalDistribution(sampledata1, 33)
   lognormalDistribution.Type = SeriesType.Spline
   lognormalDistribution.DefaultElement.ToolTip = "Y:%YValue"
   lognormalChartArea.SeriesCollection.Add(lognormalDistribution)
End Sub 'Page_Load 

		</script>
	</HEAD>
	<BODY>
		<DIV align="center">
			
			<dotnet:Chart id="ProbabilityChart" runat="server"/>
			</dotnet:Chart>
			
		</DIV>
	</BODY>
</HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?