WeibullDataSet.Calculate: Difference between revisions

From ReliaWiki
Jump to navigation Jump to search
No edit summary
No edit summary
 
(11 intermediate revisions by the same user not shown)
Line 2: Line 2:




<onlyinclude>Estimates the parameters of the data set, based on the settings specified in the <code>AnalysisSettings</code> property of the class. If no data set has been specified, you will be prompted to enter the parameters for the specified distribution. Returns a message box that shows the values of the parameters.</onlyinclude>
<onlyinclude>Fits a life distribution to the current data set and creates a [[CModel Class|cModel]] object that represents the fitted model.</onlyinclude>
 
In addition, the method automatically creates a retrievable [[CModel Class|cModel]] object that represents the fitted model from the life data analysis.




'''Remarks''': To specify the distribution, parameter estimation method and other analysis settings, use the <code>AnalysisSettings</code> and <code>GeneralSettings</code> properties of the object. To return the <code>cModel</code> object that is produced, use the <code>FittedModel</code> property of the <code>WeibullDataSet</code> object.


== Syntax  ==
== Syntax  ==
Line 13: Line 12:


== Example ==
== Example ==
  '''VB.NET'''
  '''VBA'''
   
   
  {{APIComment|'Declare a new WeibullDataSet object.}}  
  {{APIComment|'Declare a new WeibullDataSet object.}}  
Line 23: Line 22:
   {{APIPrefix|Call}} WDS.AddFailure(130, 1)   
   {{APIPrefix|Call}} WDS.AddFailure(130, 1)   
    
    
  {{APIComment|'Set the life distribution.}}
  {{APIComment|'Set the life distribution. Leave all other settings at default.}}
   WDS.AnalysisSettings.Distribution = WeibullSolverDistribution_Weibull
   WDS.AnalysisSettings.Distribution = WeibullSolverDistribution_Weibull
   WDS.AnalysisSettings.Parameters = WeibullSolverNumParameters_MS_2Parameter
   WDS.AnalysisSettings.Parameters = WeibullSolverNumParameters_MS_2Parameter
    
    
  {{APIComment|'Fit the data to the life distribution, using all default analysis settings.}}
  {{APIComment|'Analyze the data set.}}
   WDS.Calculate()
   WDS.Calculate()
 
{{APIComment|'Retrieve the fitted life distribution model.}}
  {{APIPrefix|Dim}} model {{APIPrefix|As}} cModel
  {{APIPrefix|Set}} model = WDS.FittedModel
   
   
  {{APIComment|'Using the model, calculate the reliability at 100 hrs and display the result.}}
  {{APIComment|'Calculate the reliability at 100 hrs and display the result.}}
   {{APIPrefix|Dim}} r {{APIPrefix|As}} Double
   {{APIPrefix|Dim}} r {{APIPrefix|As}} Double
   r = model.reliability(100)
   r = WDS.FittedModel.Reliability(100)
   MsgBox({{APIString|"Reliability at 100 hrs: "}} & r)
   MsgBox({{APIString|"Reliability at 100 hrs: "}} & r)


Line 49: Line 44:
   WDS.AddFailure(130, 1)   
   WDS.AddFailure(130, 1)   
    
    
  {{APIComment|'Set the life distribution.}}
  {{APIComment|'Set the life distribution. Leave all other settings at default.}}
   WDS.AnalysisSettings.Distribution = WeibullSolverDistribution.Weibull
   WDS.AnalysisSettings.Distribution = WeibullSolverDistribution.Weibull
   WDS.AnalysisSettings.Parameters = WeibullSolverNumParameters.MS_2Parameter
   WDS.AnalysisSettings.Parameters = WeibullSolverNumParameters.MS_2Parameter
    
    
  {{APIComment|'Fit the data to the life distribution, using all default analysis settings.}}
  {{APIComment|'Analyze the data set.}}
   WDS.Calculate()
   WDS.Calculate()
    
    
  {{APIComment|'Retrieve the fitted life distribution model.}}
  {{APIComment|'Calculate the reliability at 100 hrs and display the result.}}
  {{APIPrefix|Dim}} model {{APIPrefix|As}} cModel
  model = WDS.FittedModel
{{APIComment|'Using the model, calculate the reliability at 100 hrs and display the result.}}
   {{APIPrefix|Dim}} r {{APIPrefix|As}} Double
   {{APIPrefix|Dim}} r {{APIPrefix|As}} Double
   r = model.reliability(100)
   r = WDS.FittedModel.Reliability(100)
   MsgBox({{APIString|"Reliability at 100 hrs: "}} & r)
   MsgBox({{APIString|"Reliability at 100 hrs: "}} & r)

Latest revision as of 22:23, 4 May 2017

APIWiki.png


Member of: SynthesisAPI.WeibullDataSet


Fits a life distribution to the current data set and creates a cModel object that represents the fitted model.


Remarks: To specify the distribution, parameter estimation method and other analysis settings, use the AnalysisSettings and GeneralSettings properties of the object. To return the cModel object that is produced, use the FittedModel property of the WeibullDataSet object.

Syntax

.Calculate


Example

VBA

 'Declare a new WeibullDataSet object.  
  Dim WDS As New WeibullDataSet
  
 'Add failure times to the data set. 
  Call WDS.AddFailure(100, 1)
  Call WDS.AddFailure(120, 1)
  Call WDS.AddFailure(130, 1)  
 
 'Set the life distribution. Leave all other settings at default. 
  WDS.AnalysisSettings.Distribution = WeibullSolverDistribution_Weibull
  WDS.AnalysisSettings.Parameters = WeibullSolverNumParameters_MS_2Parameter
 
 'Analyze the data set. 
  WDS.Calculate()

 'Calculate the reliability at 100 hrs and display the result. 
  Dim r As Double
  r = WDS.FittedModel.Reliability(100)
  MsgBox("Reliability at 100 hrs: " & r)

VB.NET

 'Declare a new WeibullDataSet object.  
  Dim WDS As New WeibullDataSet
  
 'Add failure times to the data set. 
  WDS.AddFailure(100, 1)
  WDS.AddFailure(120, 1)
  WDS.AddFailure(130, 1)  
 
 'Set the life distribution. Leave all other settings at default. 
  WDS.AnalysisSettings.Distribution = WeibullSolverDistribution.Weibull
  WDS.AnalysisSettings.Parameters = WeibullSolverNumParameters.MS_2Parameter
 
 'Analyze the data set. 
  WDS.Calculate()
  
 'Calculate the reliability at 100 hrs and display the result. 
  Dim r As Double
  r = WDS.FittedModel.Reliability(100)
  MsgBox("Reliability at 100 hrs: " & r)
Retrieved from "https://www.reliawiki.com/index.php?title=WeibullDataSet.Calculate&oldid=65078"