R/runif.wedge.R
In baddstats/spherstat: Spatial Point Pattern Analysis, Geometry and Trigonometry for the Sphere
Defines functions
runif.wedge
Documented in
runif.wedge
runif.wedge <- function(n, win) {
stopifnot(inherits(win, "sphwin") && win$type == "wedge")
theta <- acos(runif(n, -1, 1))
phi1 <- runif(n, 0, win$param[1])
phi.rot1 <- (phi1 + win$param[2]) %% (2*pi)
output <- rot.sphere(cbind(theta, phi.rot1), northpole=win$ref, inverse=TRUE)
output
}
baddstats/spherstat documentation built on Feb. 6, 2023, 1:45 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Defines functions runif.wedge
Documented in runif.wedge
runif.wedge <- function(n, win) {
stopifnot(inherits(win, "sphwin") && win$type == "wedge")
theta <- acos(runif(n, -1, 1))
phi1 <- runif(n, 0, win$param[1])
phi.rot1 <- (phi1 + win$param[2]) %% (2*pi)
output <- rot.sphere(cbind(theta, phi.rot1), northpole=win$ref, inverse=TRUE)
output
}
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.