bearings: Bearings Faults Detection Data

bearingsR Documentation

Bearings Faults Detection Data


These data are the results of the extraction process from the vibrational data of healthy and faulty bearings. Different faults are considered: faultless (1), defect on outer race (2), defect on inner race (3) and defect on ball (4). The extracted features are: root mean square (RMS), square root of the amplitude (SRA), kurtosis value (KV), skewness value (SV), peak to peak value (PPV), crest factor (CF), impulse factor (IF), margin factor (MF), shape factor (SF), kurtosis factor (KF), frequency centre (FC), root mean square frequency (RMSF) and root variance frequency (RVF).




bearings is a data frame with 1906 cases (rows) and 14 variables (columns) named:

  1. RMS continuous.

  2. SRA continuous.

  3. KV continuous.

  4. SV continuous.

  5. PPV continuous.

  6. CF continuous.

  7. IF continuous.

  8. MF continuous.

  9. SF continuous.

  10. KF continuous.

  11. FC continuous.

  12. RMSF continuous.

  13. RVF continuous.

  14. Class discrete 1, 2, 3 or 4.


Case Western Reserve University Bearing Data Center Website


B. Panic, J. Klemenc and M. Nagode. Gaussian mixture model based classification revisited: Application to the bearing fault classification. Journal of Mechanical Engineering, 66(4):215-226, 2020. doi: 10.5545/sv-jme.2020.6563.


## Not run: 

# Split dataset into train (75


Bearings <- split(p = 0.75, Dataset = bearings, class = 14)

# Estimate number of components, component weights and component
# parameters for train subsets.

bearingsest <- REBMIX(model = "REBMVNORM",
  Dataset = a.train(Bearings),
  Preprocessing = "histogram",
  cmax = 15,
  Criterion = "BIC")

# Classification.

bearingscla <- RCLSMIX(model = "RCLSMVNORM",
  x = list(bearingsest),
  Dataset = a.test(Bearings),
  Zt = a.Zt(Bearings))



## End(Not run)

rebmix documentation built on Aug. 18, 2022, 1:06 a.m.