WeibullDataSet.CalculateBestFit

This is equivalent to clicking the Implement button in the Distribution Wizard.

Syntax

 * CalculateBestFit

Usage Example
Dim WDS As New WeibullDataSet("AddFailure_Example") WDS.AddFailure(100, 1) WDS.AddFailure(120, 1) WDS.AddFailure(130, 1) WDS.BestFitSettings.AllowExponential1 = False WDS.BestFitSettings.AllowExponential2 = False WDS.BestFitSettings.AllowNormal = True WDS.BestFitSettings.AllowLognormal = True WDS.BestFitSettings.AllowWeibull2 = True WDS.BestFitSettings.AllowWeibull3 = False WDS.BestFitSettings.AllowGamma = False WDS.BestFitSettings.AllowGenGamma = False WDS.BestFitSettings.AllowLogistic = False WDS.BestFitSettings.AllowLoglogistic = False WDS.BestFitSettings.AllowGumbel = False WDS.CalculateBestFit Dim model As cModel model = WDS.FittedModel