Decomposition of Orientation Tensor Eigenvectors and Eigenvalues
Usage
ot_eigen(x, scaled = FALSE, ...)
# S3 method for class 'spherical'
ot_eigen(x, scaled = FALSE, ...)
# S3 method for class 'ortensor'
ot_eigen(x, scaled = FALSE, ...)Arguments
- x
either an object of class
"Vec3","Line","Ray","Plane","Pair", or"Fault"where the rows are the observations and the columns are the coordinates, or an"ortensor"object.- scaled
logical. Whether the Eigenvectors should be scaled by the Eigenvalues (only effective if
xis in Cartesian coordinates).- ...
additional arguments passed to
ortensor()(ignored ifxis"ortensor"object).
See also
Other ortensor:
ortensor(),
strain_shape
Examples
set.seed(20250411)
mu <- rvmf(n = 1)
x <- rfb(100, mu = mu, k = 1, A = diag(c(10, 0, 0)))
x_eigen <- ot_eigen(x)
x_eigen
#> eigen() decomposition
#> $values
#> [1] 0.52003742 0.43916696 0.04079562
#>
#> $vectors
#> Vector (Vec3) object (n = 3):
#> x y z
#> [1,] 0.9203280 0.09708585 -0.3789073
#> [2,] 0.2648052 0.55830774 0.7862383
#> [3,] 0.2878795 -0.82393374 0.4881174
#>
plot(x, col = "grey")
points(mu, col = 4)
text(mu, labels = "Mean", col = 4, pos = 4)
points(x_eigen$vectors, col = c(1, 2, 3))
text(x_eigen$vectors, col = c(1, 2, 3), labels = c("E1", "E2", "E3"), pos = 4)
