From 7cffcccf511b743586c74393be08a32a8a294876 Mon Sep 17 00:00:00 2001
From: Sander Devisscher <sander.devisscher@inbo.be>
Date: Wed, 13 Nov 2024 15:42:12 +0100
Subject: [PATCH] Create qd_pci2_D.Rd

#94
---
 man/qd_pci2_D.Rd | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)
 create mode 100644 man/qd_pci2_D.Rd

diff --git a/man/qd_pci2_D.Rd b/man/qd_pci2_D.Rd
new file mode 100644
index 0000000..79fb418
--- /dev/null
+++ b/man/qd_pci2_D.Rd
@@ -0,0 +1,40 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/PCI.R
+\name{qd_pci2_D}
+\alias{qd_pci2_D}
+\title{Distance matrix for qd_pci2}
+\usage{
+qd_pci2_D(x, m = 1, p = 1)
+}
+\arguments{
+\item{x}{vector with the scores of the respondents}
+
+\item{m}{m value in the formula (see details)}
+
+\item{p}{power value in the formula (see details)}
+}
+\value{
+single value containing pci index
+}
+\description{
+Calculates distance matrix for the function qd_pci2
+}
+\details{
+\deqn{Dp_{x,y} = (|r_{x} - r_{y}|) - (m-1))^{p}}
+\deqn{if sign(r_{x} \neq r_{y}) \\
+else d_{x,y} = 0}
+Dp_x,y = (|r_x - r_y| - (m-1))^p
+}
+\examples{
+\dontrun{
+#'set.seed(201)
+Xv <- sample(-2:2, size = 100, replace = TRUE) #random responses
+qd_pci2(Xv, scale_values = -2:2, x_is_table = FALSE, m = 1, p = 1) # 0.37
+}
+}
+\seealso{
+Other plotting: 
+\code{\link{qd_pci1}()},
+\code{\link{qd_pci2}()}
+}
+\concept{plotting}