Bivariate Frank Copula: Some More Results on Point Estimation of the Association Parameter from a Bayesian Perspective and Revisiting the Goodness of Fit Tests with an Application to Model Groundwater Data from Dong Thap, Vietnam
Extracted source text · arXiv 2605.06496
\documentclass[12pt]{article}
% ===== Packages =====
\usepackage[utf8]{inputenc}
\usepackage[a4paper, margin=1in]{geometry}
\usepackage{amsmath,amssymb,bm, nccmath}
\usepackage{graphicx,float}
\usepackage{booktabs,adjustbox,capt-of,afterpage}
\usepackage{array,ragged2e,makecell,multirow,tabularx}
\usepackage{titlesec}
\usepackage{enumitem}
\usepackage{listings}
\usepackage[normalem]{ulem}
\usepackage{accents,calc,tikz,chngcntr}
\usepackage{cite}
\usepackage{authblk}
\usepackage{caption, subcaption}
\usepackage{indentfirst}
\usepackage{longtable}
\usepackage[ruled,vlined]{algorithm2e}
\captionsetup[table]{labelsep=space}
\usepackage[colorlinks=true,
linkcolor=blue,
citecolor=blue,
urlcolor=blue]{hyperref}
\usepackage{cleveref}
\usepackage{amsthm}
\newtheorem{remark}{Remark}[section]
\numberwithin{equation}{section}
\numberwithin{figure}{section}
\numberwithin{table}{section}
% ===== Section styles =====
\titleformat{\section}{\normalfont\normalsize\bfseries}{\thesection}{1em}{}
\titleformat{\subsection}{\normalfont\normalsize\bfseries}{\thesubsection}{1em}{}
% ===== Title & Authors =====
\title{\fontsize{16}{18}\selectfont\textbf{Bivariate Frank Copula: Some More Results on Point Estimation of the Association Parameter from a Bayesian
Perspective and Revisiting the Goodness of Fit Tests with an Application to Model Groundwater Data from Dong Thap, Vietnam}}
\date{}
\author[1,2,3]{\fontsize{11.5}{14}\selectfont Thi-Yen-Anh Pham\thanks{First author email: \href{mailto:ptyanh.sdh242@hcmut.edu.vn}{ptyanh.sdh242@hcmut.edu.vn}; \href{mailto:phamthiyenanh@tdtu.edu.vn}{phamthiyenanh@tdtu.edu.vn}}}
\author[1,2]{\fontsize{11.5}{14}\selectfont Dung T. Nguyen\thanks{Second author email: \href{mailto:dungnt@hcmut.edu.vn}{dungnt@hcmut.edu.vn}}}
\author[3]{\fontsize{11.5}{14}\selectfont Nabendu Pal\thanks{Third and corresponding author email: \href{mailto:nabendu.pal@tdtu.edu.vn}{nabendu.pal@tdtu.edu.vn}}}
\affil[1]{\fontsize{10.5}{13}\selectfont Department of Applied Mathematics, Faculty of Applied Science,
Ho Chi Minh City University of Technology (HCMUT)\\
268 Ly Thuong Kiet Street, Dien Hong Ward, Ho Chi Minh City, Vietnam}
\affil[2]{\fontsize{10.5}{14}\selectfont Vietnam National University Ho Chi Minh City, Linh Xuan Ward, Ho Chi Minh City, Vietnam}
\affil[3]{\fontsize{10.5}{14}\selectfont Faculty of Mathematics and Statistics, Ton Duc Thang University, Ho Chi Minh City, Vietnam}
\DeclareMathOperator{\E}{E}
\DeclareMathOperator{\Var}{Var}
\DeclareMathOperator{\Cov}{Cov}
%\E[X], \quad \Var(X), \quad \Cov(X,Y)
% ===== Document =====
\begin{document}
\maketitle
\vspace{-1.0cm}
\begin{abstract}
This work consists of two major parts. $(i)$ The first part of this work extends the recent comprehensive study of Pham et al.(2025)~\cite{Pham et al.(2025)} where three classical point estimators of the association parameter of a bivariate Frank Copula were compared and it was established that the maximum likelihood estimator (MLE) has the best overall performance (among those three) in terms of bias as well as the mean squared error (MSE). This current investigation of ours looks into the performance of two Bayes estimators under two natural priors, manely - the noninformative (generalized) flat prior, and the invariant Jeffreys prior; and finds a somewhat surprising result that the latter one dominates the former as well as the MLE uniformly in terms of MSE for small sample sizes, i.e., $n \leq 25$. For moderate to large sample sizes (i.e., $n > 25$), all these three estimators have almost identical performances both in terms of bias as well as MSE. We have also pointed out certain computational aspects while using the R package which have profound implications in computing the MLE, but may go unnoticed, and this impacts the MLE's bias and/or MSE computations for very small sample sizes. $(ii)$ The second part of this work uses a recent dataset from Vietnam and applies Frank Copula in analyzing the association between groundwater arsenic concentration and each of three other benign elements which are easy to monitor, and may help in understanding their inherent dynamics. In the process of this application of Frank Copula to model the groundwater data we revisit the two goodness of fit (GoF) tests introduced by Genest et al.(2006)~\cite{GenestRemillard2006}. Not only have we explored some non-intuitive behavior of these
two test statistics, but also provided extensive tables of critical values of those two test statistics using a comprehensive simulation study. This not only complements Genest et al.(2006)~\cite{GenestRemillard2006} seminal work, but also refines some of their limited computational results.
\end{abstract}
\noindent\textbf{Keywords:} Bayes flat-prior estimator (BFPE), Bayes Jeffreys prior estimator (BJPE), Bias, Correlation Coefficient, Mean squared error (MSE), Nonparametric Estimation.
\medskip
\noindent \textbf{MSC 2020 Subject Classifications:} 62F10, 62E20, 62H05
\newpage
\section{Introduction}
\subsection{Preliminaries}
In multivariate data analysis quite often a multivariate normal distribution (MND) is assumed either by omisson or by commission. However, marginal sample distributions of the data may point toward a non - MND, - a distribution which can be obtained by combining the marginal distributions through a suitable `copula'. In this work our focus is restricted to the bivariate case only.
In a nutshell, a copula is a link function that combines two (or more) marginal distributions to construct a bivariate (or, multivariate) joint probability distribution. To be precise, let $X$ and $Y$ be two absolutely continuous random variables with marginal \textit{cdfs}, say, $F_X(x)$ and $F_Y(y)$, respectively. Then, according to the pathbreaking result due to Sklar(1959)~\cite{Sklar1959}, there exists a link function, called a `copula' $C$, such that the joint \textit{cdf} $F(x,y) \text{ of } (X, Y)$ can be expressed as
% ================================================================
% equation (1.1) {eq:sklar}
% ================================================================
\begin{equation}
F(x,y) = C\big(F_X(x), F_Y(y)\big).
\label{eq:sklar}
\end{equation}
By using the probability integral transforms, say
$U = F_X(X)$ and $V = F_Y(Y)$,
it is seen that both $U$ and $V$ are uniformly distributed over the interval $(0,1)$; and their joint \textit{cdf} is
% ================================================================
% equation (1.2) {eq:copula_definition}
% ================================================================
\begin{equation}
C(u,v) = P(U \leq u,\, V \leq v)
= P\!\big(X \leq F_X^{-1}(u),\, Y \leq F_Y^{-1}(v)\big).
\label{eq:copula_definition}
\end{equation}
% ================================================================
% equation (1.3) {eq:copula_density}
% ================================================================
If we define $C^{(u,v)}(u,v)$ as
\begin{equation}
C^{(u,v)}(u,v) =
\frac{\partial}{\partial u} \frac{\partial}{\partial v} C(u,v)
= c(u,v) \quad \text{(say)},
\label{eq:copula_density}
\end{equation}
\noindent then it is seen that vector $(U,V)^{\prime}$ has the \textit{pdf} $c(u,v)$ as given in \eqref{eq:copula_density}. Also, the joint \textit{pdf} of the original vector $(X,Y)^{\prime}$ can be expressed as
% ================================================================
% equation (1.4) {eq:joint_density}
% ================================================================
\begin{equation}
f(x,y) = c \, \big(F_X(x), F_Y(y)\big)\, f_X(x)\, f_Y(y),
\label{eq:joint_density}
\end{equation}
\noindent where $f_X$ and $f_Y$ are the marginal \textit{pdfs} of $X$ and $Y$, respectively.
\medskip
Throughout this work we are going to assume that the marginal \textit{cdfs} $F_X$ and $F_Y$ are completely known since our objective is to study the link function $C(u,v) (\text{or } c(u,v))$. This is because when the marginal \textit{cdfs} are unknown, they can be approximated fairly well by their empirical versions such as \[
\hat{F}_X(s) = (1/n)\sum_{i=1}^n I(X_i \leq s)
\quad \text{and} \quad
\hat{F}_Y(t) = (1/n)\sum_{i=1}^n I(Y_i \leq t)
\]
based on $n$ \textit{iid} observations $(X_i, Y_i), \; 1 \leq i \leq n$, on $(X,Y)$. Sometimes a suitable adjustment is done to avoid the extreme values $0$ and $1$ (at values smaller than the smallest entry, or larger than the largest entry, respectively) by using
% ================================================================
% equation (1.5) {eq:adjusted_ecdf}
% ================================================================
\begin{equation}
\hat{F}_X^{(\text{adj})}(s)
=
\{
\sum_{i=1}^{n} I(X_i \le s) + 0.5
\}/(n+1)
\label{eq:adjusted_ecdf}
\end{equation}
\noindent and likewise for $\hat{F}_Y^{(\text{adj})}(t)$ as well.
\medskip
More details about the general copula theory can be found in a recent work by Pham et al.(2025)~\cite{Pham et al.(2025)} or Genest et al.(1986)~\cite{Genest1986} and further references therein. To gauge the importance of general copula theory in banking and finance one may see the publications along with the further references therein: Bouye et al.(2000)~\cite{Bouye2000}, Cherubini et al.(2004)~\cite{Cherubini2004}, Embrechts et al.(2002)~\cite{Embrechts2002}, Huisman et al.(2001)~\cite{Huisman2001}, Meneguzzo et al.(2004)~\cite{Meneguzzo2004}, and Junker et al.(2006)~\cite{Junker2006}.
\medskip
The objective of this paper is to focus on a specific copula, known as the Frank Copula, which has found wide applications in finance and economic studies. The Standard Bivariate Frank Copula Distribution with parameter $\theta$ (or, SBFCD($\theta$), in short) is obtained when $(U,V)^{\prime}$ has the joint \textit{pdf} on the unit square $(0,1) \otimes (0,1)$ given as
% ================================================================
% equation (1.6) {eq:frank_density}
% ================================================================
\begin{equation}
c(u,v \mid \theta) \;=\;
\frac{ \theta \bigl(1 - exp \,(-\theta)\bigr)\, \bigl(exp \,(-\theta (u+v))\bigr)}
{ \left\{ exp \,(-\theta u) + exp \,(-\theta v) - exp \,(-\theta) - exp \,\bigl(-\theta (u+v)\bigr) \right\}^2 } \raisebox{0.5ex}{,}
\label{eq:frank_density}
\end{equation}
\noindent where the parameter $\theta \in \mathbb{R}$ indicates the association (or, its strength) between the components $U$ and $V$. The corresponding bivariate joint \textit{cdf} of $(U,V)$, i.e., the Frank Copula, is $C(u,v \mid \theta)
= \iint c(u,v \mid \theta)\,du\,dv $ with the expression
% ================================================================
% equation (1.7) {eq:frank_copula}
% ================================================================
\begin{equation}
C(u,v \mid \theta)
= -(1/\theta) \ln \!\left[ 1 + \{\,exp(-\theta u)-1\,\}\{\,exp(-\theta v)-1\,\}/ \{exp(-\theta)-1\} \right].
\label{eq:frank_copula}
\end{equation}
The objective here is to estimate $\theta$ based on the \textit{iid} observations \((U_i, V_i)^\prime,\;1\leq i \leq n,
\text{on } (U,V)^\prime \) following \eqref{eq:frank_density} (or \eqref{eq:frank_copula}).
\medskip
Even though the literature mentions the parameter space (i.e., the permissible range of $\theta$) as \(\Theta = \mathbb{R} \setminus \{0\}\), there is no harm in including the value $\{0\}$ in $\Theta$. However, the special case of $\theta = 0$ in \eqref{eq:frank_copula} requires a deft handling since a dicrect plug-in of $\theta = 0$ in \eqref{eq:frank_density} or \eqref{eq:frank_copula} yields $0/0$. Therefore, to see what happens at $\theta = 0$, one should take limit $\theta \to 0$ either by L'Hospital's rule or by using the approximations (when $\theta \approx 0$) as \(exp(-w) - 1 \;\approx\; - w\) and \(ln(1+w) \approx w\) as $w \to 0$. This yields \(c(u,v \mid \theta) = 1\) and \(C(u,v \mid \theta) = uv\), as $\theta \to 0$, thereby indicating that the components $U$ and $V$ are independent.
% ================================================================
% 1.2. Kendall's and Spearman's Rank Correlations as functions of $\theta$
% ================================================================
\subsection { Kendall's and Spearman's Rank Correlations as functions of \texorpdfstring{$\bm{\theta}$}{theta}}
\medskip
Note that the usual product--moment correlation, which is the Pearson's correlation ent, denoted by $\rho_P = \rho_P(X,Y)$, measures only the degree of linear association between two variables, say $X$ and $Y$. Further, the inferences on $\rho_P$, such as interval estimation and/or hypothesis testing, use the assumption of bivariate normality of $(X,Y)$ which may not be valid in many applications. Therefore, two other correlation measures which go beyond linear association
and/or the normality assumption are -- Kendall's rank correlation
(also known as ``Kendall's `tau' ") and Spearman's rank correlation,
to be denoted by $\rho_K$ and $\rho_S$, respectively.
\medskip
Suppose $(X_*,Y_*)$ and $(X_{**},Y_{**})$ be two \text{iid} observations
on the bivariate vector $(X,Y)$ having some continuous distribution
(\textit{cdf}) $F(x,y)$. The pairs $(X_*,Y_*)$ and $(X_{**},Y_{**})$ are called
concordant (or discordant) if
$
\Delta_0 \text{ (say)} =(X_* - X_{**})(Y_* - Y_{**}) \, $ $ > \text{(or } < ) \,0$. Then $\rho_K$ is defined as
% ================================================================
% equation (1.8) Kendcoefficiall's tau
% ================================================================
\begin{equation}
\rho_K = \pi_C - \pi_D,
\label{eq:kendall_tau}
\end{equation}
\noindent where $ \pi_C = P(\Delta_0 > 0) $ and $ \pi_D = P(\Delta_0 < 0).$ Notice that $\rho_K \in [-1,1]$, and $\rho_K=-1$ (or $1$)
in the case of a perfect negative (or positive) association. Also, the nonparametric estimate $\hat{\rho}_K$ of $\rho_K$ can be obtained from the data $(X_i,Y_i)$, $1 \le i \le n$, by using
$
\hat{\rho}_K=\hat{\pi}_C-\hat{\pi}_D,
$
where $\hat{\pi}_C$ and $\hat{\pi}_D$ are the sample estimates of
$\pi_C$ and $\pi_D$, respectively. These estimates can be obtained
as the proportion of concordant and discordant pairs out of $ N=\binom{n}{2} $ possible pairwise comparisons among the $n$ observations.
\medskip
On the other hand, Spearman's rank correlation, also known as the ``grade correlation", is the Peason's correlation between $U = F_X(X)$ and $V = F_Y(Y)$, i.e.,
% ================================================================
% (1.9) Spearman
% ================================================================
\begin{equation}
\rho_S = \rho_P(U, V).
\label{eq:Spearman}
\end{equation}
In a sample setting, one can replace $U$ and $V$ by
$U_i=\hat{F}_X(X_i),$ and $V_i=\hat{F}_Y(Y_i)$ (or by $\hat{F}_X^{adj}(X_i)$ and $\hat{F}_Y^{adj}(Y_i)$,
or simply by $rank(X_i)$ and $rank(Y_i)$), respectively, and obtains the nonparametric estimate of $\rho_S$ as
$
\hat{\rho}_S=(1/n)\sum_{i=1}^{n}U_i^{*}V_i^{*}
$
where $U_i^{*}$ and $V_i^{*}$ are the standardized values of
$U_i$ and $V_i$, respectively;
$
U_i^{*}= (U_i-\overline{U})/s_U, \,
V_i^{*}=(V_i-\overline{V})/s_V,
$
with
$
s_U=(\sum_{i=1}^{n}(U_i-\overline{U})^2/n)^{1/2}
$
and
$
s_V=(\sum_{i=1}^{n}(V_i-\overline{V})^2/n)^{1/2}.
$
Again, note that the range of $\rho_S$ (and that of $\hat{\rho}_S$)
is $[-1,+1]$.
\medskip
In the context of the above-mentioned Frank Copula set-up, both $\rho_K$ and $\rho_S$ are functions of the copula association parameter $\theta$, given as (see Genest (1987))~\cite{Genest1987}
% ================================================================
% (1.10) Kendall's tau
% ================================================================
\begin{equation}
\rho_K
= \rho_K(\theta)
= 1 - (4/\theta)\{1 - D_1(\theta)\}, \, \text{and}
\label{eq:kendall_tau}
\end{equation}
% ================================================================
% (1.11) Spearman
% ================================================================
\begin{equation}
\rho_{S}
= \rho_{S}(\theta)
= 1 - (12/\theta)\{D_1(\theta) - D_2(\theta)\},
\label{eq:spearman_rho}
\end{equation}
\noindent where
$ D_1(\theta)
= (1/\theta)
\int_{0}^{\theta}
t / \{\exp(t) - 1\}
\,dt
$
and $ D_2(\theta)
= (2/\theta^2)
\int_{0}^{\theta}
t^{2} / \{\exp(t) - 1\}
\,dt.
$
\noindent
Therefore, when a given bivariate dataset is assumed to obey the Frank Copula-based joint distribution, one can estimate $\rho_K$ and $\rho_S$ by their parametric estimates as
$
\hat{\hat{\rho}}_K = \rho_K(\hat{\theta}) \quad \text{and} \quad \hat{\hat{\rho}}_S = \rho_S(\hat{\theta}),
$
respectively. We will see in Section 5 that the MLE will be used as $\hat{\theta}$ in our applications.
\medskip
The following Figure~\ref{fig:Ken_Spear} shows the plots of $\rho_K$ and $\rho_{S}$ as functions of $\theta$.
% ================================================================
% Figure 1.1 Plots of $\rho_K$ (solid line) and $\rho_S$ (dash line) as functions of $\theta$
% ================================================================
\begin{figure}[H]
\centering
\includegraphics[width=0.6\textwidth]{Ken_Spear.PNG}
\caption{Plots of $\rho_K$ (solid line) and $\rho_S$ (dash line) as functions of $\theta$.}
\label{fig:Ken_Spear}
\end{figure}
% \begin{figure}[H]
% \centering
% \includegraphics[width=0.95\textwidth]{plot/theta_1}
% \caption{Plot of $\theta_1 = (exp(\theta)-1)/(exp(\theta + 1))$}
% \label{fig:theta_1}
% \end{figure}
% ===================================================================
% 1.3. A motivating example: Vietnam Groundwater Contamination Data
% ===================================================================
\subsection{A Motivating Example: Vietnam Groundwater Contamination Data}
Severe arsenic concentration in groundwater has been a major problem
in densely populated areas of South/Southeast Asian countries. One of
the hotspots that has been severely affected by arsenic contamination
in groundwater is the Mekong Delta Region (MDR) in southern part of
Vietnam. For an indepth and comprehensive history of arsenic contamination in MDR one may see Berg et al.(2007)~\cite{Berg2007}, Nguyen(2008)~\cite{Nguyen2008}, Pham(2015)~\cite{Pham2015}, and Pham et al.(2015)~\cite{Pham2015b}.
\medskip
Researchers have been carrying out surveys in the MDR to assess arsenic prevalence and to have a better understanding of how this carcinogenic element is associated with other benign elements present in groundwater. Along with concentration of Arsenic (\textit{As}), which is well known to have adverse effects on human health when consumed beyond a safe limit, concentration of Chloride (\textit{Cl}), Redox level (\textit{Eh}), and pH level (\textit{pH}) of the groundwater were recorded based on samples collected from several water-wells scattered across Dong Thap province as reported by
Merola et al.(2015)~\cite{Merola2015}. The study area covered two subregions, namely North and South, and the complete dataset pertaining to the aforementioned elements has been
reproduced in Appendix A.1
\medskip
The fact that the two subregions (North and South) are vastly
different can be seen from the following Table~\ref{tab:kst_pvalues}, which gives the p-values of the Kolmogorov--Smirnov Test (KST) comparing
the empirical distributions of each element (or, say, variable)
for the two subregions.
% ===================================================================
% Table 1.1. KST $p$-values to test the equality of distributions
% in two subregions
% ===================================================================
\begin{table}[h]
\centering
\caption{The p-values of KST to test the equality of distributions in two subregions}
\label{tab:kst_pvalues}
\resizebox{0.95\textwidth}{!}{
\begin{tabular*}{\textwidth}{@{\extracolsep{\fill}}c cccc}
\hline
North vs.\ South & \textit{As} & \textit{Cl} & \textit{Eh} & \textit{pH} \\
\hline
p-value & 0.0000 & 0.0004 & 0.0000 & 0.0000 \\
\hline
\end{tabular*}
}
\end{table}
Table \ref{tab:kst_pvalues} makes it clear that the probability distribution of each variable differs significantly from North to South. (More details on the dataset will be provided in Section 5.)
\medskip
The relative frequency histograms of the four variables (\textit{As, Cl, Eh} and \textit{pH}) in two subregions appear to be mostly non-normal as the following Table \ref{tab:normality_tests} provides p-values of two formal normality tests, namely-- Anderson--Darling Test (ADT), and Shapiro--Wilk Test (SWT). The sample sizes of North and South are $n_N = 23$ and $n_S = 44$, respectively.
% =====================================================================
% Table 1.2. ADT and SWT $p$-values to test normality in two subregions
% =====================================================================
\begin{table}[H]
\centering
\caption{ADT and SWT p-values to test normality in two subregions}
\label{tab:normality_tests}
\small
\renewcommand{\arraystretch}{1.2}
\begin{tabular*}{0.95\textwidth}{@{\extracolsep{\fill}}c ccccc}
\hline
Test & Subregion & \textit{As} & \textit{Cl} & \textit{Eh} & \textit{pH} \\
\hline
\multirow{2}{*}{ADT} & North & 0.0000 & 0.0414 & 0.1404 & 0.0029 \\
& South & 0.0001 & 0.0000 & 0.0000 & 0.4363 \\
\hline
\multirow{2}{*}{SWT} & North & 0.0000 & 0.0286 & 0.0914 & 0.0012 \\
& South & 0.0002 & 0.0000 & 0.0000 & 0.6933 \\
\hline
\end{tabular*}
\end{table}
Even though the four variables in two subregions appear to have distinct and mostly nonnormal distributions, it should be kept in mind that the two normality tests are asymptotic in nature and the p-values may be inaccurate, especially for North with a sample size of $23$ only.
\medskip
The three correlation coefficients, -- $\rho_P, \rho_K$ and $\rho_S$, have been estimated for three pairs of variables in two subregions, and these have been shown in Table~\ref{tab:correlation_estimates}. The objective of this study is to explore how the carcinogenic element As is associated with the other three benign elements (\textit{Cl, Eh} and \textit{pH}). Also, we have included the correlations between \textit{Eh} and \textit{pH} due to their association as explained in Remark~\ref{rem:remark1.2}.
% =====================================================================
% Table 1.3. Three standard correlation estimates in two subregions
% =====================================================================
\begin{table}[H]
\centering
\caption{Three standard correlation estimates in two subregions}
\label{tab:correlation_estimates}
\small
\renewcommand{\arraystretch}{1.2}
\setlength{\tabcolsep}{4pt}
\begin{tabular}{|c|cccc|cccc|}
\hline
& \multicolumn{4}{c|}{North} & \multicolumn{4}{c|}{South} \\
\cline{2-9}
\makecell{Estimated\\Correlation}
& (\textit{As, Cl}) & (\textit{As, Eh}) & (\textit{As, pH}) & (\textit{Eh, pH})
& (\textit{As, Cl}) & (\textit{As, Eh}) & (\textit{As, pH}) & (\textit{Eh, pH}) \\
\hline
$\hat{\rho}_P$
& -0.220 & -0.509 & 0.766 & -0.503
& -0.325 & -0.668 & 0.119 & -0.142 \\
$\hat{\rho}_K$
& -0.052 & -0.243 & 0.269 & -0.429
& -0.230 & -0.577 & 0.101 & 0.062 \\
$\hat{\rho}_S$
& -0.104 & -0.326 & 0.384 & -0.545
& -0.320 & -0.753 & 0.156 & 0.050 \\
\hline
\end{tabular}
\end{table}
% =====================================================================
% Remark 1.1
% =====================================================================
\begin{remark}
\label{rem:remark1.1}
Even though the Pearson's correlation estimates (i.e., $\hat{\rho}_P $) have been provided for the three pairs in two subregions, they should be discounted due to the non-normal nature of the data. In terms of $\hat{\rho}_K$ and $\hat{\rho}_S$, $(a)$ As and pH appear to be uncorrelated in both the subregiona; $(b)$ As and Cl appear to be correlated only South, but \underline{not} in North; $(c)$ As and Eh appear to be correlated in both North and South (and strongly in South). By the way, the sampled water wells in North, in the area Tan Hong, is far from the Tien river, whereas those in South, in Thanh Binh, are adjacent to Tien river.
\end{remark}
% =====================================================================
% Remark 1.2
% =====================================================================
\begin{remark}
\label{rem:remark1.2}
The pair $(Eh,pH)$ plays a fundamental role in hydro-geochemistry.
The variable $Eh$, known as the redox potential, measures the
oxidation--reduction condition of the aqueous environment, whereas
$pH$ measures the acidity or alkalinity of the water. Many geochemical reactions occurring in groundwater involve both
electron transfer and proton exchange. As a result, the chemical
equilibrium of many dissolved elements depends simultaneously on the redox condition and the acidity of the medium. In general, $Eh$ controls the oxidation state of chemical elements, while $pH$
influences their solubility and speciation in aqueous systems.
For this reason, the joint analysis of $(Eh,pH)$ is essential in
hydro-geochemical studies. The relationship between these two
variables is often illustrated using the well-known $Eh$--$pH$
diagram (also called the Pourbaix diagram), which identifies the
stable chemical forms of elements under different environmental
conditions. Therefore, investigating the dependence structure between $Eh$ and
$pH$ can provide important insights into the geochemical processes
governing groundwater systems.
\end{remark}
% =====================================================================
% Remark 1.3
% =====================================================================
\begin{remark}
\label{rem:remark1.3}
Going beyond $\rho_K$ and $\rho_S$, can we model the bivariate distributions of the aforementioned three pairs by Frank Copula? This will be explored in more details in Section 5.
\end{remark}
% =====================================================================
% 1.4. A synopsis of the most recent work and a summary of this work
% =====================================================================
\subsection{A synopsis of the most recent work and a summary of this work}
As mentioned earlier, this work is a sequel to the most recent work of Pham et al.(2025)~\cite{Pham et al.(2025)} which complemented Genest's (1987)\cite{Genest1987} expository work on Frank Copula in a bivariate set-up using the model \eqref{eq:frank_density} or \eqref{eq:frank_copula} which focused on estimating $\theta$
using three classical estimators, namely -- the maximum likelihood estimator (MLE), the method of moment estimator of first kind (MME1) (based on Kendall's rank correlation), and the method of moment estimator of second kind (MME2) (based on Spearman's rank correlation). It was shown through a comprehensive simulation study,
among other things, that:
\begin{enumerate}[label=(\alph*)]
\item In terms of bias, the MLE over-estimates $\theta$ when $\theta > 0$,
and under-estimates $\theta$ when $\theta < 0$. On the other hand,
the two MMEs act in completely opposite directions, i.e.,
under (over) estimate $\theta$ when $\theta > (<) 0$.
At $\theta = 0$, all the three estimators have bias $= 0$. Also, in terms of |bias|, the MLE out performs the MMEs by wide margins.
\item In terms of MSE, again the MLE exhibits much superior performance than the MMEs, except for a small neighborhood of $0$ where the MMEs perform better than the MLE. This neiborhood of $0$, given as \(\Theta_{\varepsilon(n)} = \{ \theta \mid |\theta| < \varepsilon \,\}\), where $\varepsilon = \varepsilon(n)$ is a function of $n$, and shrinks (i.e., $\varepsilon$ decreases) as $n$ increases.
\item Further, the asymptotic behavior of the MLE was explored, and it was found that the asymptotic variance of the MLE
(i.e., the Cramér--Rao lower bound) is attained fairly well with a minimum sample size of $75$.
\end{enumerate}
This work extends the above point estimation results of $\theta$ further by considering two Bayes estimators, and to the best of our knowledge this was never done before for Frank Copula. (As such, there is a dearth of studies when it comes to copula parameter estimation from a Bayesian point of view, and hopefully this work will pique the interest of other researchers in this dicrection.)
\medskip
Two noninformative (generalized) priors have been considered to study the corresponding Bayes estimators of $\theta$ as follows.
\begin{enumerate}[label=(\roman*)]
\item The `flat prior' $\pi_{FP}(\theta) = d > 0,$ over $\Theta = \mathbb{R}$ has been used to construct the Bayes Flat Prior Estimator (BFPE) under the squared error loss, i.e., the posterior mean under the flat prior.
\item Jeffreys prior \(\pi_J(\theta) = (I(\theta))^{1/2}\) over $\Theta = \mathbb{R}$ has been used to construct the Bayes Jeffreys Prior Estimator (BJPE), where $I(\theta)$ = Fisher information (per observation) (FIPO) with $(U,V) \sim c(u,v \mid \theta) $ in \ref{eq:frank_density}. (Considerable care has been taken to compute BJPE numerically as it involves a far more complex structure than BFPE.)
\item Both BFPE as well as BJPE have been compared against the MLE in terms of bias and MSE in a comprehensive way. What comes as a surprise is the fact that, in terms of MSE, BJPE beats the other two estimators uniformly for ``small" $n$ (i.e., $n \leq 25$). For ``large" $n$, i.e., $n > 25$, the dominance of BJPE is marginal, and all the three estimators become ``statistically equivalent". As a result, the take away message of this investigation is that for $n \leq 25$, one definitely should use BJPE over the MLE (provided the bivariate data can be modelled by Frank Copula).
\item As discussed earlier, this work concludes with an interesting application of Frank Copula
to model several bivariate pairs of groundwater elements (or variables), including Arsenic.
The estimated association parameter for each pair gives a better idea about the dynamics
between the pair components. But while undertaking this application we have turned our
attention to a more fundamental problem, that is - the goodness of fit (GoF) test of Frank Copula
for a given bivariate dataset. We have revisited the seminal work of Genest et al.(2006)~\cite{GenestRemillard2006} and reexamined the behavior of two test statistics for our application purposes. In this process, we have provided expanded tables of critical values for the two test statistics which are not only comprehensive and more accurate (due to the far larger number of replications used), but also complementary to the above work.
\end{enumerate}
The rest of the paper has been organized as follows. In section 2 we introduce the two noninformative generalized priors as well as the corresponding Bayes estimators. Section 3 has been devoted to a comprehensive simulation study comparing the two Bayes estimators against the MLE in terms of bias as well as MSE. In section 4 we revisit the two goodness of fit (GoF) tests for Frank Copula suggested by Genest et al.(2006)~\cite{GenestRemillard2006} and explore some of their properties. In Section 5 we demonstrate the applicability of bivariate Frank Copula to model the groundwater data, and obtain the estimated association parameter between the two components of various pairs of groundwater elements. Since this work extends the in-depth study of Pham et al.(2025)~\cite{Pham et al.(2025)}, some of the details and lengthy derivations would be left out for brevity, and any interested reader can check the details provided in the aforementioned last paper. The details of our computational codes for Bayes estimation have been provided in the Appendix for interested readers.
% =====================================================================
% 2. The two generalized Bayes estimators under noninformative priors
% =====================================================================
\section{The two generalized Bayes estimators under noninformative priors}
It is assumed that we have \textit{iid} observations $(U_i, V_i), 1 \leq i \leq n$, following the \textit{pdf} \eqref{eq:frank_density}. The likelihood function of the `data' $ = \{(U_i, V_i) \mid 1 \leq i \leq n \}$ is
% =====================================================================
% equation (2.1) {eq:likelihood}
% =====================================================================
\begin{equation}
L(\theta \mid \text{data}) = \textstyle{\prod_{i=1}^n} \, c \,(U_i, V_i \mid \theta)
\label{eq:likelihood}
\end{equation}
where $c(u,v \mid \theta)$ is given in \eqref{eq:frank_density}.
The MLE of $\theta$ is found by solving the normal equation, say $H(\theta) = 0$, where
% =====================================================================
% equation (2.2) {eq:score_function}
% =====================================================================
\begin{equation}
H(\theta) = (1/\theta) + \big( \mathit{exp}(\theta) - 1 \big)^{-1}
- (\overline{U} + \overline{V}) + (2/n) \, \textstyle{\sum_{i=1}^n} \left( A_{1i}/A_{2i} \right);
\label{eq:score_function}
\end{equation}
\begin{align*}
A_{1i} &= A_{1i}(U_i, V_i) = \{ U_i \, \mathit{exp}(-\theta U_i)
+ V_i \, \mathit{exp}(-\theta V_i) - \mathit{exp}(-\theta)
- (U_i + V_i) \, \mathit{exp}\big(-\theta (U_i+V_i)\big) \}, \\[6pt]
A_{2i} &= A_{2i}(U_i, V_i) = \{ \mathit{exp}(-\theta U_i)
+ \mathit{exp}(-\theta V_i) - \mathit{exp}(-\theta)
- \mathit{exp}\big(-\theta (U_i+V_i)\big) \}.
\end{align*}
The existence of the MLE, henceforth denoted by $\hat{\theta}_{ML}$, and the behavior of the function $H(\theta)$, has been thoroughly discussed in Pham et al.(2025)~\cite{Pham et al.(2025)}.\\
Suppose $\pi (\theta)$ is a prior on the parameter space $\Theta = \mathbb{R}$. Then the posterior distribution of $\theta$ given the `data' is
% =====================================================================
% equation (2.3) {eq:posterior}
% =====================================================================
\begin{equation}
\pi (\theta \mid \text{data}) = \pi(\theta) \, \textstyle{\prod_{i=1}^n} c(U_i, V_i \mid \theta) \Big/ \int_{-\infty}^{\infty} \pi(\theta) \, \textstyle{\prod_{i=1}^n} c(U_i, V_i \mid \theta) \, d\theta,
\label{eq:posterior}
\end{equation}
Under the squared error loss function, the Bayes rule $\hat{\theta}_B$ is the posterior mean, i.e.,
% =====================================================================
% equation (2.4) {eq:bayes_estimator}
% =====================================================================
\begin{equation}
\hat{\theta}_B = E(\theta \mid \theta \sim \pi(\theta \mid \text{data} ) ) = \textstyle{\int_{-\infty}^{\infty}} \theta \, \pi(\theta \mid \text{data}) \, d\theta,
\label{eq:bayes_estimator}
\end{equation}
\noindent provided the above mean exists. \\
The first prior we are going to consider is the noninformative generalized `flat prior', given as $\pi_{FP}(\theta)$, where
% =====================================================================
% equation (2.5) {eq:flat_prior}
% =====================================================================
\begin{equation}
\pi_{FP}(\theta) = d > 0, \quad \theta \in \Theta = \mathbb{R}.
\label{eq:flat_prior}
\end{equation}
The resultant Bayes Flat Prior Estimator (BFPE), denoted by $\hat{\theta}_{BFP}$, is (from \eqref{eq:bayes_estimator} and \eqref{eq:flat_prior})
% =====================================================================
% equation (2.6) {eq:bayes_flat_estimator}
% =====================================================================
\begin{equation}
\hat{\theta}_{BFP} = \textstyle{ \int_{-\infty}^{\infty}} \theta \, \prod_{i=1}^n c \,(U_i,V_i \mid \theta) \, d\theta \Big/ \int_{-\infty}^{\infty} \textstyle {\prod_{i=1}^n} c \,(U_i,V_i \mid \theta) \, d\theta
\label{eq:bayes_flat_estimator}
\end{equation}
The second prior we are going to consider is the noninformative invariant generalized `Jeffreys prior', given as $\pi_{JP} (\theta)$, where
% =====================================================================
% equation (2.7) {eq:jeffreys_prior}
% =====================================================================
\begin{equation}
\pi_{JP}(\theta) = (I(\theta))^{1/2}, \quad \theta \in \Theta = \mathbb{R}, \label{eq:jeffreys_prior}
\end{equation}
\noindent with $I(\theta)$ being the Fisher Information Per Observation (FIPO).
\medskip
The above $\pi_{JP}(\theta)$ has the unique feature that it is invariant under any reparameterization. Note that the flat uniform prior $\pi_{FP}(\theta)$ does not possess this property. (For more on invariant prior selection see Jeffreys (1946)~\cite{Jeffreys1946} or Jaynes (1968)~\cite{Jaynes1968}.) The following Figure~\ref{fig:figure21} shows
the plots of the two aforementioned priors against the association parameter $\theta$.
\medskip
For the Frank Copula \textit{pdf} \eqref{eq:frank_density} the FIPO expression $I(\theta)$ is a bit cumbersome, and does not have a closed form. It is given as (see Pham et al.(2025)~\cite{Pham et al.(2025)})
% =====================================================================
% equation (2.8) {eq:fisher_information}
% =====================================================================
\begin{equation}
I(\theta) = \mathbb{E}\!\left[-\,(\partial^{2}/\partial\theta^{2}) \ln c(U,V \mid \theta)\right] = I_1(\theta) - I_2(\theta),
\label{eq:fisher_information}
\end{equation}
{
\begin{fleqn}
\[
\text{where } I_1(\theta) = \theta^{-2} + \mathit{exp}(\theta) / (\mathit{exp}(\theta) - 1)^2 ;
\quad \text{and } I_2(\theta) = 2 \mathbb{E}[J(U,V \mid \theta)],
\]
\[
\text{with } J(U,V \mid \theta) = \{J_1(U,V \mid \theta) / J_2(U,V \mid \theta)\},
\quad (U,V) \sim c(u,v \mid \theta) \text{ (in \eqref{eq:frank_density}),}
\]
\[
J_1(U,V \mid \theta) = \mathit{exp}(-\theta(U+V)) \Big\{
-(U-V)^2 + U^2 \mathit{exp}(-\theta V) + V^2 \mathit{exp}(-\theta U)
\]
\[
\hspace{2.5 cm} - (U+V-1)^2 \mathit{exp}(-\theta) \Big\} + (V-1)^2 \mathit{exp}(-\theta(V+1))
+ (U-1)^2 \mathit{exp}(-\theta(U+1)) ,
\]
\[
J_2(U,V \mid \theta) = \Big\{
\mathit{exp}(-\theta U) + \mathit{exp}(-\theta V) - \mathit{exp}(-\theta) - \mathit{exp}(-\theta(U+V))
\Big\}^2.
\]
\end{fleqn}
}
Note that while the term $I_1(\theta)$ has a closed form, the term $I_2(\theta)$ has to be evaluated through numerical double integration
% =====================================================================
% equation (2.9) {eq:expectation_J}
% =====================================================================
\begin{equation}
\mathbb{E}(J(U,V \mid \theta)) =
\int_{0}^{1} \!\! \int_{0}^{1}
J(u,v \mid \theta)\, c(u,v \mid \theta)\, du\, dv,
\label{eq:expectation_J}
\end{equation}
for every $\theta$ in $\Theta = \mathbb{R}$, which is a bit time consuming.
\medskip
The Bayes rule under $\pi_{JP}(\theta)$, henceforth referred to as Bayes Jeffreys Prior Estimator (BJPE), and denoted by $\hat{\theta}_{BJP}$, is
% =====================================================================
% equation (2.10) {eq:bayes_jeffreys_estimator}
% =====================================================================
\begin{equation}
\hat{\theta}_{BJP} = \textstyle{ \int_{-\infty}^{\infty} } \theta \, (I(\theta))^{1/2} \, \textstyle{\prod_{i = 1}^n} c(U_i,V_i \mid \theta) \, d\theta \Big/ \textstyle{ \int_{-\infty}^{\infty} } \, (I(\theta))^{1/2} \, \textstyle{\prod_{i = 1}^n} c(U_i,V_i \mid \theta) \, d\theta.
\label{eq:bayes_jeffreys_estimator}
\end{equation}
% =====================================================================
% Figure 2.1
% =====================================================================
\begin{figure}[H]
\centering
\includegraphics[width=0.78\textwidth]{Figure_2.1}
\caption{The priors $\pi_{FP}(\theta)$ and $\pi_{JP}(\theta)$ plotted against the association parameter $\theta$.}
\label{fig:figure21}
\end{figure}
\vspace{-0.3cm}
In the next Section 3 we have presented the results of our simulation study to compare the two Bayes estimators against the MLE in terms of bias and MSE. Computation of the BJPE requires triple integrations, and this is done with utmost care to attain a high precision as discussed later. For this reason, each computed value of bias and MSE has been provided with its own standard error (SE) value. Also note that the bias and MSE of the MLE are consistent with those reported in Pham et al.(2025)~\cite{Pham et al.(2025)}.
% =====================================================================
% 3. A Comparison of MLE, BFPE and BJPE in terms of Bias and MSE
% =====================================================================
\section{A Comparison of MLE, BFPE and BJPE in terms of Bias and MSE}
A comparision of the three estimators, i.e., MLE, BFPE and BJPE, has been undertaken through a comprehensive simulation study based on $M = 4 \times 10^4$ replications. For a generic estimator $\hat{\theta}$, let $\hat{\theta}^{(m)}$ be its computed value in the \( m^{\text{th}}\) replication, $1 \leq m \leq M$. Then the simulated Bias and MSE of $\hat{\theta}$ are computed as
\[
Bias(\hat{\theta}) \simeq \, \sum_{m=1}^M \, (\hat{\theta}^{(m)} - \theta)/M \text{ and } MSE(\hat{\theta}) \simeq \, \sum_{m=1}^M \, (\hat{\theta}^{(m)} - \theta)^2 / M.
\]
The computation of the MLE by solving \eqref{eq:score_function} is straightforward as described in Pham et al.(2025)\cite{Pham et al.(2025)}. However, threre is a minor issue for very small sample sizes $(n \leq 10)$ which has been clarified in Remark~\ref{rem: 3.1}.
\medskip
The nummerical integrations involved in the numerator and denominator of $\hat{\theta}_{BFP}$ (in \eqref{eq:bayes_flat_estimator}) and $\hat{\theta}_{BJP}$ (in \eqref{eq:bayes_jeffreys_estimator}) have been done through adaptive quadrature method (in R package), and this was a bit time consuming given the large number of replications (i.e., $M = 4 \times 10^4$) involved. Each numerical integration with respect to $\theta$ over the range $\Theta = \mathbb{R} = (-\infty, \infty )$ was approximated by the subrange $(\theta - A, \theta + A)$ with $A = 25$. (In fact, it was verified that such integrations do not change beyond $A = 15$). The subrange $(\theta - A, \theta + A)$ was then subdivided into $L = 2000$ subintervals (with each subinterval having a width of $0.025$) to approximate the integration over the subrange $(\theta - A, \theta + A)$ by the corresponding Riemann sum.
\medskip
For each given value of $\theta$ (i.e., the input parameter value), which ranged from $(-10)$ to $(+10)$, computations of Bias and MSE of each estimator (based on $M = 4 \times 10^4$ replications) were done in four smaller batches of $10^4$ replications each using TDTU's High Performance Computing (HPC). This was done for two reasons; -- (a) to obtain the results based on each batch (of $10^4$ replications) in a reasonable amount of time (which ranged from 5 to 8 minutes for each combination of $n$ and $\theta$), and then use the set of four batch results to compute the standard error (SE) of the overall MSE value. The SE of each Bias value was computed by the overall MSE (obtained from $M = 4 \times 10^4$ replications) divided by $M$, and then taking its square-root.
\medskip
The following tables (Table~\ref{tab:sim_bias_mse_a}~(a) - (b)) show the simulated Bias and MSE of the three estimators only for positive $\theta$ values ranging from $0.1$ to $10.0$ (due to the reasons explained in Remark~\ref{rem: 3.2}). The SE of each Bias and MSE value has been reported in brackets next to it.
% ================================================================
% Remark 3.1.
% ================================================================
\begin{remark}
\label{rem: 3.1}
Obtaining the MLE of $\theta$ for a given dataset using R package requires some careful observations. One can use either the ``optim" command to maximize the log-likelihood function $\ell(\theta) = ln L (\theta)$ (in \eqref{eq:likelihood}) directly, or use the ``nleqslv" command to solve the normal equation `$H(\theta) = 0$' (in \eqref{eq:score_function}). Theoretically there is no difference between these two approaches, but the computational results do vary slightly, especially for very small sample sizes $(n \leq 10)$. For such small samples, the above second approach appears to be less accurate, thereby yielding larger Bias and MSE compared to those of the first approach. However, these two approaches yield almost identical results for $n \geq 15$, and that is why we have used $n \geq 15$. A summary of the above two approaches is given in Appendix~\ref{} A.2.
\end{remark}
% ================================================================
% Remark 3.2.
% ================================================================
\begin{remark}
\label{rem: 3.2}
The simulation study has revealed the following trends:
\begin{enumerate}
\renewcommand{\labelenumi}{(\roman{enumi})}
\item All the three estimators (MLE, BFPE and BJPE) tend to over (under) estimate $\theta$ when $\theta > (< ) \,0$. Further, the Bias, as a function of $\theta$, appears to be symmetric about $0$, i.e., Bias at $(-\theta) = - (\text{Bias at} \, (+\theta)).$ The Bias in estimation approaches to $0$ as $\theta \to 0$ (for any fixed $n$), and/or as $n \to \infty$ (for any fixed $\theta$). Also, in terms of Bias, both BJPE and MLE seem to be better than BFPE, and these two estimators have nearly identical behavior.
\item In terms of MSE, the estimators are symmetric in $\theta$ about 0, and interestingly BJPE shows uniformly better performance over the other two estimators. However, this superiority of BJPE is more pronounced for small sample sizes, i.e., $n \leq 25$. For larger $n \,(n > 25)$, the improvements provided by BJPE is marginal, especially over the MLE, and these are statistically insignificant.
\end{enumerate}
\end{remark}
% ================================================================
% Remark 3.3.
% ================================================================
\begin{remark}
\label{rem: 3.3}
Our simulation study has used $\theta$ ranging from $0.1$ (near 0) to 10 only, and this is due to the symmetric behavior as noted before. Even though both the Bias (in absolute sense) and the MSE are increasing with respect to $|\theta|$ (for fixed $n$), the rate of increment is actually decreasing. This can be seen from the standardized Bias (SB) and standardized MSE (SMSE) defined as $SB = (Bias/|\theta|)$, and $SMSE = (MSE/\theta^2)$. It is easy to see (but not reported here explicitly) that for all the three estimators both $SB$ and $SMSE$ are exploding near $|\theta| = 0$, and of order $o(|\theta|)$ as $|\theta| \to \infty$.
\end{remark}
% =======================================================================
% Table 3.1 (a). Simulated Bias and MSE of three estimators of $\theta$ ($n=15,20,25$).
% =======================================================================
\begin{table}[H]
\centering
\caption{(a). Simulated Bias and MSE of three estimators of $\theta$ ($n=15,20,25$).}
\label{tab:sim_bias_mse_a}
\renewcommand{\arraystretch}{1.35}
\setlength{\tabcolsep}{6.0pt}
\resizebox{0.9\textwidth}{!}{%
\begin{tabular}{|c|c|c|c|c|c|c|c|}
\hline
\multirow{2}{*}{$n$} & \multirow{2}{*}{$\theta$} &
\multicolumn{2}{c|}{MLE} &
\multicolumn{2}{c|}{BFPE} &
\multicolumn{2}{c|}{BJPE} \\ \cline{3-8}
& & Bias(SE) & MSE(SE) & Bias(SE) & MSE(SE) & Bias(SE) & MSE(SE) \\
\hline
\multirow{14}{*}{15} & 10 & 0.644(0.013) & 9.777(0.039) & 1.102(0.013) & 11.237(0.028) & 0.658(0.013) & 9.558(0.049) \\
& 9 & 0.605(0.007) & 8.630(0.033) & 1.010(0.006) & 10.041(0.044) & 0.620(0.005) & 8.479(0.023) \\
& 8 & 0.528(0.008) & 7.268(0.036) & 0.875(0.009) & 8.465(0.041) & 0.543(0.009) & 7.219(0.034) \\
& 7 & 0.485(0.003) & 6.333(0.027) & 0.774(0.002) & 7.328(0.038) & 0.499(0.002) & 6.297(0.035) \\
& 6 & 0.439(0.007) & 5.360(0.043) & 0.668(0.007) & 6.178(0.044) & 0.448(0.007) & 5.362(0.038) \\
& 5 & 0.362(0.007) & 4.694(0.013) & 0.532(0.009) & 5.329(0.017) & 0.364(0.008) & 4.665(0.048) \\
& 4 & 0.302(0.007) & 4.060(0.038) & 0.417(0.006) & 4.527(0.041) & 0.297(0.006) & 4.088(0.038) \\
& 3 & 0.220(0.005) & 3.663(0.040) & 0.288(0.005) & 3.912(0.039) & 0.208(0.005) & 3.630(0.038) \\
& 2 & 0.122(0.009) & 3.303(0.031) & 0.159(0.009) & 3.446(0.034) & 0.111(0.009) & 3.282(0.032) \\
& 1.5 & 0.103(0.008) & 3.260(0.020) & 0.130(0.008) & 3.350(0.022) & 0.094(0.008) & 3.221(0.020) \\
& 1 & 0.061(0.006) & 3.186(0.021) & 0.077(0.007) & 3.233(0.021) & 0.055(0.007) & 3.131(0.022) \\
& 0.75 & 0.052(0.004) & 3.172(0.020) & 0.065(0.004) & 3.205(0.020) & 0.047(0.004) & 3.116(0.019) \\
& 0.5 & 0.033(0.006) & 3.155(0.010) & 0.040(0.006) & 3.171(0.010) & 0.030(0.006) & 3.091(0.010) \\
& 0.1 & 0.016(0.007) & 3.153(0.019) & 0.018(0.007) & 3.156(0.020) & 0.015(0.007) & 3.087(0.018) \\
\hline
\multirow{14}{*}{20} & 10 & 0.479(0.010) & 6.940(0.035) & 0.821(0.011) & 7.846(0.037) & 0.488(0.011) & 6.882(0.031) \\
& 9 & 0.457(0.007) & 6.007(0.026) & 0.756(0.007) & 6.817(0.034) & 0.465(0.007) & 5.985(0.030) \\
& 8 & 0.408(0.010) & 5.160(0.026) & 0.664(0.011) & 5.840(0.029) & 0.415(0.010) & 5.151(0.022) \\
& 7 & 0.353(0.012) & 4.331(0.040) & 0.565(0.013) & 4.882(0.048) & 0.360(0.012) & 4.327(0.040) \\
& 6 & 0.318(0.005) & 3.722(0.043) & 0.485(0.006) & 4.172(0.047) & 0.322(0.005) & 3.731(0.042) \\
& 5 & 0.263(0.006) & 3.198(0.032) & 0.384(0.006) & 3.552(0.034) & 0.263(0.006) & 3.219(0.032) \\
& 4 & 0.204(0.006) & 2.810(0.004) & 0.285(0.006) & 3.061(0.003) & 0.199(0.006) & 2.829(0.004) \\
& 3 & 0.169(0.005) & 2.529(0.015) & 0.216(0.006) & 2.693(0.016) & 0.161(0.005) & 2.538(0.015) \\
& 2 & 0.108(0.003) & 2.364(0.009) & 0.132(0.002) & 2.443(0.009) & 0.100(0.002) & 2.357(0.009) \\
& 1.5 & 0.080(0.003) & 2.294(0.017) & 0.096(0.003) & 2.342(0.016) & 0.073(0.003) & 2.278(0.017) \\
& 1 & 0.052(0.007) & 2.241(0.009) & 0.061(0.007) & 2.261(0.010) & 0.047(0.007) & 2.215(0.009) \\
& 0.75 & 0.035(0.008) & 2.229(0.006) & 0.041(0.008) & 2.241(0.006) & 0.031(0.008) & 2.200(0.006) \\
& 0.5 & 0.024(0.006) & 2.225(0.017) & 0.029(0.006) & 2.227(0.017) & 0.022(0.006) & 2.193(0.016) \\
& 0.1 & 0.010(0.002) & 2.212(0.015) & 0.010(0.002) & 2.212(0.015) & 0.010(0.002) & 2.179(0.015) \\
\hline
\multirow{14}{*}{25} & 10 & 0.379(0.015) & 5.231(0.033) & 0.649(0.015) & 5.824(0.044) & 0.383(0.015) & 5.225(0.035) \\
& 9 & 0.349(0.007) & 4.537(0.027) & 0.586(0.007) & 5.048(0.032) & 0.353(0.007) & 4.536(0.028) \\
& 8 & 0.317(0.004) & 3.917(0.030) & 0.520(0.005) & 4.342(0.033) & 0.321(0.004) & 3.915(0.028) \\
& 7 & 0.280(0.004) & 3.367(0.024) & 0.448(0.004) & 3.715(0.027) & 0.279(0.002) & 3.364(0.027) \\
& 6 & 0.258(0.009) & 2.904(0.019) & 0.388(0.007) & 3.175(0.014) & 0.257(0.007) & 2.895(0.011) \\
& 5 & 0.215(0.009) & 2.482(0.022) & 0.310(0.008) & 2.694(0.021) & 0.214(0.007) & 2.480(0.018) \\
& 4 & 0.167(0.009) & 2.136(0.013) & 0.230(0.009) & 2.293(0.014) & 0.164(0.009) & 2.147(0.012) \\
& 3 & 0.135(0.006) & 1.937(0.008) & 0.171(0.006) & 2.039(0.008) & 0.130(0.006) & 1.943(0.007) \\
& 2 & 0.083(0.004) & 1.794(0.009) & 0.100(0.004) & 1.843(0.009) & 0.077(0.004) & 1.791(0.009) \\
& 1.5 & 0.065(0.007) & 1.751(0.009) & 0.075(0.007) & 1.778(0.010) & 0.060(0.007) & 1.742(0.010) \\
& 1 & 0.048(0.005) & 1.699(0.015) & 0.053(0.005) & 1.716(0.014) & 0.044(0.005) & 1.701(0.012) \\
& 0.75 & 0.025(0.004) & 1.711(0.014) & 0.028(0.004) & 1.716(0.014) & 0.021(0.004) & 1.695(0.014) \\
& 0.5 & 0.025(0.005) & 1.697(0.008) & 0.027(0.005) & 1.696(0.008) & 0.023(0.005) & 1.679(0.008) \\
& 0.1 & 0.003(0.004) & 1.682(0.013) & 0.004(0.004) & 1.679(0.013) & 0.002(0.004) & 1.663(0.012) \\
\hline
\end{tabular}
}
\end{table}
% =======================================================================
% Table 3.1 (b). Simulated Bias and MSE of three estimators of $\theta$ ($n=50,75,100$)
% =======================================================================
\newpage
\addtocounter{table}{-1}
\begin{table}[H]
\centering
\caption{(b). Simulated Bias and MSE of three estimators of $\theta$ ($n=50,75,100$).}
\label{tab:sim_bias_mse_b}
\setlength{\tabcolsep}{6.0pt}
\renewcommand{\arraystretch}{1.35}
\resizebox{0.9\textwidth}{!}{%
\begin{tabular}{|c|c|c|c|c|c|c|c|}
\hline
\multirow{2}{*}{$n$} & \multirow{2}{*}{$\theta$} &
\multicolumn{2}{c|}{MLE} &
\multicolumn{2}{c|}{BFPE} &
\multicolumn{2}{c|}{BJPE} \\ \cline{3-8}
& & Bias(SE) & MSE(SE) &
Bias(SE) & MSE(SE) &
Bias(SE) & MSE(SE)\\
\hline
\multirow{14}{*}{50}
& 10 & 0.194(0.006) & 2.439(0.008) & 0.325(0.007) & 2.578(0.006) & 0.192(0.007) & 2.434(0.006) \\
& 9 & 0.184(0.011) & 2.070(0.019) & 0.299(0.009) & 2.191(0.019) & 0.183(0.009) & 2.068(0.019) \\
& 8 & 0.145(0.006) & 1.783(0.011) & 0.243(0.006) & 1.880(0.012) & 0.144(0.006) & 1.782(0.012) \\
& 7 & 0.139(0.004) & 1.546(0.008) & 0.220(0.004) & 1.627(0.007) & 0.138(0.004) & 1.544(0.007) \\
& 6 & 0.130(0.004) & 1.347(0.010) & 0.193(0.004) & 1.408(0.011) & 0.128(0.005) & 1.341(0.011) \\
& 5 & 0.104(0.006) & 1.148(0.009) & 0.152(0.006) & 1.199(0.008) & 0.104(0.006) & 1.148(0.008) \\
& 4 & 0.082(0.002) & 1.007(0.005) & 0.113(0.002) & 1.045(0.006) & 0.082(0.002) & 1.007(0.005) \\
& 3 & 0.066(0.002) & 0.905(0.006) & 0.082(0.002) & 0.936(0.008) & 0.064(0.002) & 0.905(0.006) \\
& 2 & 0.048(0.005) & 0.830(0.003) & 0.055(0.005) & 0.842(0.004) & 0.046(0.005) & 0.830(0.003) \\
& 1.5 & 0.026(0.002) & 0.809(0.005) & 0.029(0.002) & 0.816(0.005) & 0.024(0.002) & 0.808(0.005) \\
& 1 & 0.018(0.002) & 0.802(0.003) & 0.020(0.002) & 0.805(0.003) & 0.017(0.002) & 0.800(0.003) \\
& 0.75 & 0.014(0.003) & 0.786(0.006) & 0.015(0.003) & 0.787(0.006) & 0.013(0.003) & 0.784(0.006) \\
& 0.5 & 0.012(0.002) & 0.786(0.002) & 0.015(0.002) & 0.786(0.002) & 0.013(0.002) & 0.783(0.002) \\
& 0.1 & 0.007(0.003) & 0.786(0.005) & 0.007(0.003) & 0.785(0.005) & 0.006(0.003) & 0.783(0.005) \\
\hline
\multirow{14}{*}{75}
& 10 & 0.127(0.007) & 1.580(0.008) & 0.215(0.007) & 1.641(0.010) & 0.127(0.007) & 1.578(0.009) \\
& 9 & 0.109(0.006) & 1.355(0.004) & 0.187(0.006) & 1.406(0.005) & 0.110(0.006) & 1.353(0.004) \\
& 8 & 0.104(0.004) & 1.173(0.010) & 0.170(0.004) & 1.218(0.010) & 0.104(0.004) & 1.174(0.010) \\
& 7 & 0.087(0.004) & 1.014(0.003) & 0.142(0.004) & 1.046(0.006) & 0.087(0.004) & 1.010(0.006) \\
& 6 & 0.076(0.005) & 0.872(0.004) & 0.119(0.006) & 0.900(0.006) & 0.076(0.005) & 0.871(0.005) \\
& 5 & 0.066(0.003) & 0.756(0.006) & 0.097(0.006) & 0.776(0.006) & 0.066(0.003) & 0.754(0.006) \\
& 4 & 0.055(0.003) & 0.652(0.002) & 0.076(0.003) & 0.668(0.002) & 0.055(0.003) & 0.653(0.002) \\
& 3 & 0.042(0.003) & 0.584(0.004) & 0.053(0.003) & 0.594(0.004) & 0.042(0.003) & 0.584(0.004) \\
& 2 & 0.022(0.005) & 0.543(0.002) & 0.026(0.005) & 0.548(0.002) & 0.021(0.005) & 0.543(0.002) \\
& 1.5 & 0.016(0.004) & 0.528(0.002) & 0.019(0.004) & 0.531(0.002) & 0.016(0.004) & 0.528(0.002) \\
& 1 & 0.016(0.002) & 0.518(0.004) & 0.017(0.002) & 0.525(0.004) & 0.016(0.002) & 0.523(0.003) \\
& 0.75 & 0.014(0.004) & 0.522(0.002) & 0.014(0.004) & 0.523(0.002) & 0.013(0.004) & 0.522(0.003) \\
& 0.5 & 0.011(0.003) & 0.511(0.003) & 0.011(0.003) & 0.511(0.003) & 0.010(0.003) & 0.510(0.003) \\
& 0.1 & 0.007(0.002) & 0.502(0.005) & 0.007(0.002) & 0.502(0.006) & 0.007(0.002) & 0.501(0.005) \\
\hline
\multirow{14}{*}{100}
& 10 & 0.092(0.002) & 1.158(0.004) & 0.153(0.002) & 1.189(0.005) & 0.091(0.002) & 1.155(0.005) \\
& 9 & 0.092(0.002) & 1.019(0.006) & 0.147(0.003) & 1.045(0.006) & 0.089(0.003) & 1.015(0.006) \\
& 8 & 0.081(0.002) & 0.866(0.004) & 0.131(0.002) & 0.892(0.004) & 0.081(0.002) & 0.866(0.004) \\
& 7 & 0.065(0.003) & 0.739(0.005) & 0.104(0.003) & 0.757(0.006) & 0.063(0.003) & 0.737(0.005) \\
& 6 & 0.053(0.005) & 0.637(0.003) & 0.086(0.005) & 0.653(0.003) & 0.054(0.005) & 0.637(0.003) \\
& 5 & 0.048(0.002) & 0.553(0.005) & 0.071(0.002) & 0.565(0.005) & 0.048(0.002) & 0.553(0.005) \\
& 4 & 0.044(0.002) & 0.479(0.002) & 0.059(0.002) & 0.488(0.002) & 0.044(0.002) & 0.479(0.002) \\
& 3 & 0.033(0.005) & 0.434(0.002) & 0.042(0.004) & 0.440(0.002) & 0.033(0.004) & 0.434(0.002) \\
& 2 & 0.031(0.004) & 0.402(0.003) & 0.034(0.004) & 0.405(0.003) & 0.031(0.004) & 0.402(0.003) \\
& 1.5 & 0.014(0.004) & 0.388(0.002) & 0.015(0.004) & 0.390(0.002) & 0.014(0.004) & 0.388(0.002) \\
& 1 & 0.013(0.004) & 0.381(0.003) & 0.015(0.004) & 0.382(0.003) & 0.012(0.004) & 0.381(0.003) \\
& 0.75 & 0.009(0.001) & 0.379(0.002) & 0.011(0.003) & 0.380(0.003) & 0.009(0.003) & 0.379(0.003) \\
& 0.5 & 0.008(0.001) & 0.378(0.002) & 0.007(0.001) & 0.378(0.002) & 0.004(0.002) & 0.378(0.002) \\
& 0.1 & 0.005(0.001) & 0.375(0.001) & 0.004(0.001) & 0.375(0.001) & 0.004(0.001) & 0.375(0.001) \\
\hline
\end{tabular}
}
\end{table}
% ================================================================
% Section 4. Goodness of Fit (GoF) Tests for Frank Copula
% ================================================================
\section{Goodness of Fit (GoF) Tests for Frank Copula}
Based on \textit{iid} observations $(X_i,Y_i)$, $1 \le i \le n$, on $(X,Y)$,
if our goal is to test that $(X,Y)$ follows a bivariate Frank Copula
with association parameter $\theta$, then it is equivalent to test that
$(U,V)$ follows $\mathrm{SBFCD(\theta)}$ with \textit{pdf}
$c(u,v \mid \theta)$ as given in \eqref{eq:frank_density}.
\medskip
Genest et al.(2006)~\cite{GenestRemillard2006} discussed two test statistics in a more general
setting which are being discussed in the following at great length for
our $\mathrm{SBFCD(\theta)}$. For details on the asymptotic behaviors of
these two test statistics, one can refer look at the aforementioned paper.
\medskip
% ================================================================
% equation (4.1) Define Wj
% ================================================================
Define the pseudo-observations $W_j$, $1 \le j \le n$, as follows:
\begin{equation}
\begin{aligned}
W_j
&= (1/n)\sum_{k=1}^{n} I(X_k \le X_j,\; Y_k \le Y_j) \\
&= (1/n)\sum_{k=1}^{n} I(R_k^{X} \le R_j^{X},\; R_k^{Y} \le R_j^{Y}),
\end{aligned}
\label{eq:Wj}
\end{equation}
\noindent where $R_j^{X}$ is the rank of $X_j$ among $\{X_1, X_2, \ldots, X_n\}$,
and $R_j^{Y}$ is the rank of $Y_j$ among $\{Y_1, Y_2, \ldots, Y_n\}$.
\medskip
% ================================================================
% equation (4.2) Define Kn(t)
% ================================================================
Define $K_n(t)$, the empirical \textit{cdf} based on the pseudo-observations $W_j$, $1 \le j \le n$, as
\begin{equation}
K_n(t) = (1/n)\sum_{j=1}^{n} I(W_j \le t), \qquad t \in [0,1].
\label{eq:Kn}
\end{equation}
\medskip
On the other hand, let $K(t,\theta)$ be the \textit{cdf} of $F(X,Y)$ at $t$
under the assumed Frank Copula with association parameter $\theta$,
i.e.,
% ================================================================
% equation (4.3) {eq:Ktheta}
% ================================================================
\begin{equation}
P(F(X,Y) \le t) = K(t,\theta),
\label{eq:Ktheta}
\end{equation}
\noindent (see Table 1, page 344 in Genest et al.(2006) \cite{GenestRemillard2006}).
\medskip
% ================================================================
% equation (4.4) Define K(t,theta) - cdf of F(X,Y)
% ================================================================
Let $k(t,\theta)$ be the density obtained from $K(t,\theta)$, i.e.,
$ k(t,\theta) = (\partial/\partial t) K(t,\theta).$
Note that for the Frank Copula,
\begin{equation}
K(t,\theta)
=
t
-
\left\{(1-\mathit{exp}(\theta t))/\theta \right\}
\mathit{ln} \left\{
(1-\mathit{exp}(-\theta))/(1-\mathit{exp}(-\theta t))
\right\}.
\label{eq:K_frank}
\end{equation}
% ================================================================
% equation (4.5) Define k(t,theta) - density from K(t,theta)
% ================================================================
Hence, after some simplifications, we have
\begin{equation}
k(t,\theta)
=
\mathit{exp}(\theta t)
\mathit{ln} \left\{
% \frac{(1-\exp(-\theta))}{(1-\exp(-\theta t))}
(1-\mathit{exp}(-\theta))/(1-\mathit{exp}(-\theta t))
\right\}.
\label{eq:k_frank}
\end{equation}
The two GoF test statistics of interest are:
\medskip
% ================================================================
% equation (4.6) Cramér–von Mises Statistic - Sn - Original formula
% ================================================================
\noindent \textbf{(a) Cramér--von Mises statistic} $\bm{S_n}$, given as
\begin{equation}
S_n
=
\int_{0}^{1}
n \left\{ K_n(t) - K(t,\hat{\theta}) \right\}^{2}
k(t,\hat{\theta}) \, dt , \text{ and}
\label{eq:Sn}
\end{equation}
% ================================================================
% equation (4.7) Kolmogorov--Smirnov statistic - Tn - Original formula
% ================================================================
\noindent \textbf{(b) Kolmogorov--Smirnov statistic} $\bm{T_n}$, given by
\begin{equation}
T_n
=
\mathit{sup}_{0 \le t \le 1}
\left[
\sqrt{n}\, | K_n(t) - K(t,\hat{\theta}) |
\right],
\label{eq:Tn}
\end{equation}
\noindent where $\hat{\theta}$ is a consistent estimator of $\theta$.
\medskip
% ================================================================
% equation (4.8) Cramér–von Mises Statistic - Sn - Genest formula
% ================================================================
However, Genest et al.(2006)~\cite{GenestRemillard2006} (see page 346) provided simplified
expressions of $S_n$ and $T_n$ as follows.
\begin{equation}
\begin{aligned}
S_n
&=
n/3
+
n \sum_{j=1}^{n-1}
K_n^{2}(j/n)
\left\{
K((j+1)/n,\hat{\theta})
-
K(j/n,\hat{\theta})
\right\}
\\
&\quad
-
n \sum_{j=1}^{n}
K_n(j/n)
\left\{
K^{2}((j+1)/n,\hat{\theta})
-
K^{2}(j/n,\hat{\theta})
\right\}.
\end{aligned}
\label{eq:Sn_simplified}
\end{equation}
% ================================================================
% equation (4.9) Kolmogorov--Smirnov statistic - Tn - Genest formula
% ================================================================
\begin{equation}
T_n
=
\sqrt{n}
\operatorname*{\mathit{max}}_{\substack{i = 0,1; \\ 0 \le j \le n-1}}
\left\{
\left|
K_n(j/n)
-
K((j+i)/n,\hat{\theta})
\right|
\right\}.
\label{eq:Tn_simplified}
\end{equation}
Under some regularity conditions, which are satisfied by the Frank Copula,
it was shown that the functional
$
K_n^{*}(t)
=
\sqrt{n}\left\{K_n(t)-K(t,\hat{\theta})\right\}
$
converges weakly to a suitable Gaussian distribution.
\medskip
Genest et al.(2006)~\cite{GenestRemillard2006} carried out a very limited simulation to obtain the
$90^{\text{th}}$ and $95^{\text{th}}$ percentile values of $S_n$ and $T_n$
using $1000$ replications. The null distributions of $S_n$ and $T_n$ do
depend on the unknown association parameter $\theta$, which, in turn,
dicitates the value of $\tau(\theta)$ (see Subsection~1.2).
Genest et al.(2006)~\cite{GenestRemillard2006} provided the values of the two above mentioned
percentiles for $n = 100, 250,$ and $1000$, and
$\tau(\theta) = 0.20, 0.40, 0.60,$ and $0.80$.
\medskip
In this comprehensive work of ours, we provide extended percentile tables for the GoF test statistics of $S_n$ and $T_n$ based on $10,000$ replications for each combination of $(n,\theta)$ and undertake an in-depth investigation about some distrubutional properties of $S_n$ and $T_n$.
\medskip
Let $S_n(1-\alpha \mid \theta)$ and $T_n(1-\alpha \mid\theta)$ denote the $100(1-\alpha)^{\text{th}}$ percentile values of $S_n$ and $T_n$ (when the dataset is assumed to have come from a joint distribution under the Frank Copula). Therefore, ideally one should reject the Frank Copula model at level $\alpha$ if $S_n$ (and/or $T_n$) exceeds $S_n(1-\alpha \mid \theta)$ (and/or $T_n(1-\alpha \mid\theta)$.
\medskip
The following four tables (Table~\ref{tab:Sn090} - \ref{tab:Tn095}) tabulate the values of $S_n(1-\alpha \mid\theta)$ and $T_n(1-\alpha \mid\theta)$ with $(1-\alpha) = 0.90, 0.95;$ $n$ ranging from $25$ to $500$; and $\theta$ going from $(-25)$ to $(+25)$. And, these tables do reveal some unexpected trends.
\medskip
% ===================================================================
% Table. 4.1 Values of $S_n(0.90)$ for various $n$ and $\theta$
% ===================================================================
\begin{table}[H]
% \renewcommand{\arraystretch}{1.0} % tăng chiều cao dòng
\centering
\caption{Values of $S_n(0.90 \mid \theta)$ for various $n$ and $\theta$}
\label{tab:Sn090}
\renewcommand{\arraystretch}{1.0} % tăng chiều cao dòng
\setlength{\tabcolsep}{6.0pt}
\resizebox{0.9 \textwidth}{!}{
\begin{tabular}{|c|cccccccccc|}
\hline
\multirow{2}{*}{$\theta$}
& \multicolumn{10}{c|}{$n$} \\
\cline{2-11}
& $25$ & $50$ & $75$ & $100$ & $150$ & $200$ & $250$ & $500$ & $750$ & $1000$ \\
\hline
-25.00 & 3.843 & 2.749 & 2.123 & 1.737 & 1.303 & 1.073 & 0.932 & 0.589 & 0.458 & 0.408 \\
-20.00 & 3.025 & 2.072 & 1.559 & 1.277 & 0.980 & 0.810 & 0.697 & 0.461 & 0.376 & 0.326 \\
-15.00 & 2.188 & 1.437 & 1.095 & 0.898 & 0.702 & 0.581 & 0.515 & 0.354 & 0.298 & 0.263 \\
-10.00 & 1.389 & 0.892 & 0.691 & 0.583 & 0.467 & 0.404 & 0.362 & 0.266 & 0.235 & 0.219 \\
-9.00 & 1.243 & 0.798 & 0.630 & 0.529 & 0.428 & 0.370 & 0.333 & 0.255 & 0.228 & 0.209 \\
-8.00 & 1.089 & 0.719 & 0.553 & 0.480 & 0.390 & 0.337 & 0.304 & 0.237 & 0.214 & 0.197 \\
-7.00 & 0.969 & 0.623 & 0.497 & 0.427 & 0.354 & 0.303 & 0.281 & 0.218 & 0.199 & 0.186 \\
-6.00 & 0.842 & 0.552 & 0.438 & 0.384 & 0.313 & 0.283 & 0.257 & 0.210 & 0.192 & 0.179 \\
-5.00 & 0.723 & 0.472 & 0.391 & 0.334 & 0.276 & 0.253 & 0.230 & 0.192 & 0.179 & 0.173 \\
-4.00 & 0.610 & 0.410 & 0.330 & 0.292 & 0.246 & 0.222 & 0.206 & 0.178 & 0.168 & 0.158 \\
-3.00 & 0.505 & 0.342 & 0.286 & 0.251 & 0.218 & 0.199 & 0.185 & 0.160 & 0.152 & 0.150 \\
-2.00 & 0.417 & 0.288 & 0.243 & 0.213 & 0.188 & 0.171 & 0.166 & 0.146 & 0.138 & 0.134 \\
-1.50 & 0.375 & 0.267 & 0.224 & 0.194 & 0.175 & 0.160 & 0.154 & 0.140 & 0.133 & 0.133 \\
-1.00 & 0.341 & 0.241 & 0.200 & 0.181 & 0.161 & 0.152 & 0.146 & 0.134 & 0.129 & 0.127 \\
-0.75 & 0.324 & 0.223 & 0.195 & 0.174 & 0.155 & 0.147 & 0.141 & 0.130 & 0.129 & 0.124 \\
-0.50 & 0.308 & 0.217 & 0.186 & 0.166 & 0.152 & 0.145 & 0.139 & 0.129 & 0.125 & 0.122 \\
-0.10 & 0.285 & 0.205 & 0.172 & 0.159 & 0.146 & 0.138 & 0.134 & 0.123 & 0.120 & 0.119 \\
\hline
0.10 & 0.272 & 0.200 & 0.171 & 0.155 & 0.142 & 0.136 & 0.131 & 0.123 & 0.119 & 0.117 \\
0.50 & 0.254 & 0.182 & 0.162 & 0.148 & 0.138 & 0.130 & 0.127 & 0.119 & 0.114 & 0.116 \\
0.75 & 0.243 & 0.178 & 0.156 & 0.145 & 0.134 & 0.130 & 0.126 & 0.116 & 0.115 & 0.113 \\
1.00 & 0.229 & 0.171 & 0.151 & 0.141 & 0.130 & 0.127 & 0.123 & 0.118 & 0.114 & 0.114 \\
1.50 & 0.213 & 0.160 & 0.145 & 0.136 & 0.125 & 0.122 & 0.119 & 0.112 & 0.112 & 0.110 \\
2.00 & 0.196 & 0.149 & 0.137 & 0.129 & 0.124 & 0.116 & 0.115 & 0.110 & 0.109 & 0.107 \\
3.00 & 0.171 & 0.137 & 0.124 & 0.121 & 0.115 & 0.111 & 0.111 & 0.106 & 0.106 & 0.104 \\
4.00 & 0.153 & 0.126 & 0.116 & 0.113 & 0.110 & 0.106 & 0.105 & 0.101 & 0.102 & 0.101 \\
5.00 & 0.138 & 0.117 & 0.110 & 0.108 & 0.102 & 0.101 & 0.099 & 0.097 & 0.096 & 0.095 \\
6.00 & 0.128 & 0.109 & 0.102 & 0.099 & 0.096 & 0.095 & 0.094 & 0.092 & 0.092 & 0.090 \\
7.00 & 0.119 & 0.099 & 0.095 & 0.094 & 0.091 & 0.089 & 0.088 & 0.087 & 0.087 & 0.086 \\
8.00 & 0.110 & 0.095 & 0.091 & 0.089 & 0.085 & 0.083 & 0.084 & 0.081 & 0.080 & 0.081 \\
9.00 & 0.103 & 0.090 & 0.086 & 0.082 & 0.080 & 0.080 & 0.078 & 0.077 & 0.077 & 0.077 \\
10.00 & 0.098 & 0.084 & 0.080 & 0.078 & 0.075 & 0.074 & 0.074 & 0.073 & 0.073 & 0.070 \\
15.00 & 0.076 & 0.064 & 0.061 & 0.059 & 0.058 & 0.056 & 0.056 & 0.054 & 0.054 & 0.054 \\
20.00 & 0.063 & 0.053 & 0.049 & 0.047 & 0.045 & 0.044 & 0.044 & 0.043 & 0.043 & 0.042 \\
25.00 & 0.055 & 0.045 & 0.041 & 0.040 & 0.038 & 0.037 & 0.036 & 0.035 & 0.035 & 0.035 \\
\hline
\end{tabular}
}
\end{table}
% ===================================================================
% Table 4.2. Values of $S_n(0.95)$ for various $n$ and $\theta$
% ===================================================================
\begin{table}[H]
\centering
\caption{Values of $S_n(0.95 \mid \theta)$ for various $n$ and $\theta$}
\label{tab:Sn095}
\renewcommand{\arraystretch}{1.0} % tăng chiều cao dòng
\setlength{\tabcolsep}{6.0pt}
\resizebox{0.9 \textwidth}{!}{
\begin{tabular}{|c|cccccccccc|}
\hline
\multirow{2}{*}{$\theta$}
& \multicolumn{10}{c|}{$n$} \\
\cline{2-11}
& $25$ & $50$ & $75$ & $100$ & $150$ & $200$ & $250$ & $500$ & $750$ & $1000$ \\
\hline
-25.00 & 4.152 & 2.983 & 2.314 & 1.913 & 1.446 & 1.204 & 1.048 & 0.688 & 0.544 & 0.493 \\
-20.00 & 3.280 & 2.268 & 1.723 & 1.426 & 1.108 & 0.928 & 0.803 & 0.552 & 0.454 & 0.399 \\
-15.00 & 2.417 & 1.584 & 1.229 & 1.021 & 0.811 & 0.682 & 0.610 & 0.431 & 0.368 & 0.334 \\
-10.00 & 1.567 & 1.017 & 0.790 & 0.679 & 0.551 & 0.488 & 0.442 & 0.336 & 0.296 & 0.282 \\
-9.00 & 1.401 & 0.915 & 0.730 & 0.628 & 0.509 & 0.447 & 0.407 & 0.313 & 0.285 & 0.260 \\
-8.00 & 1.239 & 0.825 & 0.652 & 0.570 & 0.466 & 0.409 & 0.379 & 0.302 & 0.270 & 0.249 \\
-7.00 & 1.105 & 0.723 & 0.597 & 0.505 & 0.430 & 0.379 & 0.355 & 0.276 & 0.250 & 0.235 \\
-6.00 & 0.978 & 0.636 & 0.518 & 0.460 & 0.383 & 0.353 & 0.321 & 0.264 & 0.242 & 0.225 \\
-5.00 & 0.851 & 0.559 & 0.465 & 0.405 & 0.338 & 0.314 & 0.282 & 0.241 & 0.229 & 0.216 \\
-4.00 & 0.711 & 0.489 & 0.395 & 0.353 & 0.302 & 0.277 & 0.250 & 0.223 & 0.211 & 0.205 \\
-3.00 & 0.597 & 0.409 & 0.348 & 0.304 & 0.268 & 0.246 & 0.230 & 0.203 & 0.189 & 0.185 \\
-2.00 & 0.495 & 0.348 & 0.295 & 0.264 & 0.230 & 0.212 & 0.206 & 0.181 & 0.175 & 0.167 \\
-1.50 & 0.447 & 0.320 & 0.272 & 0.241 & 0.214 & 0.196 & 0.190 & 0.176 & 0.168 & 0.166 \\
-1.00 & 0.407 & 0.291 & 0.240 & 0.221 & 0.199 & 0.186 & 0.182 & 0.165 & 0.157 & 0.158 \\
-0.75 & 0.385 & 0.272 & 0.239 & 0.213 & 0.189 & 0.182 & 0.173 & 0.159 & 0.161 & 0.155 \\
-0.50 & 0.374 & 0.259 & 0.225 & 0.204 & 0.188 & 0.176 & 0.173 & 0.159 & 0.155 & 0.148 \\
-0.10 & 0.343 & 0.248 & 0.209 & 0.197 & 0.180 & 0.169 & 0.163 & 0.150 & 0.149 & 0.147 \\
\hline
0.10 & 0.325 & 0.243 & 0.208 & 0.189 & 0.174 & 0.165 & 0.159 & 0.151 & 0.148 & 0.146 \\
0.50 & 0.306 & 0.217 & 0.199 & 0.180 & 0.167 & 0.159 & 0.155 & 0.144 & 0.139 & 0.143 \\
0.75 & 0.290 & 0.210 & 0.187 & 0.176 & 0.162 & 0.157 & 0.154 & 0.141 & 0.139 & 0.138 \\
1.00 & 0.274 & 0.204 & 0.182 & 0.168 & 0.157 & 0.152 & 0.150 & 0.146 & 0.138 & 0.138 \\
1.50 & 0.253 & 0.190 & 0.173 & 0.165 & 0.152 & 0.146 & 0.143 & 0.136 & 0.137 & 0.134 \\
2.00 & 0.231 & 0.175 & 0.162 & 0.156 & 0.149 & 0.140 & 0.141 & 0.133 & 0.132 & 0.131 \\
3.00 & 0.199 & 0.159 & 0.146 & 0.144 & 0.139 & 0.134 & 0.133 & 0.128 & 0.129 & 0.125 \\
4.00 & 0.177 & 0.147 & 0.137 & 0.132 & 0.129 & 0.126 & 0.125 & 0.121 & 0.121 & 0.121 \\
5.00 & 0.159 & 0.137 & 0.130 & 0.126 & 0.122 & 0.118 & 0.118 & 0.117 & 0.111 & 0.116 \\
6.00 & 0.147 & 0.125 & 0.119 & 0.115 & 0.115 & 0.115 & 0.111 & 0.109 & 0.110 & 0.107 \\
7.00 & 0.135 & 0.114 & 0.111 & 0.112 & 0.108 & 0.105 & 0.104 & 0.103 & 0.104 & 0.102 \\
8.00 & 0.125 & 0.110 & 0.106 & 0.104 & 0.099 & 0.098 & 0.099 & 0.095 & 0.095 & 0.096 \\
9.00 & 0.117 & 0.104 & 0.100 & 0.095 & 0.095 & 0.094 & 0.092 & 0.092 & 0.091 & 0.091 \\
10.00 & 0.110 & 0.097 & 0.093 & 0.090 & 0.088 & 0.088 & 0.087 & 0.085 & 0.085 & 0.083 \\
15.00 & 0.085 & 0.073 & 0.069 & 0.068 & 0.066 & 0.064 & 0.064 & 0.062 & 0.062 & 0.062 \\
20.00 & 0.071 & 0.059 & 0.056 & 0.054 & 0.051 & 0.050 & 0.050 & 0.048 & 0.048 & 0.048 \\
25.00 & 0.061 & 0.050 & 0.046 & 0.044 & 0.042 & 0.041 & 0.041 & 0.040 & 0.039 & 0.039 \\
\hline
\end{tabular}
}
\end{table}
% ===================================================================
% Table 4.3. Values of $T_n(0.90)$ for various $n$ and $\theta$
% ===================================================================
\begin{table}[H]
\centering
\caption{Values of $T_n(0.90 \mid \theta)$ for various $n$ and $\theta$}
\label{tab:Tn090}
\renewcommand{\arraystretch}{1.0} % tăng chiều cao dòng
\setlength{\tabcolsep}{6.0pt}
\resizebox{0.9\textwidth}{!}{
\begin{tabular}{|c|cccccccccc|}
\hline
\multirow{2}{*}{$\theta$}
& \multicolumn{10}{c|}{$n$} \\
\cline{2-11}
& $25$ & $50$ & $75$ & $100$ & $150$ & $200$ & $250$ & $500$ & $750$ & $1000$ \\
\hline
-25.00 & 2.267 & 2.653 & 2.648 & 2.537 & 2.332 & 2.176 & 2.044 & 1.704 & 1.538 & 1.461 \\
-20.00 & 2.255 & 2.465 & 2.370 & 2.240 & 2.062 & 1.919 & 1.810 & 1.528 & 1.401 & 1.321 \\
-15.00 & 2.146 & 2.198 & 2.069 & 1.944 & 1.779 & 1.666 & 1.576 & 1.364 & 1.269 & 1.215 \\
-10.00 & 1.951 & 1.858 & 1.717 & 1.614 & 1.489 & 1.411 & 1.347 & 1.202 & 1.146 & 1.117 \\
-9.00 & 1.897 & 1.769 & 1.641 & 1.548 & 1.427 & 1.361 & 1.304 & 1.181 & 1.123 & 1.093 \\
-8.00 & 1.815 & 1.696 & 1.565 & 1.484 & 1.376 & 1.309 & 1.258 & 1.143 & 1.100 & 1.069 \\
-7.00 & 1.763 & 1.608 & 1.499 & 1.417 & 1.315 & 1.250 & 1.213 & 1.106 & 1.071 & 1.040 \\
-6.00 & 1.686 & 1.531 & 1.419 & 1.363 & 1.252 & 1.210 & 1.169 & 1.086 & 1.047 & 1.024 \\
-5.00 & 1.603 & 1.443 & 1.345 & 1.282 & 1.206 & 1.162 & 1.121 & 1.049 & 1.015 & 1.012 \\
-4.00 & 1.506 & 1.368 & 1.273 & 1.215 & 1.140 & 1.103 & 1.067 & 1.015 & 0.996 & 0.980 \\
-3.00 & 1.416 & 1.275 & 1.208 & 1.147 & 1.096 & 1.056 & 1.030 & 0.979 & 0.959 & 0.954 \\
-2.00 & 1.320 & 1.200 & 1.134 & 1.082 & 1.038 & 1.000 & 0.993 & 0.942 & 0.931 & 0.922 \\
-1.50 & 1.272 & 1.162 & 1.100 & 1.047 & 1.008 & 0.981 & 0.964 & 0.937 & 0.920 & 0.914 \\
-1.00 & 1.230 & 1.117 & 1.054 & 1.022 & 0.981 & 0.962 & 0.942 & 0.910 & 0.900 & 0.896 \\
-0.75 & 1.207 & 1.087 & 1.044 & 1.005 & 0.962 & 0.947 & 0.932 & 0.903 & 0.899 & 0.896 \\
-0.50 & 1.183 & 1.070 & 1.025 & 0.983 & 0.956 & 0.940 & 0.933 & 0.908 & 0.887 & 0.881 \\
-0.10 & 1.154 & 1.047 & 0.994 & 0.971 & 0.941 & 0.921 & 0.911 & 0.886 & 0.877 & 0.872 \\
\hline
0.10 & 1.126 & 1.035 & 0.988 & 0.959 & 0.930 & 0.917 & 0.906 & 0.885 & 0.880 & 0.870 \\
0.50 & 1.105 & 1.007 & 0.968 & 0.943 & 0.918 & 0.898 & 0.893 & 0.875 & 0.863 & 0.862 \\
0.75 & 1.082 & 0.994 & 0.948 & 0.935 & 0.909 & 0.897 & 0.888 & 0.862 & 0.858 & 0.851 \\
1.00 & 1.059 & 0.979 & 0.938 & 0.915 & 0.892 & 0.888 & 0.879 & 0.865 & 0.852 & 0.847 \\
1.50 & 1.032 & 0.953 & 0.922 & 0.908 & 0.879 & 0.869 & 0.864 & 0.850 & 0.849 & 0.842 \\
2.00 & 0.998 & 0.926 & 0.900 & 0.882 & 0.869 & 0.856 & 0.850 & 0.844 & 0.839 & 0.834 \\
3.00 & 0.945 & 0.884 & 0.867 & 0.864 & 0.847 & 0.841 & 0.836 & 0.821 & 0.827 & 0.822 \\
4.00 & 0.902 & 0.856 & 0.845 & 0.833 & 0.833 & 0.823 & 0.818 & 0.816 & 0.816 & 0.812 \\
5.00 & 0.859 & 0.834 & 0.821 & 0.819 & 0.808 & 0.805 & 0.804 & 0.801 & 0.795 & 0.797 \\
6.00 & 0.836 & 0.806 & 0.798 & 0.796 & 0.787 & 0.792 & 0.787 & 0.784 & 0.786 & 0.781 \\
7.00 & 0.802 & 0.779 & 0.778 & 0.777 & 0.775 & 0.770 & 0.767 & 0.765 & 0.770 & 0.768 \\
8.00 & 0.777 & 0.766 & 0.761 & 0.757 & 0.755 & 0.752 & 0.755 & 0.751 & 0.746 & 0.753 \\
9.00 & 0.750 & 0.749 & 0.744 & 0.737 & 0.738 & 0.739 & 0.737 & 0.737 & 0.736 & 0.738 \\
10.00 & 0.728 & 0.725 & 0.723 & 0.719 & 0.721 & 0.720 & 0.721 & 0.723 & 0.725 & 0.720 \\
15.00 & 0.623 & 0.636 & 0.644 & 0.644 & 0.647 & 0.648 & 0.648 & 0.647 & 0.651 & 0.652 \\
20.00 & 0.552 & 0.565 & 0.581 & 0.588 & 0.588 & 0.588 & 0.591 & 0.594 & 0.596 & 0.597 \\
25.00 & 0.519 & 0.524 & 0.525 & 0.536 & 0.544 & 0.544 & 0.548 & 0.552 & 0.553 & 0.554 \\
\hline
\end{tabular}
}
\end{table}
% ===================================================================
% Table 4.4. Values of $T_n(0.95)$ for various $n$ and $\theta$
% ===================================================================
\begin{table}[H]
\centering
\caption{Values of $T_n(0.95 \mid \theta)$ for various $n$ and $\theta$}
\label{tab:Tn095}
\renewcommand{\arraystretch}{1.0} % tăng chiều cao dòng
\setlength{\tabcolsep}{6.0pt}
\resizebox{0.9\textwidth}{!}{
\begin{tabular}{|c|cccccccccc|}
\hline
\multirow{2}{*}{$\theta$}
& \multicolumn{10}{c|}{$n$} \\
\cline{2-11}
& $25$ & $50$ & $75$ & $100$ & $150$ & $200$ & $250$ & $500$ & $750$ & $1000$ \\
\hline
-25.00 & 2.394 & 2.793 & 2.783 & 2.663 & 2.453 & 2.289 & 2.144 & 1.805 & 1.631 & 1.562 \\
-20.00 & 2.385 & 2.592 & 2.501 & 2.371 & 2.171 & 2.021 & 1.913 & 1.639 & 1.511 & 1.431 \\
-15.00 & 2.275 & 2.331 & 2.186 & 2.059 & 1.881 & 1.768 & 1.685 & 1.465 & 1.369 & 1.317 \\
-10.00 & 2.086 & 1.975 & 1.821 & 1.717 & 1.590 & 1.511 & 1.452 & 1.302 & 1.249 & 1.219 \\
-9.00 & 2.031 & 1.890 & 1.743 & 1.650 & 1.524 & 1.463 & 1.410 & 1.278 & 1.227 & 1.192 \\
-8.00 & 1.954 & 1.821 & 1.670 & 1.591 & 1.482 & 1.411 & 1.365 & 1.242 & 1.204 & 1.169 \\
-7.00 & 1.889 & 1.714 & 1.604 & 1.512 & 1.422 & 1.360 & 1.317 & 1.205 & 1.164 & 1.138 \\
-6.00 & 1.805 & 1.637 & 1.519 & 1.463 & 1.352 & 1.318 & 1.273 & 1.187 & 1.146 & 1.121 \\
-5.00 & 1.732 & 1.548 & 1.450 & 1.378 & 1.310 & 1.265 & 1.229 & 1.150 & 1.117 & 1.107 \\
-4.00 & 1.623 & 1.471 & 1.371 & 1.308 & 1.238 & 1.203 & 1.160 & 1.120 & 1.092 & 1.076 \\
-3.00 & 1.527 & 1.377 & 1.291 & 1.246 & 1.181 & 1.157 & 1.128 & 1.073 & 1.050 & 1.043 \\
-2.00 & 1.427 & 1.293 & 1.227 & 1.176 & 1.131 & 1.086 & 1.086 & 1.030 & 1.024 & 1.009 \\
-1.50 & 1.375 & 1.251 & 1.195 & 1.130 & 1.098 & 1.066 & 1.050 & 1.022 & 1.000 & 0.994 \\
-1.00 & 1.327 & 1.206 & 1.138 & 1.105 & 1.071 & 1.046 & 1.025 & 0.997 & 0.975 & 0.988 \\
-0.75 & 1.305 & 1.171 & 1.128 & 1.084 & 1.043 & 1.035 & 1.020 & 0.977 & 0.985 & 0.973 \\
-0.50 & 1.281 & 1.158 & 1.107 & 1.065 & 1.037 & 1.017 & 1.010 & 0.987 & 0.975 & 0.960 \\
-0.10 & 1.250 & 1.131 & 1.079 & 1.049 & 1.017 & 1.002 & 0.992 & 0.962 & 0.951 & 0.948 \\
\hline
0.10 & 1.220 & 1.122 & 1.075 & 1.040 & 1.011 & 0.994 & 0.982 & 0.964 & 0.956 & 0.943 \\
0.50 & 1.194 & 1.089 & 1.048 & 1.021 & 0.992 & 0.975 & 0.970 & 0.949 & 0.936 & 0.936 \\
0.75 & 1.176 & 1.069 & 1.031 & 1.006 & 0.981 & 0.974 & 0.964 & 0.933 & 0.934 & 0.926 \\
1.00 & 1.146 & 1.056 & 1.014 & 0.993 & 0.964 & 0.961 & 0.952 & 0.947 & 0.928 & 0.926 \\
1.50 & 1.111 & 1.023 & 0.995 & 0.977 & 0.954 & 0.941 & 0.932 & 0.924 & 0.922 & 0.903 \\
2.00 & 1.074 & 0.992 & 0.971 & 0.953 & 0.939 & 0.925 & 0.924 & 0.915 & 0.912 & 0.908 \\
3.00 & 1.013 & 0.949 & 0.928 & 0.927 & 0.918 & 0.906 & 0.907 & 0.890 & 0.899 & 0.889 \\
4.00 & 0.963 & 0.917 & 0.908 & 0.898 & 0.895 & 0.886 & 0.882 & 0.881 & 0.880 & 0.879 \\
5.00 & 0.915 & 0.895 & 0.883 & 0.882 & 0.869 & 0.864 & 0.866 & 0.861 & 0.859 & 0.859 \\
6.00 & 0.888 & 0.860 & 0.859 & 0.851 & 0.847 & 0.854 & 0.844 & 0.844 & 0.840 & 0.844 \\
7.00 & 0.854 & 0.832 & 0.832 & 0.832 & 0.829 & 0.827 & 0.827 & 0.823 & 0.829 & 0.830 \\
8.00 & 0.819 & 0.817 & 0.810 & 0.810 & 0.811 & 0.808 & 0.808 & 0.810 & 0.802 & 0.810 \\
9.00 & 0.794 & 0.800 & 0.795 & 0.792 & 0.793 & 0.789 & 0.793 & 0.795 & 0.791 & 0.796 \\
10.00 & 0.768 & 0.772 & 0.770 & 0.768 & 0.771 & 0.776 & 0.774 & 0.775 & 0.777 & 0.771 \\
15.00 & 0.664 & 0.672 & 0.682 & 0.685 & 0.690 & 0.690 & 0.691 & 0.692 & 0.696 & 0.694 \\
20.00 & 0.589 & 0.611 & 0.616 & 0.623 & 0.623 & 0.626 & 0.625 & 0.633 & 0.633 & 0.630 \\
25.00 & 0.591 & 0.570 & 0.571 & 0.576 & 0.579 & 0.582 & 0.584 & 0.590 & 0.587 & 0.591 \\
\hline
\end{tabular}
}
\end{table}
% ===================================================================
% Remark 4.1 (a)
% ===================================================================
\begin{remark}
(a) The most striking feature of Tables~\ref{tab:Sn090}--\ref{tab:Tn095} is the lack of
symmetry in the critical values $S_n(1-\alpha \mid \theta)$ and
$T_n(1-\alpha \mid \theta)$ with respect to the association parameter $\theta$. Intuitively, one would expect that these critical values would be the same at $\theta$ and $(-\theta)$ for any $\theta \in \mathbb{R}$, but that is not what is being observed here. After all, the problem of goodness of fit does not change whether the assumed Frank Copula model has positive association or negative association. This is because the distribution function $K(t, \theta)$ (see \eqref{eq:K_frank}) lacks symmetry in the sense that $K(t, -\theta) \neq K(t, \theta)$, and as a result distribution of $S_n$ at $\theta$ is not same as that of $S_n$ at $(-\theta)$. The same holds true for the statistics $T_n$ as well. This is the reason why $S_n(1-\alpha \mid -\theta) \neq S_n(1-\alpha \mid \theta)$ and $T_n(1-\alpha \mid -\theta) \neq T_n(1-\alpha \mid \theta)$.
(b) An interesting relationship in $K(t, \theta)$ is observed, that is $K(t,-\theta) = 1- K(1-t, \theta)$. This identity may explain why the distributions of the statistics $S_n$ and/or $T_n$ may appear approximately symmetric in simulation studies, even though the statistics themselves are not symmetric for a fixed dataset. The following Figures \ref{fig:Sn_n_25_plot} -- \ref{fig:Tn_n_25_plot} show the relative frequency histograms of $10,000$ simulated values of $S_n$ and $T_n$ at $\theta = +3$ and $\theta = -3$, respectively, for $n = 25$, just as a demonstration.
\end{remark}
% ================================================================
% Figure 4.1 Plots of S_n(n =25) at theta = -3. theta = +3
% ================================================================
\begin{figure}[H]
\centering
\includegraphics[width=0.95\textwidth]{H.4.1_Sn_n_25}
\caption{Relative frequency histogram of $S_n$ with $n = 25 $ at $ \theta = -3$ and $\theta = +3$}
\label{fig:Sn_n_25_plot}
\end{figure}
% ================================================================
% Figure 4.2 Plots of T_n(n =25) at theta = -3. theta = +3
% ================================================================
\begin{figure}[H]
\centering
\includegraphics[width=0.95\textwidth]{H.4.2_Tn_n_25}
\caption{Relative frequency histogram of $T_n$ with $n = 25 $ at $ \theta = -3$ and $\theta = +3$}
\label{fig:Tn_n_25_plot}
\end{figure}
% ================================================================
% Remark 4.2
% ================================================================
\begin{remark}
An interesting feature that has been observed in our comprehensive simulation study is that the critical values of the statistics $S_n$ and $T_n$ tend to decrease as the association parameter $\theta$ increases. This behavior can be explained by examining the distribution function $K(t, \theta)$ of the random variable $W = C(U,V \mid \theta)$ (see \eqref{eq:sklar} and \eqref{eq:frank_copula}) under the assumed Frank Copula model. When $\theta > 0$, the variables $U$ and $V$ tend to move in the same direction, i.e., the data point $(u,v)$ on $(U,V)$ tend to concentrate around the main diagonal line $u = v$, and this concentration becomes more prominent when $\theta$ moves away more from $0$. In other words, the variable $W = C(U,V \mid \theta)$shifts more toward right, i.e., $W$ increases stochastically in $\theta$. As a result, for any fixed $t \in (0,1), P(W \leq t)$ becomes smaller, and hence $K(t, \theta)$ takes smaller values for larger $\theta$ values. On the other hand, when $\theta < 0$, the variables $U$ and $V$ tend to move in opposite directions, and the data points $(u,v)$ on $(U, V)$ tend to concentrate around the minor diagonal line $u = 1 - v$. In this case, the variable $W = C(U,V \mid \theta)$ tends to be smaller, and hence the distribution of $W$ shifts to the left. With $\theta$ negative, and moving away from $0$, the variable $W$ becomes stochastically smaller. Therefore, for any fixed $t \in (0, 1), K(t, \theta)$ takes large values with more extreme values of $\theta$ in the negative direction. The above justification thus explains why $K(t, \theta)$ should be decreasing, as a whole, as $\theta$ goes from $(-25)$ to $+ 25$, as we have taken in Tables~\ref{tab:Sn090}--\ref{tab:Tn095}. This also explains the decreasing trends in $S_n(1-\alpha \mid \theta)$ and $T_n(1-\alpha \mid \theta)$, as functions of $\theta$, as shown in Figures \ref{fig:Sn_Tn_plot}.
\end{remark}
\vspace{-0.5cm}
% ================================================================
% Figure 4.3. Plots of $S_n(0.90), S_n(0.95), T_n(0.90), T_n(0.95)$ for $n = 25,50,75,100$
% ================================================================
\begin{figure}[H]
\centering
\includegraphics[width=0.95\textwidth]{Sn_Tn_n=25,50,75,100.PNG}
\caption{Plots of the critical values with $\theta \in (-25, 25)$ and $n = 25,50,75,100$}
\label{fig:Sn_Tn_plot}
\end{figure}
% ================================================================
% Remark 4.3
% ================================================================
\begin{remark}
So the big question is: `How to implement the GoF test for Frank Copula?' Since $\theta$ is unknown, a lot depends on its estimated value $\hat{\theta}$, and in this work we have used the MLE of $\theta$ to play this role. As seen in Section 3 (comparison of the MLE against BFPE and BJPE) and in Pham et al.(2025)~\cite{Pham et al.(2025)} (comparison of the MLE against MME1 and MME2), the MLE appears to be the most robust estimator even for small sample sizes. So, when $|\hat{\theta}| \ge 2.5$, one can be certain that $\theta$ is about that magnitude too. In such a case, if $\hat{\theta}$ happens to be negative, one can use the reorientation of the observations on $(U, V)$, i.e., using $(U, 1-V)$, to pretend that the association parameter becomes positive and then use the critical value for the positive $\theta$ value. Otherwise, when $|\hat{\theta}| < 2.5$, then simply use the value $|\hat{\theta}|$ to read the tables of the critical values. Simply put, we suggest using $\theta_{use} = |\hat{\theta}|$ to figure out the critical value(s) to be used. So, if the computed value of $S_n$ (and/or $T_n$) for a given dataset exceeds $S_n(1- \alpha \mid \theta_{use})$ (and/or $T_n(1- \alpha \mid \theta_{use})$, then reject the notion that the original data on $(X, Y)$ could be modelled by a bivariate distribution using Frank Copula which combines the marginal distributions of $X$ and $Y$.
\end{remark}
% ================================================================
% Remark 4.4
% ================================================================
\begin{remark}
We would like to point out that our simulated critical values (based on $10,000$ replications) are in line with those limited ones as reported by Genest at al.(2006)~\cite{GenestRemillard2006} (based on their $1000$ replications only) as shown in the following Table 4.5. However, we belive that our values are more accurate and much refined as they are based on a higher number of replications.
\end{remark}
\vspace{-0.4cm}
% ================================================================
% Table 4.5
% ================================================================
\begin{table}[htbp]
\centering
\caption{Comparison of our simulated percentile values of $S_n$ and $T_n$ (based on $10,000$ replications) with those of Genest et al.(2006) \cite{GenestRemillard2006} given in [ ] (based on their 1000 replications)}
\label{tab: comparison_summary}
\setlength{\tabcolsep}{22pt} % tăng độ rộng cột
\renewcommand{\arraystretch}{1.0} % tăng chiều cao hàng nhẹ
\resizebox{0.9\textwidth}{!}{
\begin{tabular}{|c||c||c||c|}
\hline
$n$ & $\theta \,[ = \rho_K (\theta)]$ & $S_n(0.95\mid \theta)$ & $T_n(0.95 \mid \theta)$ \\
\hline
\multirow{4}{*}{100}
& 1.861 [0.20] & 0.157 [0.1515] & 0.961 [0.9743] \\
& 4.161 [0.40] & 0.133 [0.1254] & 0.895 [0.8883] \\
& 7.930 [0.60] & 0.102 [0.1017] & 0.813 [0.7945] \\
& 18.192 [0.80] & 0.058 [0.0591] & 0.645 [0.6410] \\
\hline
\multirow{4}{*}{250}
& 1.861 [0.20] & 0.140 [0.1328] & 0.935 [0.9294] \\
& 4.161 [0.40] & 0.123 [0.1186] & 0.884 [0.8614] \\
& 7.930 [0.60] & 0.097 [0.0979] & 0.802 [0.7982] \\
& 18.192 [0.80] & 0.054 [0.0536] & 0.652 [0.6472] \\
\hline
\multirow{4}{*}{1000}
& 1.861 [0.20] & 0.134 [0.1216] & 0.915 [0.9210] \\
& 4.161 [0.40] & 0.120 [0.1150] & 0.870 [0.8439] \\
& 7.930 [0.60] & 0.098 [0.0975] & 0.814 [0.7875] \\
& 18.192 [0.80] & 0.052 [0.0492] & 0.658 [0.6496] \\
\hline
\end{tabular}
}
\end{table}
\vspace{-0.4cm}
% ======================================================================
% 5. Application of Frank Copula Goodness of Fit Test for Groundwater Data
% =========================================================================
\section{Application of Frank Copula Goodness of Fit Test for Groundwater Data}
We now turn our attention to the groundwater data mentioned in Section 1. Our first objective is to see if
each pairwise bivariate data could be modeled by a suitable Frank Copula-based bivariate joint distribution,
and if so, how strong the association is between the components. Since the North and South subregions
have sample sizes $n_N = 23$ and $n_S = 44$, respectively, we first present the 90th and 95th percentile
values for the two test statistics $S_n$ and $T_n$ for these two sample sizes, as shown in Table~\ref{tab:SnTn}.
% ==========================================================
% Table 5.1 Simulated percentile values for $n=23$ and $n=44$
% ==========================================================
\begin{table}[H]
\centering
\caption{Simulated percentile values for $n=23$ and $n=44$}
\label{tab:SnTn}
\setlength{\tabcolsep}{3pt} % tăng độ rộng cột
\renewcommand{\arraystretch}{1.0}
\resizebox{1.0\textwidth}{!}{
\begin{tabular}{|c| c |cccccccccccc|}
\hline
& & \multicolumn{12}{c|}{$\theta$} \\ \cline{3-14}
Percentile Value & $n$ & -8 & -5 & -3 & -1.5 & -1 & -0.5 & 0.5 & 1 & 1.5 & 3 & 5 & 8 \\
\hline
\multirow{2}{*}{$S_n(0.90)$}
& 23 & 1.149 & 0.766 & 0.531 & 0.398 & 0.358 & 0.321 & 0.263 & 0.243 & 0.220 & 0.176 & 0.142 & 0.113 \\
& 44 & 0.773 & 0.508 & 0.364 & 0.279 & 0.254 & 0.233 & 0.192 & 0.178 & 0.166 & 0.140 & 0.119 & 0.097 \\
\hline
\multirow{2}{*}{$S_n(0.95)$}
& 23 & 1.293 & 0.885 & 0.626 & 0.476 & 0.435 & 0.386 & 0.319 & 0.287 & 0.257 & 0.206 & 0.163 & 0.129 \\
& 44 & 0.890 & 0.594 & 0.434 & 0.331 & 0.308 & 0.280 & 0.232 & 0.210 & 0.198 & 0.167 & 0.137 & 0.112 \\
\hline
\multirow{2}{*}{$T_n(0.90)$}
& 23 & 1.829 & 1.617 & 1.428 & 1.284 & 1.246 & 1.197 & 1.115 & 1.074 & 1.034 & 0.952 & 0.869 & 0.782 \\
& 44 & 1.734 & 1.477 & 1.297 & 1.171 & 1.137 & 1.098 & 1.023 & 0.993 & 0.960 & 0.897 & 0.836 & 0.767 \\
\hline
\multirow{2}{*}{$T_n(0.95)$}
& 23 & 1.954 & 1.738 & 1.533 & 1.390 & 1.352 & 1.292 & 1.208 & 1.158 & 1.121 & 1.018 & 0.924 & 0.830 \\
& 44 & 1.847 & 1.580 & 1.395 & 1.257 & 1.228 & 1.179 & 1.095 & 1.064 & 1.033 & 0.965 & 0.894 & 0.817 \\
\hline
\end{tabular}
}
\end{table}
Next, we obtain the estimated association parameter for each pair of variables of interest, assuming that a
Frank Copula-based model holds, along with the observed test statistic values, denoted by $S^{obs}_n$ and
$T^{obs}_n$, respectively, as shown in Table~\ref{tab:table_MDR}.
%==========================================================
% Table 5.2 Specific $S_n$ and $T_n$ values for our environmental data
%==========================================================
\begin{table}[H]
\centering
\caption{Observed test statistic values and the estimated $\theta$}
\label{tab:table_MDR}
\small
\setlength{\tabcolsep}{3pt} % tăng độ rộng cột
\renewcommand{\arraystretch}{1.0}
\resizebox{1.0\textwidth}{!}{
\begin{tabular}{|>{\centering\arraybackslash}m{2.8cm}
|>{\centering\arraybackslash}m{1.8cm}
>{\centering\arraybackslash}m{1.6cm}
>{\centering\arraybackslash}m{1.6cm}
|>{\centering\arraybackslash}m{1.8cm}
>{\centering\arraybackslash}m{1.6cm}
>{\centering\arraybackslash}m{1.6cm}|}
\hline
\multirow{2}{*}{\makecell{Pair of\\Variables}}
& \multicolumn{3}{c|}{North ($n_N = 23$)}
& \multicolumn{3}{c|}{South ($n_S = 44$)} \\
\cline{2-7}
& $\hat{\theta}_{\text{MLE}}$ & $S_n^{\text{obs}}$ & $T_n^{\text{obs}}$
& $\hat{\theta}_{\text{MLE}}$ & $S_n^{\text{obs}}$ & $T_n^{\text{obs}}$ \\
\hline
(\textit{As, Cl})
& -0.560 & 0.158 & 0.758
& -2.157 & 0.144 & 0.877 \\
(\textit{As, Eh})
& -1.912 & 0.192 & 0.741
& -7.017 & 0.199 & 0.707 \\
(\textit{As, pH})
& 2.898 & 0.080 & 0.574
& 0.920 & 0.320 & 1.118 \\
(\textit{Eh, pH})
& -4.006 & 0.304 & 1.084
& 0.325 & 0.111 & 0.859 \\
\hline
\end{tabular}
}
\end{table}
%==========================================================
% Remark 5.1
%==========================================================
\begin{remark}
\label{rem: 5.1}
(a) As discussed in Section 4, it was noted that the critical values for the test statistics $S_n$
and $T_n$ are monotonically decreasing in $\theta$. Even though $\theta$ is unknown, for all practical
purposes one can use its estimated value (by the MLE) as an approximation; and by doing so, it is seen that
the observed test statistic values do not exceed their critical values (usually the 95th percentile values). Also,
as mentioned in Remark 3.4, for the GoF tests we apply $\theta_{use}$ in order to make use of the critical
values.
(b) A more conservative approach could be adopted as follows: one may check Tables 3.1(a) – (b) to obtain
the approximate standard error (SE) of $\hat{\theta}$ as $\sqrt{MSE}$, and then create a bandwidth for
the actual $\theta$ as $\hat{\theta} \pm SE$. Finally check if the observed test statistic value exceeds the
critical values for all $\theta$ in the aforementioned bandwidth.
\end{remark}
Apart from comparing the observed $S_n$ and $T_n$ values (i.e., $S_n^{obs}$ and $T_n^{obs}$) with respective critical values as discussed above, we have also carried out nonparametric bootstrap $p$-value computations with the above $S_n^{obs}$ and $T_n^{obs}$, results of which are shown in Table \ref{tab:table_MDR}. The algorithmic steps of the bootstrap scheme have been provided in the Appendix A.3. The bootstrap $p$-values have been denoted by $p_{Boot}(S_n)$ and $p_{Boot}(T_n)$ for the test statistics $S_n$ and $T_n$, respectively.
% ===================================================================
% Table 5.3. Bootstrap p-values for GoF Test on Frank Copula
% ===================================================================
\begin{table}[H]
\centering
\caption{Bootstrap $p$-values for GoF Test on Frank Copula}
\label{tab:bootstrap_pvalues}
\renewcommand{\arraystretch}{1.0}
\setlength{\tabcolsep}{16pt}
\resizebox{1.0\textwidth}{!}{
\begin{tabular}{|c|c|c|c|c|}
\hline
\textbf{Subregion} & \textbf{Sample size} & \textbf{Variable pair} & \textbf{$p_{Boot}(S_n)$} & \textbf{$p_{Boot}(T_n)$} \\
\hline
\multirow{4}{*}{North} & \multirow{4}{*}{$n_N = 23$}
& \textit{(As, Cl)} & 0.978 & 0.993 \\
& & \textit{(As, Eh)} & 0.932 & 0.991 \\
& & \textit{(As, pH)} & 0.999 & 1.000 \\
& & \textit{(Eh, pH)} & 0.959 & 0.949 \\
\hline
\multirow{4}{*}{South} & \multirow{4}{*}{$n_S = 44$}
& \textit{(As, Cl)} & 0.982 & 0.956 \\
& & \textit{(As, Eh)} & 0.991 & 1.000 \\
& & \textit{(As, pH)} & 0.909 & 0.946 \\
& & \textit{(Eh, pH)} & 0.997 & 0.944 \\
\hline
\end{tabular}
}
\end{table}
Note that the above bootstrap $p$-values overwhelmingly support modelling each pair of variables by Frank Copula-based bivariate distributions.
\medskip
The following Table \ref{tab:correlation_measures} summarizes our correlation estimates $\hat{\hat{\rho}}_K$ and $\hat{\hat{\rho}}_S$ for four bivariate pairs in two subregions under suitable Frank Copula-based bivariate models. The estimated correlations and/or the estimated values of $\theta$ reveal distinct dynamics in groundwater in two subregions. Recall that $\hat{\hat{\rho}}_K = \rho_K(\hat{\theta})$ and $\hat{\hat{\rho}}_S = \rho_S(\hat{\theta})$ are the parametric estimates of $\rho_K$ and $\rho_S$, as opposed to the nonparametric estimates $\hat{\rho}_K$ and $\hat{\rho}_S$ presented in Section 1 earlier.
%==========================================================
% Table 5.3 Correlation measures for environmental variables in two subregions
%==========================================================
\begin{table}[H]
\centering
\caption{Correlation measures for environmental variables in two subregions}
\label{tab:correlation_measures}
\small
\renewcommand{\arraystretch}{1.2}
\setlength{\tabcolsep}{4pt}
\begin{tabular}{|c|cccc|cccc|}
\hline
& \multicolumn{4}{c|}{North} & \multicolumn{4}{c|}{South} \\
\cline{2-9}
\makecell{Estimated\\Correlation}
& (\textit{As, Cl}) & (\textit{As, Eh}) & (\textit{As, pH}) & (\textit{Eh, pH})
& (\textit{As, Cl}) & (\textit{As, Eh}) & (\textit{As, pH}) & (\textit{Eh, pH}) \\
\hline
$\hat{\theta}$
& -0.560 & -1.912 & 2.898 & -4.006
& -2.157 & -7.017 & 0.920 & 0.325 \\
$\hat{\hat{\rho}}_K$
& -0.062 & -0.205 & 0.298 & -0.389
& -0.229 & -0.563 & 0.101 & 0.036 \\
$\hat{\hat{\rho}}_S$
& -0.093 & -0.304 & 0.436 & -0.558
& -0.339 & -0.764 & 0.152 & 0.054 \\
\hline
\end{tabular}
\end{table}
%==========================================================
% Remark 5.2
%==========================================================
\begin{remark}
\label{rem:correlation_gof}
Note that the parametric correlation estimates $\widehat{\widehat{\rho}}_K$ and $\widehat{\widehat{\rho}}_S$
are very close to their nonparametric counterparts $\widehat{\rho}_K$ and
$\widehat{\rho}_S$, respectively, as shown earlier in Table~\ref{tab:correlation_estimates}.
This, in a way, is favourable as there is no conflict between the two types of correlation estimates. Furthermore, the GoF tests indicate that the bivariate distributions of interest can be modelled by the Frank Copula fairly well. However, this
is not the end of the applied investigation, rather the beginning of a deeper study where one may wish to fit a nonlinear regression model $E(Y \mid X)$ by exploiting the conditional distribution of $Y$, given $X$,
based on the Frank Copula-based joint distribution. The objective would be to predict $Y$ (say, \textit{As}) based on $X$ (say, \textit{Eh}), when the corresponding association parameter $\theta$ is statistically significant. This will be undertaken as a future study.
\end{remark}
\begin{remark}
Also, a more practical approach would be to model a four dimensional model of the entire elemental vector (As, Cl, Eh, pH), and then see how to predict As based on the values of the other three benign elements observed values. However, this would require considering a multivariate Frank Copula-based model and studying the complexity of estimating $\theta$ along with other inferential aspects. This is under investigation now, and hopefully will be reported in near future.
\end{remark}
%==========================================================
% Conclusion
%==========================================================
\section{Conclusion}
This work on a bivariate Frank Copula extends the recent work by Pham et al.(2025)~\cite{Pham et al.(2025)} by considering two noninformative Bayes estimators and comparing them with the MLE. Interestingly, one of these two Bayes estimators is found to be marginally better than the MLE for small samples (with size not exceeding 25). Next, we have looked into the goodness of fit (GoF) tests suggested by
Genest et al.(2006)~\cite{GenestRemillard2006}, and our extensive simulations complement the above authors' work apart from exploring some non-intuitive properties of the GoF tests. Finally, we demonstrate the applicability of Frank Copula to model groundwater data based on Merola et al.(2015)~\cite{Merola2015} fieldwork.
%==========================================================
% Acknowledgements
%==========================================================
\section*{Acknowledgements}
The authors would like to express their sincere gratitude to Ton Duc Thang University (TDTU), Ho Chi Minh City,
and Ho Chi Minh City University of Technology (HCMUT), VNU-HCM for supporting this study. The logistical help
and encouragement extended by both the institutions have played a crucial role in the completion of this research.
A substantial part of this work was done while the third author (Nabendu Pal) was visiting TDTU (from his parent
institution - University of Louisiana at Lafayette, USA) in Summer of 2025 to teach a graduate level summer course.
The author would like to thank the TDTU administration for their generous hospitality.
\medskip
\noindent\textbf{Funding}
\medskip
\noindent No funding was received for this research.
\medskip
\noindent \textbf{Competing Interest}
\medskip
\noindent The corresponding author, on behalf of all the authors, declares that there are no conflicts of interest.
%==========================================================
% References
%==========================================================
% \newpage
\bibliographystyle{plain}
\begin{thebibliography}{99}
\bibitem{Berg2007}
Berg, M., Stengel, C., Trang, P. T. K., Viet, P. H., Sampson, M. L., Leng, M., Samreth, S., and Fredericks, D. (2007).
Magnitude of arsenic pollution in the Mekong and Red River Deltas-Cambodia and Vietnam.
\textit{Science of the Total Environment},
372(2--3), 413--425.
\url{https://doi.org/10.1016/j.scitotenv.2006.09.010}
\bibitem{Bouye2000}
Bouyé, E., Durrleman, V., Nikeghbali, A., Riboulet, G., and Roncalli, T. (2000).
Copulas for Finance: A Reading Guide and Some Applications.
Groupe de Recherche Opérationnelle, Crédit Lyonnais, Paris.
\bibitem{Cherubini2004}
Cherubini, U., Luciano, E., and Vecchiato, W. (2004).
\textit{Copula Methods in Finance}.
John Wiley \& Sons, Chichester, UK.
\bibitem{Embrechts2002}
Embrechts, P., McNeil, A. J., and Straumann, D. (2002).
Correlation and dependency in risk management: Properties and pitfalls.
In Dempster, M. (Ed.),
\textit{Risk Management: Value at Risk and Beyond},
pp. 176--223.
Cambridge University Press, Cambridge.
\url{https://doi.org/10.1017/CBO9780511615338}
\bibitem{Genest1986}
Genest, C. and MacKay, J. (1986). The Joy of Copulas: Bivariate Distributions with Uniform Marginals. \textit{The American Statistician}, Vol. 40, No. 4, 280--283. \url{https://doi.org/10.1080/00031305.1986.1047541}
\bibitem{Genest1987} Genest, C. (1987). Frank’s Family of Bivariate Distributions. \textit{Biometrika}, 74, 549-555. \url{https://doi.org/10.1093/biomet/74.3.549}.
\bibitem{GenestRemillard2006}
Genest, C., Quesy, J.-F. and R\'emillard, B. (2006).
Goodness-of-fit Procedures for Copula Models Based on the Probability
Integral Transformation,
\textit{Scandinavian Journal of Statistics}, Vol. 33, 337--366,
\url{https://doi.org/10.1111/j.1467-9469.2006.00470.x}.
\bibitem{Huisman2001}
Huisman, R., Koedijk, C. G., Cool, C. J., and Palm, F. C. (2001).
Tail-index estimates in small samples.
\textit{Journal of Business \& Economic Statistics},
19(2), 245--254.
\url{https://doi.org/10.1198/073500101316970421}
\bibitem{Jaynes1968}
Jaynes, E. T. (1968).
Prior probabilities.
\textit{IEEE Transactions on Systems Science and Cybernetics},
4(3), 227--241.
\url{https://doi.org/10.1109/TSSC.1968.300117}
\bibitem{Jeffreys1946}
Jeffreys, H. (1946).
An invariant form for the prior probability in estimation problems.
\textit{Proceedings of the Royal Society of London. Series A},
186(1007), 453--461.
\url{https://doi.org/10.1098/rspa.1946.0056}
\bibitem{Junker2006}
Junker, M., Szimayer, A., and Wagner, N. (2006).
Nonlinear term structure dependence: Copula functions, empirics and risk implications.
\textit{Journal of Banking \& Finance},
30(4), 1171--1199.
\url{https://doi.org/10.1016/j.jbankfin.2005.03.003}
\bibitem{Meneguzzo2004}
Meneguzzo, D. and Vecchiato, W. (2004).
Copula sensitivity in collateralized debt obligations and basket default swaps.
\textit{The Journal of Futures Markets},
24(1), 37--70.
\url{https://doi.org/10.1002/fut.10107}
\bibitem{Merola2015}
Merola, R. B., Hien, T. T., Quyen, D. T. T., and Vengosh, A. (2015).
Arsenic exposure to drinking water in the Mekong Delta.
\textit{Science of the Total Environment}, 511, 544--552.
\url{https://doi.org/10.1016/j.scitotenv.2014.12.091}
\bibitem{Nguyen2008}
Nguyen, P. K. (2008).
\textit{Geochemical study of arsenic behavior in aquifer of the Mekong Delta, Vietnam}.
Ph.D. dissertation, Kyushu University, Japan.
\url{https://ere.mine.kyushu-u.ac.jp/old/sotsuron/pdfs/2008/kim.pdf}
\bibitem{Pham2015}
Pham, C. H. V. (2015).
\textit{Studying the mechanisms of arsenic release in groundwater in An Phu district, An Giang province}.
Master's thesis, University of Technology, Ho Chi Minh City, Vietnam.
\bibitem{Pham2015b}
Pham, C. H. V., Ho, T. N. H., Frustchi, M., Wang, Y., Bernier, R., and Vo, L. P. (2015).
Spatial and temporal variation of arsenic occurrence and physiogeochemical influence on arsenic in groundwater in the Vietnamese Mekong Delta: A case study of An Phu district, An Giang province.
\textit{Journal of Science and Technology (Vietnam Academy of Science and Technology)},
53(5A), 282--289.
\bibitem{Pham et al.(2025)} Pham, T.Y.A., Huynh, T. U., and Pal, N. (2025). Some results on point estimation of the association parameter of a bivariate Frank copula. \textit{Communications in Statistics-Simulation and Computation}, 1-22. \url{https://doi.org/10.1080/03610918.2025.2545611}.
\bibitem{Sklar1959} Sklar, M. (1959). Fonctions de repartition an dimensions et leurs marges. \textit{Publ. Inst. Statist. Univ. Paris}, 8, 229–231.
\end{thebibliography}
% ================================================================
% Appendix
% ================================================================
\newpage
\appendix
\vspace{-0.5cm}
\begin{center}
\large \textbf{Appendix}
\end{center}
\vspace{-0.7cm}
% \section{Groundwater data}
%\label{app:groundwater}
% ================================================================
% Appendix A.1
% ================================================================
\begingroup
\footnotesize
\setlength{\tabcolsep}{4.0pt}
\renewcommand{\arraystretch}{1.0}
\setlength\LTleft{0pt}
\setlength\LTright{0pt}
\captionsetup{skip=5pt}
\begin{longtable}{@{}c l r r r r l r r r r@{}}
\caption*{\textbf{A.1 Groundwater data from Dong Thap, Vietnam (Merola, et al.(2015))}}
\label{tab:A1} \\
\toprule
& \multicolumn{5}{c}{South} & \multicolumn{5}{c}{North} \\
\cmidrule(lr){2-6} \cmidrule(lr){7-11}
No. & Well ID & As (ppb) & Cl (ppm) & Eh (mV) & pH
& Well ID & As (ppb) & Cl (ppm) & Eh (mV) & pH \\
\midrule
\endfirsthead
% \caption[]{Groundwater data for the Southern and Northern subregions (continued)} \\
\toprule
& \multicolumn{5}{c}{Southern} & \multicolumn{5}{c}{Northern} \\
\cmidrule(lr){2-6} \cmidrule(lr){7-11}
No. & Well ID & As (ppb) & Cl (ppm) & Eh (mV) & pH
& Well ID & As (ppb) & Cl (ppm) & Eh (mV) & pH \\
\midrule
\endhead
\midrule
\multicolumn{11}{r}{Continued on next page} \\
\endfoot
\bottomrule
\endlastfoot
1 & DT7 & 563.9 & 107.0 & -126 & 6.78 & TH16 & 0.4 & 173.6 & 157 & 6.14 \\
2 & DT6 & 0.5 & 56.1 & 142 & 6.71 & TH9 & 0.2 & 275.3 & 253 & 5.84 \\
3 & DT5 & 0.7 & 46.8 & 199 & 7.04 & TH13 & $bdl^*$ & 22.7 & 194 & 6.19 \\
4 & DT3 & 0.4 & 345.2 & 169 & 6.44 & TH14 & 0.3 & 113.6 & 184 & 6.02 \\
5 & DT4 & 0.1 & 500.1 & 165 & 6.51 & TH22 & 0.1 & 228.1 & 226 & 6.50 \\
6 & DT2 & 1.8 & 632.8 & 101 & 6.66 & TH21 & 0.3 & 89.9 & 169 & 6.10 \\
7 & DT1 & 13.1 & 19.7 & 97 & 7.75 & TH5 & 0.8 & 742.1 & 251 & 5.83 \\
8 & TB11 & 462.3 & 9.2 & -114 & 6.92 & TH12 & 2.3 & 182.7 & 127 & 6.31 \\
9 & TB18 & 155.7 & 25.9 & -72 & 6.52 & TH15 & 8.4 & 27.5 & 60 & 6.18 \\
10 & TB9 & 187.6 & 12.8 & -128 & 6.94 & TH1 & 6.0 & 544.4 & 210 & 6.08 \\
11 & TB2 & 850.4 & 10.5 & -133 & 7.14 & TH10 & 3.2 & 277.3 & 231 & 6.00 \\
12 & TB24 & 370.4 & 13.9 & -90 & 7.15 & TH2 & 2.0 & 487.6 & 130 & 5.87 \\
13 & TB26 & 139.9 & 13.8 & -83 & 7.43 & TH23 & 0.2 & 158.5 & 175 & 6.04 \\
14 & TB27 & 77.7 & 5.4 & -33 & 7.24 & TH3 & 1.5 & 560.2 & 261 & 6.00 \\
15 & TB21 & 842.1 & 21.1 & -105 & 6.88 & TH4 & 2.6 & 21.4 & 80 & 5.99 \\
16 & TB1 & 276.8 & 19.6 & -92 & 6.85 & TH11 & 8.9 & 479.8 & 158 & 6.56 \\
17 & TB10 & 377.3 & 8.2 & -129 & 6.79 & TH18 & 3.6 & 335.6 & 181 & 6.29 \\
18 & TB25 & 272.9 & 11.9 & -104 & 7.20 & TH8 & 6.0 & 253.2 & 235 & 5.85 \\
19 & TB13 & 746.0 & 72.7 & -125 & 7.16 & TH7 & 0.7 & 122.3 & 162 & 6.29 \\
20 & TB22 & 311.0 & 13.5 & -130 & 6.63 & TH6 & $bdl^*$ & 242.8 & 200 & 6.19 \\
21 & TB15 & 937.7 & 19.3 & -110 & 7.04 & TH17 & 22.2 & 40.5 & -13 & 7.03 \\
22 & TB16 & 314.5 & 25.8 & -115 & 6.74 & TH19 & 17.5 & 57.3 & 145 & 7.39 \\
23 & TB20 & 746.3 & 6.9 & -139 & 6.61 & TH20 & 2.4 & $bdl^*$ & 24 & 6.51 \\
24 & TB23 & 270.0 & 12.7 & -110 & 7.01 & & & & & \\
25 & TB17 & 224.2 & 21.5 & -126 & 6.46 & & & & & \\
26 & TB3 & 727.0 & 10.8 & -136 & 7.14 & & & & & \\
27 & TB12 & 931.5 & 2.9 & -125 & 7.03 & & & & & \\
28 & TB14 & 747.7 & 63.4 & -115 & 7.15 & & & & & \\
29 & TB5 & 416.3 & $bdl^*$ & -60 & 7.69 & & & & & \\
30 & TB4 & 360.3 & 42.9 & -130 & 7.34 & & & & & \\
31 & TB6 & 315.5 & 61.2 & -111 & 7.36 & & & & & \\
32 & TB7 & 101.1 & 42.7 & -28 & 7.30 & & & & & \\
33 & TB8 & 237.6 & 124.4 & -98 & 7.17 & & & & & \\
34 & TB19 & 300.3 & 160.3 & -120 & 6.68 & & & & & \\
35 & TBE10 & 700.4 & 81.4 & -108 & 7.07 & & & & & \\
36 & TBE8 & 125.1 & 18.2 & -120 & 6.96 & & & & & \\
37 & TBE9 & 196.2 & 986.6 & -110 & 6.72 & & & & & \\
38 & TBE7 & 166.3 & 20.0 & -84 & 7.16 & & & & & \\
39 & TBE4 & 4.4 & 1499.6 & 82 & 6.09 & & & & & \\
40 & TBE5 & 981.4 & 60.4 & -110 & 6.87 & & & & & \\
41 & TBE3 & 6.8 & 2.7 & 158 & 7.17 & & & & & \\
42 & TBE1 & 6.6 & 61.7 & 126 & 7.10 & & & & & \\
43 & TBE11 & 5.3 & 12.2 & 60 & 7.16 & & & & & \\
44 & TBE6 & 3.2 & 1527.0 & 149 & 6.73 & & & & & \\
\end{longtable}
\endgroup
{
\vspace{-0.3cm}
\noindent\footnotesize
\noindent\textbf{Note:}
\textit{Well IDs starting with \textit{TH} correspond to the northern subregion, whereas those starting with \textit{DT} or \textit{TB} belong to the southern subregion. For wells TH13 and TH6, arsenic (As) concentrations were reported as \textit{below detection limit} ($bdl^*$), which occurs when the observed values fall below 8~$\mu$g/L (i.e., 8~ppb). For computational purposes, these bdl values were replaced by 4~ppb, corresponding to the midpoint of the interval $(0, 8)$~ppb.
Similarly, for wells TB5 and TH20, chloride (Cl) concentrations were reported as $bdl^*$ and were substituted by 0.01~ppm, representing the midpoint of the interval $(0, 0.02)$~ppm.}
}
% ================================================================
% Appendix A.2
% ================================================================
\begin{table}[H]
\caption*{\textbf{A.2 Comparison of two MLE approaches for estimating $\theta$ in SBFCD($\theta$).}}
\label{tab:A2}
\centering
\renewcommand{\arraystretch}{1.35}
\begin{tabularx}{\textwidth}{|l|X|X|}
\hline
{\textbf{Criterion}} &
{\textbf{Approach--1: MLE via Log-Likelihood Maximization (Brent)}} &
{\textbf{Approach--2: MLE via Solving Score Equation (Broyden)}} \\
\hline
Main idea &
Find $\theta$ that maximizes the log-likelihood. &
Find $\theta$ such that the derivative of the log-likelihood equals zero. \\
\hline
Formula &
$\hat{\theta} = \arg\max_{\theta} \log L(\theta)$ &
Solve $(\partial/\partial\theta)\log L(\theta) = 0$. \\
\hline
Implementation &
Minimize $-\log L(\theta)$ using \textit{optim(method = ``Brent")}. &
Solve $H(\theta) = 0$ using \textit{nleqslv(method = ``Broyden")}. \\
\hline
Derivative required? &
No. &
Yes. \\
\hline
Initial value required? &
No (only interval bounds). &
Yes (highly sensitive). \\
\hline
Numerical stability &
Very stable and reliable. &
Can be unstable if $H(\theta)$ is noisy or inaccurate. \\
\hline
Performance at small $n$ &
Stable and consistent. &
May oscillate or fail to converge.\\
\hline
Performance at large $n$ &
Accurate. &
Very accurate if the score function is correct. \\
\hline
Advantages &
No derivative required; robust; rarely fails. &
Theoretically elegant; very fast when $H(\theta)$ is smooth. \\
\hline
Disadvantages &
Requires specifying a search interval. &
Sensitive to initial value; requires exact derivative. \\
\hline
Best use cases &
Simulation studies; small-sample estimation; practical MLE. &
Theoretical validation; large-sample estimation with smooth score. \\
\hline
\end{tabularx}
\end{table}
% ================================================================
% Appendix A.3
% ================================================================
\newpage
\section*{\makebox[\textwidth][c]{A.3 Algorithmic steps of bootstrap $p$-value computations}}
\label{app:A3}
\noindent \textit{(We describe the procedure for the test statistic $S_n$. The same works for $T_n$ as well.)}
\vspace{0.2cm}
\noindent\textbf{Step-0. (Original data)}\\
Let the observed sample be
\[
\mathbf{Z}_1 = (X_1, Y_1), \quad
\mathbf{Z}_2 = (X_2, Y_2), \quad \ldots, \quad
\mathbf{Z}_n = (X_n, Y_n).
\]
\vspace{0.2cm}
\noindent\textbf{Step-1. (Rank transformation)}\\
Convert the data into pseudo-observations based on ranks:
\[
\mathbf{Z}_1^{R} = (U_1, V_1), \quad
\ldots, \quad
\mathbf{Z}_n^{R} = (U_n, V_n),
\]
where the superscript $R$ denotes ``based on ranks''.
\vspace{0.2cm}
\noindent\textbf{Step-2. (Observed statistic)}\\
Based on $\{\mathbf{Z}_1^{R}, \ldots, \mathbf{Z}_n^{R}\}$ compute the test statistic value $S_n$ and call it $S_n^{\mathrm{obs}}$ (i.e., the `observed value')
\vspace{0.2cm}
\noindent\textbf{Step-3. (Bootstrap resampling)}\\
Go back to \textit{Step-0}, and take a random sample of size $n$ from the original sample
\( \{\mathbf{Z}_1, \mathbf{Z}_2, \ldots, \mathbf{Z}_n\}
\)
with replacement. Call this Bootstrap sample of size $n$ as
\(
\{\mathbf{Z}_1^*, \mathbf{Z}_2^*, \ldots, \mathbf{Z}_n^*\}.
\)
\vspace{0.2cm}
\noindent\textbf{Step-4. (Bootstrap statistic)}\\
Apply \textit{Step-1} and \textit{Step-2} to this Bootstrap sample
\(
\{\mathbf{Z}_1^*, \ldots, \mathbf{Z}_n^*\},
\)
and recalculate the value of $S_n$, and call it \(S_n^*\).
\vspace{0.2cm}
\noindent\textbf{Step-5. (Repetition)}\\
Repeat the above \textit{Step-3} and \textit{Step-4} a large number of times, say $B$ times [$B = 10^4$]. This will produce $B$ replicated Bootstrap values of $S_n^*$, and call them as
\(
S_n^{*1}, S_n^{*2}, \ldots, S_n^{*B}.
\)
\vspace{0.2cm}
\noindent\textbf{Step-6. (Bootstrap p-value)}\\
Now we are going to compute the Bootstrap $p$-value using $S_n^{\mathrm{obs}}$ (in \textit{Step-1}) and $S_n^{*b}$ (in \textit{Step-5}) as
\[
p_{\text{Boot}}
= \text{(Proportion of } S_n^{*b} \text{values exceeding } S_n^{\mathrm{obs}} )
= (1/B) \sum_{b=1}^{B}
\mathbf{I}\left( S_n^{*b} > S_n^{\mathrm{obs}} \right).
\]
\end{document}