Corr Gauss GP using inherited optim
Corr Gauss GP using inherited optim
Object of R6Class
with methods for fitting GP model.
R6Class
object.
GauPro::GauPro
-> GauPro_Gauss
new()
GauPro_Gauss$new( X, Z, verbose = 0, separable = T, useC = F, useGrad = T, parallel = FALSE, nug = 1e-06, nug.min = 1e-08, nug.est = T, param.est = T, theta = NULL, theta_short = NULL, theta_map = NULL, ... )
corr_func()
GauPro_Gauss$corr_func(x, x2 = NULL, theta = self$theta)
deviance_theta()
GauPro_Gauss$deviance_theta(theta)
deviance_theta_log()
GauPro_Gauss$deviance_theta_log(beta)
deviance()
GauPro_Gauss$deviance(theta = self$theta, nug = self$nug)
deviance_grad()
GauPro_Gauss$deviance_grad( theta = NULL, nug = self$nug, joint = NULL, overwhat = if (self$nug.est) "joint" else "theta" )
deviance_fngr()
GauPro_Gauss$deviance_fngr( theta = NULL, nug = NULL, overwhat = if (self$nug.est) "joint" else "theta" )
deviance_log()
GauPro_Gauss$deviance_log(beta = NULL, nug = self$nug, joint = NULL)
deviance_log2()
GauPro_Gauss$deviance_log2(beta = NULL, lognug = NULL, joint = NULL)
deviance_log_grad()
GauPro_Gauss$deviance_log_grad( beta = NULL, nug = self$nug, joint = NULL, overwhat = if (self$nug.est) "joint" else "theta" )
deviance_log2_grad()
GauPro_Gauss$deviance_log2_grad( beta = NULL, lognug = NULL, joint = NULL, overwhat = if (self$nug.est) "joint" else "theta" )
deviance_log2_fngr()
GauPro_Gauss$deviance_log2_fngr( beta = NULL, lognug = NULL, joint = NULL, overwhat = if (self$nug.est) "joint" else "theta" )
get_optim_functions()
GauPro_Gauss$get_optim_functions(param_update, nug.update)
param_optim_lower()
GauPro_Gauss$param_optim_lower()
param_optim_upper()
GauPro_Gauss$param_optim_upper()
param_optim_start()
GauPro_Gauss$param_optim_start()
param_optim_start0()
GauPro_Gauss$param_optim_start0()
param_optim_jitter()
GauPro_Gauss$param_optim_jitter(param_value)
update_params()
GauPro_Gauss$update_params(restarts, param_update, nug.update)
grad()
GauPro_Gauss$grad(XX)
grad_dist()
GauPro_Gauss$grad_dist(XX)
hessian()
GauPro_Gauss$hessian(XX, useC = self$useC)
print()
GauPro_Gauss$print()
clone()
The objects of this class are cloneable with this method.
GauPro_Gauss$clone(deep = FALSE)
deep
Whether to make a deep clone.
# NOT RUN {
n <- 12
x <- matrix(seq(0,1,length.out = n), ncol=1)
y <- sin(2*pi*x) + rnorm(n,0,1e-1)
gp <- GauPro_Gauss$new(X=x, Z=y, parallel=FALSE)
# }
Run the code above in your browser using DataLab