Fault_plane()
extracts the orientation of the fault plane,
Fault_slip()
extracts the orientation of the slip vector, and
Fault_rake()
extracts the rake of the fault. i.e. the angle between fault slip vector and fault strike.
Examples
f <- Fault(c(120, 120, 100), c(60, 60, 50), c(110, 25, 30), c(58, 9, 23), c(1, -1, 1))
Fault_plane(f)
#> dip_direction dip
#> [1,] 120 60
#> [2,] 120 60
#> [3,] 100 50
#> attr(,"class")
#> [1] "plane"
Fault_slip(f)
#> azimuth plunge
#> [1,] 110 58
#> [2,] 25 9
#> [3,] 30 23
#> attr(,"class")
#> [1] "line"
Fault_rake(f)
#> [1] 84.72020 -10.28562 30.11825