hloop: Evaluation of hysteresis loop range and mean values

In ShinsukeSakai0321/HL:

Evaluation of hysteresis loop range and mean values

Description

Hysteresis loop algorithm which is equivalent to rain-flow algorithm is applied to the vector of peak values and the combination of half-range and mean values are returned.

Usage

hloop(Peak)

Arguments

Peak	Vector of peak values

Author(s)

Shinsuke Sakai

See Also

PeakCalc command. Concerning HL algorithm, refer to the following text book. "Kyoudo no toukei teki toriatsukai" Hiroyuki Okamura, Hiroshi Itagaki, Baifukan

Examples

wave<-c(5e-3,3.2e-2,3.8e-2,-3.3e-2,-1.9e-2,-1e-2,1e-3,-8e-3,-2e-2,1e-2,-1e-3,4e-3,1.1e-2,-1e-3,-7e-3,-2e-3)
pk<-PeakCalc(Wave=wave)
hloop(Peak=pk)
#Expected results
       range         mean
1 0.02198929 -0.009969643
2 0.02198929 -0.009969643
3 0.01238186  0.004909680
4 0.01238186  0.004909680
5 0.08263671  0.003540413
6 0.04894241 -0.013306734
7 0.01817584  0.002076555

ShinsukeSakai0321/HL documentation built on July 17, 2022, 5:49 a.m.