% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/CRDnsANCOVA.R
\name{CRDnsANCOVA}
\alias{CRDnsANCOVA}
\title{Neutrosophic Analysis of Covariance for Completely Randomized Design}
\usage{
CRDnsANCOVA(
  Lower_y,
  Upper_y,
  Lower_z,
  Upper_z,
  design,
  alpha = 0.05,
  verbose = FALSE
)
}
\arguments{
\item{Lower_y}{Numeric matrix of lower bounds of the response variable.}

\item{Upper_y}{Numeric matrix of upper bounds of the response variable.}

\item{Lower_z}{Numeric matrix of lower bounds of the covariate.}

\item{Upper_z}{Numeric matrix of upper bounds of the covariate.}

\item{design}{Numeric matrix representing the CRD treatment layout.}

\item{alpha}{Significance level for interval-based LSD comparisons. Default is 0.05.}

\item{verbose}{Logical. If \code{TRUE}, prints the NANCOVA table and LSD comparisons.}
}
\value{
A list containing the Neutrosophic ANCOVA table, interval LSD comparisons
(if treatment effects are significant), and the interval LSD value.
}
\description{
Performs Neutrosophic Analysis of Covariance (NANCOVA) for interval-valued
response and covariate data from a Completely Randomized Design (CRD).
}
\examples{
Lower_y <- matrix(c(
  20,25,30,35,
  21,26,31,36,
  19,24,29,34,
  20,25,30,35,
  21,26,31,36
), nrow = 5, byrow = TRUE)

Upper_y <- matrix(c(
  22,27,32,37,
  23,28,33,38,
  21,26,31,36,
  22,27,32,37,
  23,28,33,38
), nrow = 5, byrow = TRUE)

Lower_z <- matrix(c(
  8,9,10,11,
  9,10,11,12,
  8,9,10,11,
  9,10,11,12,
  8,9,10,11
), nrow = 5, byrow = TRUE)

Upper_z <- matrix(c(
  9,10,11,12,
  10,11,12,13,
  9,10,11,12,
  10,11,12,13,
  9,10,11,12
), nrow = 5, byrow = TRUE)

design <- matrix(c(
  1,2,3,4,
  1,2,3,4,
  1,2,3,4,
  1,2,3,4,
  1,2,3,4
), nrow = 5, byrow = TRUE)

CRDnsANCOVA(Lower_y, Upper_y, Lower_z, Upper_z, design)

}
