WAPlots Class

Constructors

 * WAPlots

Methods

 * AddDataset( WADataSet )
 * CreatePlot( WAPlotType, [WAPlotSettings], [Integer], [Integer] )
 * CreatePlotVB6( WAPlotType, [WAPlotSettings], [Integer], [Integer] )
 * Clear

Properties

 * ErrorHappened (as boolean)
 * ErrorMessage (as string)

Usage Example
This example demonstrates how to fit a times-to-failure data set to a life distribution and then use the fitted distribution to create a plot. Full application examples are available at Synthesis_API_Reference.

Dim ADS As New WeibullDataSet("DataSet1") WDS.AnalysisSettings.Distribution = WeibullSolverDistribution.Weibull WDS.AnalysisSettings.Parameters = WeibullSolverNumParameters.MS_2Parameter WDS.AnalysisSettings.Analysis = WeibullSolverMethod.MLE WDS.AnalysisSettings.RankingMethod = WeibullSolverRankMethod.Median WDS.AnalysisSettings.UseRSRegression = False WDS.AnalysisSettings.ConfBounds = WeibullSolverCBMethod.FisherMatrix WDS.AnalysisSettings.SortBeforeCalculations = True WDS.AnalysisSettings.UngroupGroupedData = False WDS.AnalysisSettings.UseSpecialSort = True WDS.GeneralSettings.AllowBiasingNormal = False WDS.GeneralSettings.DiscardNegLocation = False WDS.GeneralSettings.ResetExpLocation = False WDS.GeneralSettings.Use3PTrueMLE = False WDS.GeneralSettings.UseExtendedGGamma = False WDS.GeneralSettings.UsePlottedYPoints = False WDS.GeneralSettings.WarnNegLocation = False WDS.AddFailure(16, 1) WDS.AddFailure(34, 1) WDS.AddFailure(53, 1) WDS.AddFailure(75, 1) WDS.AddFailure(93, 1) WDS.AddFailure(120, 1) WDS.AddFailure(120, 4) WDS.Calculate Dim WeibullALTAPlot As New WAPlots Dim NewPlotSettings As New WAPlotSettings NewPlotSettings.UserName = User Name NewPlotSettings.UserCompany = Company NewPlotSettings.AutoscaleX = True NewPlotSettings.AutoscaleY = True NewPlotSettings.ShowTargetReliability = False NewPlotSettings.ShowTargetTime = False NewPlotSettings.ShowTargetMarker = False NewPlotSettings.ShowSuspensionPoints = True NewPlotSettings.ShowLeftCensoredPoints = True NewPlotSettings.ShowLinesAroundInterval = True NewPlotSettings.AdjustMLEPoints = True NewPlotSettings.StraightenGammaLine = True NewPlotSettings.ShowNumberInGroup = True NewPlotSettings.PlotXPrecision = 3 NewPlotSettings.PlotyPrecision = 3 NewPlotSettings.PlotXTolerance = 6 NewPlotSettings.PlotYTolerance = 6 NewPlotSettings.ConfBounds_TypesSelected = ConfBoundsTypes.None WeibullALTAPlot.AddDataset(WDS) Dim PlotPicture as Image PlotPicture = WeibullALTAPlot.CreatePlot(WAPlotType.Reliability, NewPlotSettings)