Skip to content

Commit

Permalink
1.3.0 (#8)
Browse files Browse the repository at this point in the history
1.3.0
  • Loading branch information
egarpor authored Dec 4, 2023
1 parent 6609684 commit 3817a1e
Show file tree
Hide file tree
Showing 55 changed files with 3,886 additions and 1,434 deletions.
5 changes: 3 additions & 2 deletions DESCRIPTION
Original file line number Diff line number Diff line change
@@ -1,8 +1,8 @@
Package: sphunif
Type: Package
Title: Uniformity Tests on the Circle, Sphere, and Hypersphere
Version: 1.1.0
Date: 2023-08-19
Version: 1.3.0
Date: 2023-12-04
Authors@R: c(
person(given = "Eduardo", family = "García-Portugués",
role = c("aut", "cre"), email = "[email protected]",
Expand Down Expand Up @@ -32,6 +32,7 @@ Depends:
Rcpp
Imports:
doFuture,
doRNG,
foreach,
future,
gsl,
Expand Down
34 changes: 32 additions & 2 deletions NAMESPACE
Original file line number Diff line number Diff line change
Expand Up @@ -44,13 +44,16 @@ export(cir_stat_Num_uncover)
export(cir_stat_PAD)
export(cir_stat_PCvM)
export(cir_stat_PRt)
export(cir_stat_Poisson)
export(cir_stat_Pycke)
export(cir_stat_Pycke_q)
export(cir_stat_Range)
export(cir_stat_Rao)
export(cir_stat_Rayleigh)
export(cir_stat_Riesz)
export(cir_stat_Rothman)
export(cir_stat_Sobolev)
export(cir_stat_Softmax)
export(cir_stat_Vacancy)
export(cir_stat_Watson)
export(cir_stat_Watson_1976)
Expand Down Expand Up @@ -83,6 +86,7 @@ export(d_cir_stat_Rao)
export(d_cir_stat_Rayleigh)
export(d_cir_stat_Riesz)
export(d_cir_stat_Rothman)
export(d_cir_stat_Sobolev)
export(d_cir_stat_Vacancy)
export(d_cir_stat_Watson)
export(d_cir_stat_Watson_1976)
Expand All @@ -101,6 +105,7 @@ export(d_sph_stat_PRt)
export(d_sph_stat_Rayleigh)
export(d_sph_stat_Rayleigh_HD)
export(d_sph_stat_Riesz)
export(d_sph_stat_Sobolev)
export(d_wschisq)
export(f_locdev)
export(f_locdev_Pn)
Expand Down Expand Up @@ -133,6 +138,7 @@ export(p_cir_stat_Rao)
export(p_cir_stat_Rayleigh)
export(p_cir_stat_Riesz)
export(p_cir_stat_Rothman)
export(p_cir_stat_Sobolev)
export(p_cir_stat_Vacancy)
export(p_cir_stat_Watson)
export(p_cir_stat_Watson_1976)
Expand All @@ -149,6 +155,7 @@ export(p_sph_stat_PRt)
export(p_sph_stat_Rayleigh)
export(p_sph_stat_Rayleigh_HD)
export(p_sph_stat_Riesz)
export(p_sph_stat_Sobolev)
export(p_wschisq)
export(psi_Pn)
export(q_Sobolev)
Expand All @@ -170,10 +177,14 @@ export(sph_stat_Gine_Gn)
export(sph_stat_PAD)
export(sph_stat_PCvM)
export(sph_stat_PRt)
export(sph_stat_Poisson)
export(sph_stat_Pycke)
export(sph_stat_Rayleigh)
export(sph_stat_Rayleigh_HD)
export(sph_stat_Riesz)
export(sph_stat_Sobolev)
export(sph_stat_Softmax)
export(sph_stat_Stereo)
export(sphere_to_angles)
export(uk_to_bk)
export(uk_to_vk2)
Expand All @@ -186,6 +197,25 @@ export(vk2_to_bk)
export(vk2_to_uk)
export(weights_dfs_Sobolev)
import(Rcpp)
import(graphics)
import(stats)
importFrom(graphics,abline)
importFrom(graphics,legend)
importFrom(graphics,lines)
importFrom(graphics,par)
importFrom(graphics,segments)
importFrom(stats,approxfun)
importFrom(stats,dchisq)
importFrom(stats,dgamma)
importFrom(stats,integrate)
importFrom(stats,nlm)
importFrom(stats,pchisq)
importFrom(stats,pgamma)
importFrom(stats,qchisq)
importFrom(stats,qgamma)
importFrom(stats,quantile)
importFrom(stats,rbeta)
importFrom(stats,rchisq)
importFrom(stats,runif)
importFrom(stats,splinefun)
importFrom(stats,uniroot)
importFrom(utils,capture.output)
useDynLib(sphunif)
9 changes: 8 additions & 1 deletion NEWS.md
Original file line number Diff line number Diff line change
Expand Up @@ -13,4 +13,11 @@
* Drop `personList()` and `citEntry()`.
* Fix broken URLs.
* Update `comets` dataset.
* More unit tests.
* More unit tests.

# sphunif 1.3.0

* Add `"Poisson"`, `"Softmax"`, and `"Stereo"` tests.
* Add `"Sobolev"` tests.
* Vectorization of test-specific parameters in `unif_stat()`, `unif_test(p_value = "MC")`, and `unif_stat_MC()`.
* Use `doRNG::%dorng%` in `unif_stat_MC()` and `int_sph_MC()` to fix a bug when `seeds` was not set to `NULL`.
2 changes: 1 addition & 1 deletion R/Pn.R
Original file line number Diff line number Diff line change
Expand Up @@ -789,7 +789,7 @@ f_locdev_Pn <- function(p, type, K = 1e3, N = 320, K_max = 1e4, thre = 1e-3,
f <- function(x) ((x >= x_t) + t) / rotasym::w_p(p = p)

# Exact f for PCvM and p = 2
} else if (type == "PCvM" & p == 2) {
} else if (type == "PCvM" && p == 2) {

f <- function(x) (1 - log(2 * (1 - x)) * sqrt(2) / (2 * pi)) / (2 * pi)

Expand Down
Loading

0 comments on commit 3817a1e

Please sign in to comment.