WAPlots Class: Difference between revisions

From ReliaWiki
Jump to navigation Jump to search
Line 18: Line 18:
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#Application_Examples]].  
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#Application_Examples]].  


  {{APIComment|'Initialize a new WeibullDataSet object}}
  {{APIComment|'Initialize a new WeibullDataSet object. See [[WeibullDataSet Class|WeibullDataSet]].}}
   Dim ADS As New WeibullDataSet("DataSet1")
   Dim ADS As New WeibullDataSet("DataSet1")
    
    
  {{APIComment|'Set life distribution}}
  {{APIComment|'Set the life distribution.}}
   WDS.AnalysisSettings.Distribution = WeibullSolverDistribution.Weibull
   WDS.AnalysisSettings.Distribution = WeibullSolverDistribution.Weibull
   WDS.AnalysisSettings.Parameters = WeibullSolverNumParameters.MS_2Parameter
   WDS.AnalysisSettings.Parameters = WeibullSolverNumParameters.MS_2Parameter
    
    
  {{APIComment|'Set applicable analysis settings}}
  {{APIComment|'Set the applicable analysis settings.}}
   WDS.AnalysisSettings.Analysis = WeibullSolverMethod.MLE
   WDS.AnalysisSettings.Analysis = WeibullSolverMethod.MLE
   WDS.AnalysisSettings.RankingMethod = WeibullSolverRankMethod.Median
   WDS.AnalysisSettings.RankingMethod = WeibullSolverRankMethod.Median
Line 33: Line 33:
   WDS.AnalysisSettings.UngroupGroupedData = False
   WDS.AnalysisSettings.UngroupGroupedData = False
    
    
  {{APIComment|'Set Application Setup options}}  
  {{APIComment|'Set the Application Setup options.}}  
   WDS.AnalysisSettings.UseSpecialSort = True
   WDS.AnalysisSettings.UseSpecialSort = True
   WDS.GeneralSettings.AllowBiasingNormal = False
   WDS.GeneralSettings.AllowBiasingNormal = False
Line 43: Line 43:
   WDS.GeneralSettings.WarnNegLocation = False
   WDS.GeneralSettings.WarnNegLocation = False
    
    
  {{APIComment|'Add failure times}}
  {{APIComment|'Add failure times.}}
   WDS.AddFailure(16, 1)
   WDS.AddFailure(16, 1)
   WDS.AddFailure(34, 1)
   WDS.AddFailure(34, 1)
Line 51: Line 51:
   WDS.AddFailure(120, 1)
   WDS.AddFailure(120, 1)
    
    
  {{APIComment|'Add 4 suspensions}}
  {{APIComment|'Add 4 suspensions.}}
   WDS.AddFailure(120, 4)
   WDS.AddFailure(120, 4)
    
    
  {{APIComment|'Fit failure times to the specified distribution}}
  {{APIComment|'Fit failure times to the specified distribution.}}
   WDS.Calculate()
   WDS.Calculate()
    
    
  {{APIComment|'Create and populate a new WAPlotSettings object with customized plot settings. See [[WAPlotSettings Class|WAPlotSettings]].}}
  {{APIComment|'Create a WAPlots object. See [[WAPlots Class|WAPlots]].}}
  Dim WeibullALTAPlot As New WAPlots
 
{{APIComment|'Initialize a new WAPlotSettings object with customized plot settings. See [[WAPlotSettings Class|WAPlotSettings]].}}
   Dim NewPlotSettings As New WAPlotSettings
   Dim NewPlotSettings As New WAPlotSettings
   NewPlotSettings.UserName = User Name
   NewPlotSettings.UserName = User Name
Line 77: Line 80:
   NewPlotSettings.PlotYTolerance = 6
   NewPlotSettings.PlotYTolerance = 6
   NewPlotSettings.ConfBounds_TypesSelected = ConfBoundsTypes.None
   NewPlotSettings.ConfBounds_TypesSelected = ConfBoundsTypes.None
 
{{APIComment|'Create a WAPlots object.}}
  Dim WeibullALTAPlot As New WAPlots
 
  {{APIComment|'Add the WeibullDataSet to the WAPlots object.}}
  {{APIComment|'Add the WeibullDataSet to the WAPlots object.}}
   WeibullALTAPlot.AddDataset(WDS)
   WeibullALTAPlot.AddDataset(WDS)
Line 87: Line 86:
   Dim PlotPicture as Image
   Dim PlotPicture as Image
    
    
  {{APIComment|'Create an image image of a reliability vs. time plot and save}}
  {{APIComment|'Create an image of a reliability vs. time plot and save}}
  {{APIComment|'it in PlotPicture using the customized plot settings.}}
  {{APIComment|'it in PlotPicture using the customized plot settings.}}
   PlotPicture = WeibullALTAPlot.CreatePlot(WAPlotType.Reliability, NewPlotSettings)
   PlotPicture = WeibullALTAPlot.CreatePlot(WAPlotType.Reliability, NewPlotSettings)

Revision as of 17:31, 28 April 2014


Creates a plot based on a fitted model in a WeibullDataSet or ALTADataSet object.

Constructors

  • WAPlots Creates a new WAPlots object.

Methods

Properties

  • ErrorHappened (as boolean) Whether an error happened during the creation of the plot.
  • ErrorMessage (as string) The error that happened during the creation of the plot. Set only if ErrorHappened is true.

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#Application_Examples.

 'Initialize a new WeibullDataSet object. See WeibullDataSet. 
 Dim ADS As New WeibullDataSet("DataSet1")
 
 'Set the life distribution. 
 WDS.AnalysisSettings.Distribution = WeibullSolverDistribution.Weibull
 WDS.AnalysisSettings.Parameters = WeibullSolverNumParameters.MS_2Parameter
 
 'Set the applicable analysis settings. 
 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
 
 'Set the Application Setup options.  
 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
 
 'Add failure times. 
 WDS.AddFailure(16, 1)
 WDS.AddFailure(34, 1)
 WDS.AddFailure(53, 1)
 WDS.AddFailure(75, 1)
 WDS.AddFailure(93, 1)
 WDS.AddFailure(120, 1)
 
 'Add 4 suspensions. 
 WDS.AddFailure(120, 4)
 
 'Fit failure times to the specified distribution. 
 WDS.Calculate()
 
 'Create a WAPlots object. See WAPlots. 
 Dim WeibullALTAPlot As New WAPlots
 
 'Initialize a new WAPlotSettings object with customized plot settings. See WAPlotSettings. 
 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
 'Add the WeibullDataSet to the WAPlots object. 
 WeibullALTAPlot.AddDataset(WDS)
 
 'Define an image object to store the plot picture. 
 Dim PlotPicture as Image
 
 'Create an image of a reliability vs. time plot and save 
 'it in PlotPicture using the customized plot settings. 
 PlotPicture = WeibullALTAPlot.CreatePlot(WAPlotType.Reliability, NewPlotSettings)