Skip to content

Commit

Permalink
default value explicitly added for rel tol to suppress warnings
Browse files Browse the repository at this point in the history
  • Loading branch information
markean committed Jan 22, 2024
1 parent c0ca487 commit c5e99a7
Show file tree
Hide file tree
Showing 45 changed files with 50 additions and 48 deletions.
1 change: 1 addition & 0 deletions .Rbuildignore
View file
Original file line number Diff line number Diff line change
Expand Up @@ -8,3 +8,4 @@
^\.github$
^codemeta\.json$
^retel-paper$
^cran-comments\.md$
11 changes: 6 additions & 5 deletions DESCRIPTION
View file
Original file line number Diff line number Diff line change
@@ -1,17 +1,18 @@
Package: retel
Type: Package
Title: Regularized Exponentially Tilted Empirical Likelihood
Version: 0.0.0.9705
Version: 0.0.0.9706
Authors@R: c(
person("Eunseop", "Kim", email = "markean@pm.me",
role = c("aut", "cph", "cre")),
person("Steven", "MacEachern", role = c("ctb", "ths")),
person("Mario", "Peruggia", role = c("ctb", "ths"))
)
Description: Implements regularized exponentially tilted empirical likelihood
methods. Details of the methods are given in Kim, MacEachern, and Peruggia
(2023) <doi:10.48550/arXiv.2312.17015>. This work was supported by the U.S.
National Science Foundation under Grants No. SES-1921523 and DMS-2015552.
Description: Implements the regularized exponentially tilted empirical
likelihood method. Details of the methods are given in Kim, MacEachern, and
Peruggia (2023) <doi:10.48550/arXiv.2312.17015>. This work was supported by
the U.S. National Science Foundation under Grants No. SES-1921523 and
DMS-2015552.
License: GPL (>= 3)
URL: https://github.com/markean/retel
BugReports: https://github.com/markean/retel/issues
Expand Down
2 changes: 1 addition & 1 deletion R/etel.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -69,7 +69,7 @@ etel <- function(fn, x, par, opts = NULL) {
)

if (isTRUE(is.null(opts))) {
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)
} else {
assert_list(opts)
}
Expand Down
2 changes: 1 addition & 1 deletion R/retel.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -188,7 +188,7 @@ retel <- function(fn, x, par, mu, Sigma, tau, type = "full", opts = NULL) {
assert_choice(type, c("full", "reduced"))

if (isTRUE(is.null(opts))) {
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)
} else {
assert_list(opts)
}
Expand Down
2 changes: 1 addition & 1 deletion man/retel-package.Rd
View file

Some generated files are not rendered by default. Learn more about how customized files appear on GitHub.

2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l0/n100s05.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l0/n100s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l0/n100s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l0/n20s05.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l0/n20s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l0/n20s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l0/n50s05.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l0/n50s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l0/n50s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l0/n5s05.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l0/n5s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l0/n5s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l2/n100s05.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l2/n100s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l2/n100s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l2/n20s05.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l2/n20s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l2/n20s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l2/n50s05.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l2/n50s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l2/n50s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l2/n5s05.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l2/n5s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/cr/l2/n5s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ S <- 1e+04L
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/tau1/n100s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/tau1/n100s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/tau1/n20s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/tau1/n20s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/tau1/n50s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/tau1/n50s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/tau1/n5s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/tau1/n5s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/taulogn/n100s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/taulogn/n100s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/taulogn/n20s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/taulogn/n20s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/taulogn/n50s1.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
2 changes: 1 addition & 1 deletion retel-paper/code/simulations/mb/taulogn/n50s5.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ l <- 0
# Grid wing length
w <- 5
# Optimization
opts <- list("algorithm" = "NLOPT_LD_LBFGS")
opts <- list("algorithm" = "NLOPT_LD_LBFGS", "xtol_rel" = 1e-04)


## 4. Functions
Expand Down
Loading

0 comments on commit c5e99a7

Please sign in to comment.