pkgname <- "depcoeff"
source(file.path(R.home("share"), "R", "examples-header.R"))
options(warn = 1)
options(pager = "console")
library('depcoeff')

base::assign(".oldSearch", base::search(), pos = 'CheckExEnv')
base::assign(".old_wd", base::getwd(), pos = 'CheckExEnv')
cleanEx()
nameEx("kendr")
### * kendr

flush(stderr()); flush(stdout())

### Name: kendr
### Title: Kendall regression coefficient
### Aliases: kendr

### ** Examples

library(MASS)
data <- gilgais
kendr(data[,1:3],data[,4],out=1)



cleanEx()
nameEx("kendrs")
### * kendrs

flush(stderr()); flush(stdout())

### Name: kendrs
### Title: Kendall regression coefficient for split domains
### Aliases: kendrs

### ** Examples

library(MASS)
data<- gilgais
kendrs(data[,1:2],data[,3],splitp=c(0.4,0.6))



cleanEx()
nameEx("spearr")
### * spearr

flush(stderr()); flush(stdout())

### Name: spearr
### Title: Spearman regression coefficient
### Aliases: spearr

### ** Examples

library(MASS)
data <- gilgais
spearr(data[,1:3],data[,4],out=1)



cleanEx()
nameEx("spearrs")
### * spearrs

flush(stderr()); flush(stdout())

### Name: spearrs
### Title: Spearman regression coefficient for split domains
### Aliases: spearrs

### ** Examples

library(MASS)
data<- gilgais
spearrs(data[,1:2],data[,3],splitp=c(0.4,0.6))



cleanEx()
nameEx("zetac")
### * zetac

flush(stderr()); flush(stdout())

### Name: zetac
### Title: Zeta dependence coefficient
### Aliases: zetac

### ** Examples

library(MASS)
data<- gilgais
zetac(data[,1],data[,2])



cleanEx()
nameEx("zetaci")
### * zetaci

flush(stderr()); flush(stdout())

### Name: zetaci
### Title: Zeta coefficient of piecewise monotonicity with split domain
### Aliases: zetaci

### ** Examples

library(MASS)
data<- gilgais
zetaci(data[, 1], data[, 2], a=c(0.25, 0.5, 0.75))



cleanEx()
nameEx("zetapm")
### * zetapm

flush(stderr()); flush(stdout())

### Name: zetapm
### Title: Zeta dependence coefficient of piecewise monotonicity
### Aliases: zetapm

### ** Examples

library(MASS)
data<- gilgais
zetapm(data[,1],data[,2])



### * <FOOTER>
###
cleanEx()
options(digits = 7L)
base::cat("Time elapsed: ", proc.time() - base::get("ptime", pos = 'CheckExEnv'),"\n")
grDevices::dev.off()
###
### Local variables: ***
### mode: outline-minor ***
### outline-regexp: "\\(> \\)?### [*]+" ***
### End: ***
quit('no')