{"id":5658,"date":"2026-09-11T23:53:25","date_gmt":"2026-09-11T23:53:25","guid":{"rendered":"http:\/\/french.arabpsychology.com\/statistics\/comment-calculer-dffits-dans-r\/"},"modified":"2026-09-11T23:53:26","modified_gmt":"2026-09-11T23:53:26","slug":"comment-calculer-dffits-dans-r","status":"publish","type":"psych_stat","link":"https:\/\/french.arabpsychology.com\/?psych_stat=comment-calculer-dffits-dans-r","title":{"rendered":"Comment calculer DFFITS dans R"},"content":{"rendered":"<p>L&rsquo;estimation des param\u00e8tres au sein des mod\u00e8les lin\u00e9aires par la m\u00e9thode des moindres carr\u00e9s ordinaires repose sur un ensemble d&rsquo;hypoth\u00e8ses distributionnelles et structurelles fondamentales dont la violation compromet la validit\u00e9 des inf\u00e9rences statistiques. Parmi les menaces m\u00e9thodologiques les plus insidieuses figure la pr\u00e9sence d&rsquo;observations singuli\u00e8res capables d&rsquo;exercer une distorsion disproportionn\u00e9e sur la trajectoire de l&rsquo;hyperplan de r\u00e9gression. Dans les disciplines quantitatives contemporaines, qu&rsquo;il s&rsquo;agisse de l&rsquo;\u00e9conom\u00e9trie, de la biostatistique ou de la psychom\u00e9trie appliqu\u00e9e, l&rsquo;analyste ne peut se contenter d&rsquo;un examen superficiel des coefficients d&rsquo;ajustement global. Il est imp\u00e9ratif de proc\u00e9der \u00e0 un audit diagnostique granulaire visant \u00e0 identifier les unit\u00e9s statistiques qui exercent un contr\u00f4le excessif sur les pr\u00e9dictions du mod\u00e8le.<\/p>\n<p>Parmi l&rsquo;arsenal d&rsquo;indicateurs d\u00e9velopp\u00e9s au cours du second tiers du vingti\u00e8me si\u00e8cle pour sonder la robustesse locale des estimations, la statistique DFFITS, introduite initialement par David A. Belsley, Edwin Kuh et Roy E. Welsch dans leur ouvrage pionnier de 1980, s&rsquo;impose comme une m\u00e9trique de choix. En quantifiant directement la variation standardis\u00e9e induite sur la valeur pr\u00e9dite d&rsquo;un individu lorsque celui-ci est d\u00e9lib\u00e9r\u00e9ment exclu du calibrage du mod\u00e8le, le DFFITS fournit une mesure synth\u00e9tique et \u00e9l\u00e9gante combinant l&rsquo;\u00e9cart r\u00e9siduel de l&rsquo;observation et sa position g\u00e9om\u00e9trique dans l&rsquo;espace multidimensionnel des pr\u00e9dicteurs. Cette approche par suppression unitaire permet de d\u00e9masquer des points qui, bien que ne paraissant pas n\u00e9cessairement anormaux sur un diagramme de dispersion bivari\u00e9, alt\u00e8rent substantiellement la structure pr\u00e9dictive globale.<\/p>\n<p>Le pr\u00e9sent article propose une exploration approfondie et exhaustive de la th\u00e9orie, du calcul et de l&rsquo;interpr\u00e9tation empirique de la statistique DFFITS au sein de l&rsquo;environnement de programmation et d&rsquo;analyse statistique R. \u00c0 travers un protocole pas \u00e0 pas alliant formulations math\u00e9matiques formelles, d\u00e9compositions algorithmiques manuelles et utilisation des fonctions vectoris\u00e9es natives de R, nous examinerons comment int\u00e9grer rigoureusement ce diagnostic dans les pipelines de recherche. Nous aborderons \u00e9galement les seuils critiques adapt\u00e9s aux propri\u00e9t\u00e9s de l&rsquo;\u00e9chantillon, les strat\u00e9gies de visualisation avanc\u00e9e, ainsi que les arbitrages m\u00e9thodologiques et \u00e9thiques n\u00e9cessaires face aux donn\u00e9es aberrantes et influentes.<\/p>\n<h2>1. Introduction aux diagnostics de r\u00e9gression et \u00e0 la m\u00e9trique DFFITS<\/h2>\n<h3>1.1 Notion d&rsquo;influence et de levier en mod\u00e9lisation statistique<\/h3>\n<p>L&rsquo;analyse rigoureuse des mod\u00e8les de r\u00e9gression lin\u00e9aire requiert une distinction conceptuelle fondamentale entre trois manifestations distinctes de l&rsquo;atypicit\u00e9 des donn\u00e9es : les valeurs aberrantes (<em>outliers<\/em>), les points de levier (<em>leverage points<\/em>) et les observations influentes (<em>influential observations<\/em>). Une valeur aberrante correspond classiquement \u00e0 une observation dont la variable d\u00e9pendante s&rsquo;\u00e9carte substantiellement de la valeur attendue par le mod\u00e8le conditionnel, g\u00e9n\u00e9rant ainsi un r\u00e9sidu de magnitude exceptionnelle. \u00c0 l&rsquo;inverse, un point de levier d\u00e9signe une entit\u00e9 statistique occupant une position isol\u00e9e ou extr\u00eame dans l&rsquo;espace vectoriel form\u00e9 par les variables pr\u00e9dictrices ind\u00e9pendantes, sans que sa r\u00e9ponse observ\u00e9e ne soit obligatoirement discordante par rapport \u00e0 la droite de r\u00e9gression. L&rsquo;effet de levier mesure donc un potentiel structurel d&rsquo;alt\u00e9ration du mod\u00e8le, fonction exclusive des coordonn\u00e9es dans l&rsquo;espace des covariables.<\/p>\n<p>L&rsquo;observation influente, quant \u00e0 elle, repr\u00e9sente l&rsquo;intersection op\u00e9rationnelle ou la r\u00e9sultante dynamique de ces deux ph\u00e9nom\u00e8nes. Une donn\u00e9e n&rsquo;est qualifi\u00e9e d&rsquo;influente que si son inclusion ou son omission modifie substantiellement les r\u00e9sultats statistiques fondamentaux du mod\u00e8le, tels que la valeur des coefficients estim\u00e9s, l&rsquo;erreur standard r\u00e9siduelle ou l&rsquo;ensemble des valeurs ajust\u00e9es. Dans le cadre de l&rsquo;estimation par les <a rel=\"noopener noreferrer\" href=\"https:\/\/en.wikipedia.org\/wiki\/Ordinary_least_squares\">moindres carr\u00e9s ordinaires<\/a>, le crit\u00e8re quadratique minimise la somme des carr\u00e9s des r\u00e9sidus, conf\u00e9rant de facto un poids d\u00e9mesur\u00e9 aux \u00e9carts importants. Par cons\u00e9quent, un point combinant un levier \u00e9lev\u00e9 et un r\u00e9sidu non nul agit comme un point d&rsquo;appui m\u00e9canique, attirant l&rsquo;hyperplan vers lui et faussant la trajectoire g\u00e9n\u00e9rale de la relation mod\u00e9lis\u00e9e.<\/p>\n<p>Dans les sciences comportementales, sociales et psychom\u00e9triques, la survenue de telles observations est fr\u00e9quente en raison de l&rsquo;h\u00e9t\u00e9rog\u00e9n\u00e9it\u00e9 non observ\u00e9e, des comportements de r\u00e9ponse atypiques, de la fatigue exp\u00e9rimentale ou de simples b\u00e9vues de saisie. N\u00e9gliger la d\u00e9tection de ces cas singuliers menace directement l&rsquo;int\u00e9grit\u00e9 des conclusions tir\u00e9es des donn\u00e9es d&rsquo;\u00e9chantillon. Un diagnostic post-estimation syst\u00e9matique n&rsquo;est donc pas une simple formalit\u00e9 technique facultative, mais une \u00e9tape indispensable garantissant la fiabilit\u00e9 des inf\u00e9rences, la reproductibilit\u00e9 des analyses et la validit\u00e9 interne des mod\u00e8les empiriques d\u00e9ploy\u00e9s.<\/p>\n<h3>1.2 Origine conceptuelle et d\u00e9finition du DFFITS<\/h3>\n<p>La statistique DFFITS trouve son \u00e9tymologie directe dans l&rsquo;expression anglaise <em>Difference in Fits<\/em>, traduisible litt\u00e9ralement par la \u00ab diff\u00e9rence d&rsquo;ajustement \u00bb. Formalis\u00e9e dans les travaux s\u00e9minaux de David A. Belsley, Edwin Kuh et Roy E. Welsch consign\u00e9s dans leur trait\u00e9 classique de 1980 intitul\u00e9 <em>Regression Diagnostics: Identifying Influential Data and Sources of Collinearity<\/em>, cette mesure a \u00e9t\u00e9 sp\u00e9cifiquement con\u00e7ue pour \u00e9valuer l&rsquo;impact marginal de la suppression d&rsquo;une observation donn\u00e9e sur sa propre pr\u00e9diction. L&rsquo;intuition th\u00e9orique sous-jacente est d&rsquo;une grande clart\u00e9 : si le retrait d&rsquo;un individu du jeu de donn\u00e9es entra\u00eene un d\u00e9placement substantiel de la valeur ajust\u00e9e qui lui \u00e9tait assign\u00e9e par le mod\u00e8le, cet individu exerce alors une emprise d\u00e9raisonnable sur le calibrage local de l&rsquo;\u00e9quation.<\/p>\n<p>D&rsquo;un point de vue fonctionnel, le DFFITS se d\u00e9finit formellement comme la diff\u00e9rence standardis\u00e9e entre la valeur ajust\u00e9e pour l&rsquo;observation <em>i<\/em> obtenue en utilisant l&rsquo;int\u00e9gralit\u00e9 de l&rsquo;\u00e9chantillon de taille <em>n<\/em>, et la valeur ajust\u00e9e pour cette m\u00eame observation issue d&rsquo;un mod\u00e8le r\u00e9estim\u00e9 sur l&rsquo;\u00e9chantillon r\u00e9duit de taille <em>n &#8211; 1<\/em> duquel la <em>i<\/em>-\u00e8me observation a \u00e9t\u00e9 temporairement \u00e9lagu\u00e9e. L&rsquo;op\u00e9ration de standardisation est op\u00e9r\u00e9e en divisant cet \u00e9cart par une estimation rigoureuse de l&rsquo;erreur type de la pr\u00e9diction, calcul\u00e9e elle-m\u00eame en omettant l&rsquo;observation cible afin d&rsquo;\u00e9viter toute contamination r\u00e9siduelle de la variance d&rsquo;erreur.<\/p>\n<p>Contrairement \u00e0 d&rsquo;autres indicateurs qui fragmentent l&rsquo;examen de l&rsquo;influence en d\u00e9composant l&rsquo;effet sur chaque coefficient individuel de r\u00e9gression, le DFFITS constitue un indicateur univari\u00e9 synth\u00e9tique de l&rsquo;influence globale exerc\u00e9e sur la pr\u00e9diction ponctuelle. Il offre ainsi \u00e0 l&rsquo;analyste un indice direct, condens\u00e9 et \u00e9l\u00e9gant permettant de hi\u00e9rarchiser imm\u00e9diatement les observations selon la s\u00e9v\u00e9rit\u00e9 du trouble pr\u00e9dictif qu&rsquo;elles injectent dans la structure globale du mod\u00e8le lin\u00e9aire param\u00e9trique.<\/p>\n<h3>1.3 Pertinence du DFFITS dans la recherche empirique<\/h3>\n<p>L&rsquo;utilit\u00e9 m\u00e9thodologique du DFFITS dans la recherche empirique moderne s&rsquo;\u00e9tend bien au-del\u00e0 de la simple v\u00e9rification math\u00e9matique des conditions de r\u00e9gularit\u00e9. Dans les protocoles cliniques ou les enqu\u00eates probabilistes \u00e0 grande \u00e9chelle, cet indicateur agit comme un r\u00e9v\u00e9lateur pr\u00e9cieux de sous-populations non anticip\u00e9es ou de cas cliniquement discordants. En rep\u00e9rant les sujets pour lesquels le mod\u00e8le global \u00e9choue dramatiquement \u00e0 fournir une pr\u00e9diction stable en leur absence, le chercheur s&rsquo;offre l&rsquo;opportunit\u00e9 d&rsquo;examiner en d\u00e9tail la plausibilit\u00e9 substantive des donn\u00e9es recueillies et d&rsquo;identifier de possibles biais d&rsquo;\u00e9chantillonnage ou des distorsions induites par des participants non repr\u00e9sentatifs.<\/p>\n<p>Sur le plan de l&rsquo;inf\u00e9rence causale et pr\u00e9dictive, la pr\u00e9sence d&rsquo;individus pr\u00e9sentant un DFFITS d&rsquo;amplitude anormale a pour cons\u00e9quence directe de gonfler artificiellement ou d&rsquo;att\u00e9nuer ind\u00fbment les estimations des param\u00e8tres de r\u00e9gression, conduisant fr\u00e9quemment \u00e0 des erreurs de type I (faux positifs) ou de type II (faux n\u00e9gatifs). En stabilisant le mod\u00e8le via l&rsquo;examen rigoureux du DFFITS, on pr\u00e9serve la validit\u00e9 interne des estimations et on pr\u00e9vient la publication de relations fallacieuses qui \u00e9choueraient in\u00e9luctablement lors des tentatives ult\u00e9rieures de r\u00e9plication empirique sur des \u00e9chantillons ind\u00e9pendants.<\/p>\n<p>Enfin, dans le contexte actuel du d\u00e9ploiement d&rsquo;algorithmes de prise de d\u00e9cision automatis\u00e9s et d&rsquo;architectures d&rsquo;apprentissage statistique supervis\u00e9, o\u00f9 les mod\u00e8les de type r\u00e9gression servent souvent de briques \u00e9l\u00e9mentaires ou de r\u00e9f\u00e9rences interpr\u00e9tables, la robustesse aux donn\u00e9es contamin\u00e9es devient un enjeu op\u00e9rationnel majeur. Le calcul syst\u00e9matique du DFFITS garantit que le mod\u00e8le r\u00e9sultant ne refl\u00e8te pas les particularit\u00e9s singuli\u00e8res d&rsquo;une poign\u00e9e d&rsquo;individus excentriques, mais capture fid\u00e8lement les tendances structurelles sous-jacentes de la population cible.<\/p>\n<h2>2. Fondements th\u00e9oriques et formulation math\u00e9matique du DFFITS<\/h2>\n<h3>2.1 D\u00e9composition math\u00e9matique de la formule<\/h3>\n<p>La formulation alg\u00e9brique originelle du DFFITS pour une observation donn\u00e9e index\u00e9e par la lettre <em>i<\/em> (avec <em>i<\/em> variant de 1 \u00e0 <em>n<\/em>) repose sur la comparaison entre la pr\u00e9diction compl\u00e8te, not\u00e9e <span class=\"arabpsy-math-inline\" data-latex=\"\\hat{y}_i\">$\\hat{y}_i$<\/span>, issue de l&rsquo;estimation sur la totalit\u00e9 de l&rsquo;\u00e9chantillon, et la pr\u00e9diction avec omission, not\u00e9e <span class=\"arabpsy-math-inline\" data-latex=\"\\hat{y}_{(i)}\">$\\hat{y}_{(i)}$<\/span>, calcul\u00e9e \u00e0 partir des coefficients obtenus en excluant l&rsquo;observation <em>i<\/em>. La formule brute s&rsquo;exprime sous la forme du ratio suivant :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"\\text{DFFITS}_i = \\frac{\\hat{y}_i - \\hat{y}_{(i)}}{\\sqrt{s_{(i)}^2 h_{ii}}}\">$$\\text{DFFITS}_i = \\frac{\\hat{y}_i &#8211; \\hat{y}_{(i)}}{\\sqrt{s_{(i)}^2 h_{ii}}}$$<\/span><\/p>\n<p>Dans cette formulation canonique, le d\u00e9nominateur repr\u00e9sente l&rsquo;erreur type estim\u00e9e de la valeur ajust\u00e9e <span class=\"arabpsy-math-inline\" data-latex=\"\\hat{y}_i\">$\\hat{y}_i$<\/span>. Le terme <span class=\"arabpsy-math-inline\" data-latex=\"s_{(i)}^2\">$s_{(i)}^2$<\/span> d\u00e9signe la variance r\u00e9siduelle estim\u00e9e (l&rsquo;erreur quadratique moyenne) du mod\u00e8le ajust\u00e9 sans la <span class=\"arabpsy-math-inline\" data-latex=\"i\">$i$<\/span>-\u00e8me observation, garantissant une estimation non contamin\u00e9e de la dispersion du bruit de fond. La grandeur <span class=\"arabpsy-math-inline\" data-latex=\"h_{ii}\">$h_{ii}$<\/span> correspond au <span class=\"arabpsy-math-inline\" data-latex=\"i\">$i$<\/span>-\u00e8me \u00e9l\u00e9ment diagonal de la <a rel=\"noopener noreferrer\" href=\"https:\/\/en.wikipedia.org\/wiki\/Projection_matrix\">matrice de projection orthogonale<\/a>, commun\u00e9ment d\u00e9nomm\u00e9e matrice chapeau (<em>hat matrix<\/em>), d\u00e9finie par l&rsquo;op\u00e9rateur matriciel <span class=\"arabpsy-math-inline\" data-latex=\"H = X(X^T X)^{-1} X^T\">$H = X(X^T X)^{-1} X^T$<\/span>, o\u00f9 <span class=\"arabpsy-math-inline\" data-latex=\"X\">$X$<\/span> repr\u00e9sente la matrice de dessein des variables explicatives compl\u00e9t\u00e9e par une colonne unitaire pour la constante.<\/p>\n<p>Gr\u00e2ce aux identit\u00e9s fondamentales de l&rsquo;alg\u00e8bre lin\u00e9aire appliqu\u00e9es \u00e0 la r\u00e9gression, il n&rsquo;est heureusement pas requis de r\u00e9estimer formellement <em>n<\/em> r\u00e9gressions distinctes pour \u00e9valuer chaque pr\u00e9diction avec suppression. Le DFFITS peut \u00eatre factoris\u00e9 et r\u00e9\u00e9crit sous une forme computationnelle exacte combinant deux grandeurs analytiques fondamentales :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"\\text{DFFITS}_i = rstudent_i \\times \\sqrt{\\frac{h_{ii}}{1 - h_{ii}}}\">$$\\text{DFFITS}_i = rstudent_i \\times \\sqrt{\\frac{h_{ii}}{1 &#8211; h_{ii}}}$$<\/span><\/p>\n<p>Dans cette \u00e9quation \u00e9l\u00e9gante, le premier facteur, <span class=\"arabpsy-math-inline\" data-latex=\"rstudent_i\">$rstudent_i$<\/span>, repr\u00e9sente le r\u00e9sidu studentis\u00e9 externe (\u00e9galement appel\u00e9 r\u00e9sidu jackknife ou r\u00e9sidu supprim\u00e9 standardis\u00e9), d\u00e9fini par :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"rstudent_i = \\frac{e_i}{s_{(i)} \\sqrt{1 - h_{ii}}}\">$$rstudent_i = \\frac{e_i}{s_{(i)} \\sqrt{1 &#8211; h_{ii}}}$$<\/span><\/p>\n<p>o\u00f9 <span class=\"arabpsy-math-inline\" data-latex=\"e_i = y_i - \\hat{y}_i\">$e_i = y_i &#8211; \\hat{y}_i$<\/span> est le r\u00e9sidu brut ordinaire des moindres carr\u00e9s. Le second facteur, quant \u00e0 lui, est une fonction strictement monotone de la valeur de levier <span class=\"arabpsy-math-inline\" data-latex=\"h_{ii}\">$h_{ii}$<\/span>. Cette factorisation met en lumi\u00e8re la nature profonde du DFFITS : il s&rsquo;agit du produit direct entre une mesure de la non-conformit\u00e9 de la r\u00e9ponse (l&rsquo;\u00e9cart r\u00e9siduel standardis\u00e9 hors mod\u00e8le) et une mesure de l&rsquo;\u00e9loignement de l&rsquo;observation par rapport au centre de gravit\u00e9 des pr\u00e9dicteurs dans l&rsquo;espace euclidien.<\/p>\n<h3>2.2 Propri\u00e9t\u00e9s distributionnelles et comportement asymptotique<\/h3>\n<p>L&rsquo;analyse distributionnelle du DFFITS d\u00e9coule directement des propri\u00e9t\u00e9s probabilistes du r\u00e9sidu studentis\u00e9 externe et des caract\u00e9ristiques de la matrice chapeau. Sous l&rsquo;hypoth\u00e8se nulle d&rsquo;un mod\u00e8le correctement sp\u00e9cifi\u00e9 avec des erreurs gaussiennes ind\u00e9pendantes et identiquement distribu\u00e9es, le r\u00e9sidu studentis\u00e9 <span class=\"arabpsy-math-inline\" data-latex=\"rstudent_i\">$rstudent_i$<\/span> suit rigoureusement une distribution <em>t<\/em> de Student \u00e0 <span class=\"arabpsy-math-inline\" data-latex=\"n - p - 1\">$n &#8211; p &#8211; 1$<\/span> degr\u00e9s de libert\u00e9, o\u00f9 <span class=\"arabpsy-math-inline\" data-latex=\"p\">$p$<\/span> repr\u00e9sente le nombre total de param\u00e8tres estim\u00e9s dans le mod\u00e8le (incluant la constante). En revanche, le facteur de levier <span class=\"arabpsy-math-inline\" data-latex=\"\\sqrt{h_{ii} \/ (1 - h_{ii})}\">$\\sqrt{h_{ii} \/ (1 &#8211; h_{ii})}$<\/span> est une constante d\u00e9terministe conditionnellement \u00e0 la matrice de dessein fix\u00e9e <span class=\"arabpsy-math-inline\" data-latex=\"X\">$X$<\/span>.<\/p>\n<p>Lorsque la taille de l&rsquo;\u00e9chantillon <span class=\"arabpsy-math-inline\" data-latex=\"n\">$n$<\/span> tend vers l&rsquo;infini pour un nombre de param\u00e8tres <span class=\"arabpsy-math-inline\" data-latex=\"p\">$p$<\/span> constant, la trace de la matrice chapeau restant \u00e9gale \u00e0 <span class=\"arabpsy-math-inline\" data-latex=\"p\">$p$<\/span> (<span class=\"arabpsy-math-inline\" data-latex=\"\\sum_{i=1}^n h_{ii} = p\">$\\sum_{i=1}^n h_{ii} = p$<\/span>), la valeur moyenne du levier individuel <span class=\"arabpsy-math-inline\" data-latex=\"\\bar{h} = p\/n\">$\\bar{h} = p\/n$<\/span> converge asymptotiquement vers z\u00e9ro. Par cons\u00e9quent, pour une observation typique, le terme <span class=\"arabpsy-math-inline\" data-latex=\"\\sqrt{h_{ii} \/ (1 - h_{ii})}\">$\\sqrt{h_{ii} \/ (1 &#8211; h_{ii})}$<\/span> d\u00e9cro\u00eet selon un ordre de grandeur en <span class=\"arabpsy-math-inline\" data-latex=\"\\mathcal{O}(n^{-1\/2})\">$\\mathcal{O}(n^{-1\/2})$<\/span>. Il s&rsquo;ensuit que les valeurs de DFFITS ont naturellement tendance \u00e0 se contracter vers z\u00e9ro \u00e0 mesure que le volume de donn\u00e9es augmente, rendant les seuils critiques d\u00e9pendants de la taille de l&rsquo;\u00e9chantillon.<\/p>\n<p>\u00c0 l&rsquo;inverse, l&rsquo;\u00e9mergence d&rsquo;une forte multicolin\u00e9arit\u00e9 au sein de la matrice de dessein perturbe s\u00e9v\u00e8rement les propri\u00e9t\u00e9s de la matrice <span class=\"arabpsy-math-inline\" data-latex=\"(X^T X)^{-1}\">$(X^T X)^{-1}$<\/span>, conduisant \u00e0 une inflation substantielle de certains termes diagonaux <span class=\"arabpsy-math-inline\" data-latex=\"h_{ii}\">$h_{ii}$<\/span>. Dans une telle configuration, de l\u00e9g\u00e8res variations dans les r\u00e9ponses peuvent engendrer des valeurs de DFFITS artificiellement explosives pour les observations situ\u00e9es le long des axes de colin\u00e9arit\u00e9, amplifiant la sensibilit\u00e9 du mod\u00e8le \u00e0 des perturbations infinit\u00e9simales des donn\u00e9es d&rsquo;entra\u00eenement.<\/p>\n<h3>2.3 Comparaison th\u00e9orique avec la distance de Cook<\/h3>\n<p>Dans la litt\u00e9rature statistique consacr\u00e9e aux diagnostics d&rsquo;influence, le DFFITS est tr\u00e8s fr\u00e9quemment mis en perspective avec la <a rel=\"noopener noreferrer\" href=\"https:\/\/en.wikipedia.org\/wiki\/Cook%27s_distance\">distance de Cook<\/a>, formul\u00e9e initialement par R. Dennis Cook en 1977. Bien que ces deux m\u00e9triques partagent l&rsquo;objectif fondamental d&rsquo;identifier les observations d\u00e9stabilisatrices, elles proc\u00e8dent d&rsquo;architectures th\u00e9oriques distinctes et adoptent des \u00e9chelles de mesure diff\u00e9renci\u00e9es.<\/p>\n<p>La distance de Cook \u00e9value le d\u00e9calage quadratique moyen subi par le vecteur complet des valeurs ajust\u00e9es de l&rsquo;ensemble des <em>n<\/em> observations sous l&rsquo;effet de l&rsquo;omission d&rsquo;un point sp\u00e9cifique. Sa formulation canonique s&rsquo;\u00e9crit :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"D_i = \\frac{(\\hat{Y} - \\hat{Y}_{(i)})^T (\\hat{Y} - \\hat{Y}_{(i)})}{p , s^2} = \\frac{r_i^2}{p} \\times \\frac{h_{ii}}{1 - h_{ii}}\">$$D_i = \\frac{(\\hat{Y} &#8211; \\hat{Y}_{(i)})^T (\\hat{Y} &#8211; \\hat{Y}_{(i)})}{p , s^2} = \\frac{r_i^2}{p} \\times \\frac{h_{ii}}{1 &#8211; h_{ii}}$$<\/span><\/p>\n<p>o\u00f9 <span class=\"arabpsy-math-inline\" data-latex=\"r_i\">$r_i$<\/span> d\u00e9signe le r\u00e9sidu studentis\u00e9 interne (calcul\u00e9 en utilisant l&rsquo;estimateur de variance global <span class=\"arabpsy-math-inline\" data-latex=\"s^2\">$s^2$<\/span> incluant la <span class=\"arabpsy-math-inline\" data-latex=\"i\">$i$<\/span>-\u00e8me observation). En comparant cette expression avec celle du DFFITS, on observe une relation structurelle directe. Si l&rsquo;on substitue le r\u00e9sidu interne par le r\u00e9sidu externe (qui lui est fonctionnellement tr\u00e8s proche pour des \u00e9chantillons de taille mod\u00e9r\u00e9e \u00e0 grande), on obtient l&rsquo;\u00e9quivalence fonctionnelle remarquable suivante :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"D_i \\approx \\frac{\\text{DFFITS}_i^2}{p}\">$$D_i \\approx \\frac{\\text{DFFITS}_i^2}{p}$$<\/span><\/p>\n<p>Cette relation met en \u00e9vidence les divergences op\u00e9rationnelles fondamentales entre les deux instruments :<\/p>\n<ul>\n<li>Le DFFITS est une quantit\u00e9 orient\u00e9e, conservant le signe alg\u00e9brique de l&rsquo;\u00e9cart pr\u00e9dictif, ce qui permet d&rsquo;identifier si l&rsquo;observation tire la pr\u00e9diction vers le haut ou vers le bas, tandis que la distance de Cook est une m\u00e9trique purement quadratique, toujours positive.<\/li>\n<li>Le DFFITS se focalise exclusivement sur la pr\u00e9diction de la seule observation supprim\u00e9e (<span class=\"arabpsy-math-inline\" data-latex=\"\\hat{y}_i\">$\\hat{y}_i$<\/span>), constituant ainsi une mesure d&rsquo;influence locale, alors que la distance de Cook agr\u00e8ge la r\u00e9percussion de cette suppression sur les pr\u00e9dictions des <span class=\"arabpsy-math-inline\" data-latex=\"n\">$n$<\/span> individus composant l&rsquo;\u00e9chantillon.<\/li>\n<li>L&rsquo;\u00e9chelle d&rsquo;\u00e9valuation du DFFITS varie typiquement avec la racine carr\u00e9e du rapport <span class=\"arabpsy-math-inline\" data-latex=\"p\/n\">$p\/n$<\/span>, alors que la distance de Cook est calibr\u00e9e par rapport aux quantiles d&rsquo;une distribution de Fisher <span class=\"arabpsy-math-inline\" data-latex=\"F(p, n-p)\">$F(p, n-p)$<\/span>.<\/li>\n<\/ul>\n<h2>3. Pr\u00e9paration de l&rsquo;environnement de travail et des donn\u00e9es dans R<\/h2>\n<h3>3.1 Configuration de la session R et chargement des packages<\/h3>\n<p>L&rsquo;impl\u00e9mentation op\u00e9rationnelle des diagnostics de r\u00e9gression dans R b\u00e9n\u00e9ficie d&rsquo;une architecture native particuli\u00e8rement robuste int\u00e9gr\u00e9e directement dans le package de base <em>stats<\/em>. Ce dernier met \u00e0 disposition de l&rsquo;utilisateur des fonctions hautement optimis\u00e9es ne requ\u00e9rant aucune d\u00e9pendance externe obligatoire pour les calculs alg\u00e9briques \u00e9l\u00e9mentaires. Toutefois, pour garantir une manipulation fluide des structures tabulaires et concevoir des repr\u00e9sentations visuelles de qualit\u00e9 publication, l&rsquo;analyste a tout int\u00e9r\u00eat \u00e0 enrichir son espace de travail avec l&rsquo;\u00e9cosyst\u00e8me moderne de la science des donn\u00e9es.<\/p>\n<p>Nous mobiliserons ainsi les biblioth\u00e8ques du m\u00e9tapaquet <em>tidyverse<\/em>, en particulier <em>dplyr<\/em> pour les op\u00e9rations de transformation matricielle et de filtrage logique, ainsi que <em>ggplot2<\/em> pour la grammaire graphique. De surcro\u00eet, le package sp\u00e9cialis\u00e9 <em>car<\/em> (<em>Companion to Applied Regression<\/em>), d\u00e9velopp\u00e9 par John Fox et Sanford Weisberg, fournit une gamme \u00e9tendue d&rsquo;outils d&rsquo;audit diagnostique de haut niveau, facilitant les contr\u00f4les de multicolin\u00e9arit\u00e9 et la comparaison crois\u00e9e des m\u00e9triques.<\/p>\n<p>Afin de pr\u00e9server la parfaite reproductibilit\u00e9 des calculs et des graphiques g\u00e9n\u00e9r\u00e9s tout au long de cet article, il convient de figer l&rsquo;environnement de travail, de r\u00e9initialiser la graine du g\u00e9n\u00e9rateur de nombres pseudo-al\u00e9atoires et de v\u00e9rifier l&rsquo;int\u00e9grit\u00e9 des versions logicielles d\u00e9ploy\u00e9es :<\/p>\n<p># Configuration de la session R<br \/>\nset.seed(42)<br \/>\noptions(scipen = 999, digits = 5)<br \/>\nlibrary(stats)<br \/>\nlibrary(dplyr)<br \/>\nlibrary(ggplot2)<br \/>\nlibrary(car)<\/p>\n<p>L&rsquo;activation de l&rsquo;option <code>scipen = 999<\/code> emp\u00eache l&rsquo;affichage par d\u00e9faut en notation scientifique pour les petites valeurs d\u00e9cimales, favorisant une lecture directe et intuitive des m\u00e9triques calcul\u00e9es lors des sorties tabulaires en console.<\/p>\n<h3>3.2 S\u00e9lection et exploration du jeu de donn\u00e9es<\/h3>\n<p>Pour illustrer de fa\u00e7on didactique et imm\u00e9diatement reproductible l&rsquo;ensemble des concepts th\u00e9oriques expos\u00e9s, nous exploiterons le jeu de donn\u00e9es classique <code>mtcars<\/code>, extrait des donn\u00e9es de consommation automobile publi\u00e9es par le magazine <em>Motor Trend<\/em> en 1974. Bien que compact avec ses 32 observations et 11 attributs, ce jeu de donn\u00e9es pr\u00e9sente des particularit\u00e9s morphologiques id\u00e9ales pour l&rsquo;\u00e9tude des diagnostics d&rsquo;influence : h\u00e9t\u00e9rog\u00e9n\u00e9it\u00e9 des mod\u00e8les de v\u00e9hicules, pr\u00e9sence simultan\u00e9e de mod\u00e8les de sport tr\u00e8s performants et de berlines \u00e9conomiques, ainsi que des niveaux d&rsquo;effet de levier diversifi\u00e9s sur plusieurs dimensions m\u00e9caniques.<\/p>\n<p>Une inspection pr\u00e9liminaire rigoureuse de la structure interne des donn\u00e9es constitue un pr\u00e9requis incontournable avant tout travail d&rsquo;ajustement. L&rsquo;ex\u00e9cution des fonctions <code>str()<\/code> et <code>summary()<\/code> permet de circonscrire l&rsquo;amplitude des variables continues d&rsquo;int\u00e9r\u00eat :<\/p>\n<p># Exploration structurelle du jeu de donnees mtcars<br \/>\ndata(mtcars)<br \/>\nstr(mtcars)<br \/>\nsummary(mtcars[, c(\u00ab\u00a0mpg\u00a0\u00bb, \u00ab\u00a0disp\u00a0\u00bb, \u00ab\u00a0hp\u00a0\u00bb, \u00ab\u00a0wt\u00a0\u00bb)])<\/p>\n<p>Dans notre cadre exp\u00e9rimental, nous nous int\u00e9resserons sp\u00e9cifiquement \u00e0 la mod\u00e9lisation de la consommation \u00e9nerg\u00e9tique exprim\u00e9e en miles par gallon (variable <code>mpg<\/code>, constituant la r\u00e9ponse continue <span class=\"arabpsy-math-inline\" data-latex=\"Y\">$Y$<\/span>), en fonction de trois pr\u00e9dicteurs technologiques continus : la cylindr\u00e9e du moteur en pouces cubes (<code>disp<\/code>), la puissance brute d\u00e9velopp\u00e9e en chevaux-vapeur (<code>hp<\/code>) et la masse totale du v\u00e9hicule exprim\u00e9e en milliers de livres (<code>wt<\/code>). Ce sous-ensemble de variables garantit une interpr\u00e9tabilit\u00e9 physique claire tout en induisant des tensions structurelles suffisantes pour g\u00e9n\u00e9rer des points de levier substantiels.<\/p>\n<h3>3.3 Validation des pr\u00e9requis pour la r\u00e9gression lin\u00e9aire multiple<\/h3>\n<p>Pr\u00e9alablement \u00e0 l&rsquo;extraction et \u00e0 l&rsquo;interpr\u00e9tation des valeurs de DFFITS, il est m\u00e9thodologiquement imp\u00e9ratif de s&rsquo;assurer que les conditions fondamentales autorisant l&rsquo;usage de la r\u00e9gression lin\u00e9aire multiple sont raisonnablement satisfaites. L&rsquo;existence d&rsquo;une relation non lin\u00e9aire flagrante ou d&rsquo;une singularit\u00e9 matricielle s\u00e9v\u00e8re vicierait d&#8217;embl\u00e9e la pertinence de tout diagnostic d&rsquo;influence, dans la mesure o\u00f9 le r\u00e9sidu d&rsquo;une observation ne refl\u00e9terait alors pas son atypicit\u00e9 intrins\u00e8que mais une mauvaise sp\u00e9cification fonctionnelle du mod\u00e8le th\u00e9orique.<\/p>\n<p>L&rsquo;examen des diagrammes de dispersion bivari\u00e9s entre chaque variable explicative et la r\u00e9ponse <code>mpg<\/code> confirme l&rsquo;existence d&rsquo;associations n\u00e9gatives globalement monotones. Afin de v\u00e9rifier l&rsquo;absence d&rsquo;une multicolin\u00e9arit\u00e9 d\u00e9vastatrice qui pourrait d\u00e9stabiliser artificiellement l&rsquo;inversion de la matrice de dessein <span class=\"arabpsy-math-inline\" data-latex=\"X^T X\">$X^T X$<\/span>, nous pouvons examiner la matrice des corr\u00e9lations entre pr\u00e9dicteurs \u00e0 l&rsquo;aide de la syntaxe suivante :<\/p>\n<p># Matrice de correlation des variables explicatives<br \/>\ncor_matrix &lt;- cor(mtcars[, c(\u00ab\u00a0disp\u00a0\u00bb, \u00ab\u00a0hp\u00a0\u00bb, \u00ab\u00a0wt\u00a0\u00bb)])<br \/>\nround(cor_matrix, 3)<\/p>\n<p>Bien que des corr\u00e9lations substantielles soient observ\u00e9es entre la cylindr\u00e9e, le poids et la puissance moteur (ph\u00e9nom\u00e8ne attendu dans la construction automobile m\u00e9canique traditionnelle), le d\u00e9terminant de la matrice demeure strictement positif, excluant tout risque de singularit\u00e9 computationnelle directe. L&rsquo;infrastructure m\u00e9thodologique est ainsi valid\u00e9e, autorisant le calibrage formel du mod\u00e8le lin\u00e9aire multiple.<\/p>\n<h2>4. Ajustement du mod\u00e8le de r\u00e9gression lin\u00e9aire multiple<\/h2>\n<h3>4.1 Construction du mod\u00e8le \u00e0 l&rsquo;aide de la fonction lm()<\/h3>\n<p>L&rsquo;estimation des coefficients de r\u00e9gression par les moindres carr\u00e9s ordinaires s&rsquo;effectue dans R via la fonction fondamentale <code>lm()<\/code>. La syntaxe repose sur l&rsquo;op\u00e9rateur tilde (<code>~<\/code>), s\u00e9parant la variable endog\u00e8ne \u00e0 expliquer \u00e0 gauche du symbole, de la sp\u00e9cification additive des covariables explicatives \u00e0 droite :<\/p>\n<p># Estimation du modele de regression lineaire multiple<br \/>\nmodele_cars &lt;- lm(mpg ~ disp + hp + wt, data = mtcars)<br \/>\nsummary(modele_cars)<\/p>\n<p>L&rsquo;assignation du r\u00e9sultat \u00e0 l&rsquo;objet <code>modele_cars<\/code> cr\u00e9e une structure de classe <code>\"lm\"<\/code> qui encapsule une multiplicit\u00e9 d&rsquo;attributs math\u00e9matiques cruciaux, tels que les coefficients estim\u00e9s, les r\u00e9sidus ordinaires, les degr\u00e9s de libert\u00e9 r\u00e9siduels, ainsi que les \u00e9l\u00e9ments de d\u00e9composition QR de la matrice des variables pr\u00e9dictrices.<\/p>\n<p>L&rsquo;examen des coefficients issus de l&rsquo;instruction <code>summary()<\/code> r\u00e9v\u00e8le l&rsquo;orientation et l&rsquo;amplitude des effets marginaux. L&rsquo;\u00e9quation de pr\u00e9diction empirique prend la forme suivante :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"\\hat{\\text{mpg}} = \\beta_0 + \\beta_{\\text{disp}} \\cdot \\text{disp} + \\beta_{\\text{hp}} \\cdot \\text{hp} + \\beta_{\\text{wt}} \\cdot \\text{wt}\">$$\\hat{\\text{mpg}} = \\beta_0 + \\beta_{\\text{disp}} \\cdot \\text{disp} + \\beta_{\\text{hp}} \\cdot \\text{hp} + \\beta_{\\text{wt}} \\cdot \\text{wt}$$<\/span><\/p>\n<p>La statistique <span class=\"arabpsy-math-inline\" data-latex=\"t\">$t$<\/span> associ\u00e9e \u00e0 chaque r\u00e9gresseur permet d&rsquo;\u00e9valuer la significativit\u00e9 statistique individuelle des contributions conditionnelles, chaque coefficient d\u00e9crivant la variation attendue de la consommation pour chaque accroissement d&rsquo;une unit\u00e9 de la variable correspondante, toutes les autres variables du mod\u00e8le \u00e9tant maintenues rigoureusement constantes.<\/p>\n<h3>4.2 \u00c9valuation globale de la qualit\u00e9 de l&rsquo;ajustement<\/h3>\n<p>L&rsquo;\u00e9valuation globale de la performance du mod\u00e8le s&rsquo;appuie sur la trilogie canonique constitu\u00e9e par le coefficient de d\u00e9termination <span class=\"arabpsy-math-inline\" data-latex=\"R^2\">$R^2$<\/span>, le coefficient de d\u00e9termination ajust\u00e9 <span class=\"arabpsy-math-inline\" data-latex=\"R^2_{\\text{adj}}\">$R^2_{\\text{adj}}$<\/span>, et la statistique globale de Fisher (<span class=\"arabpsy-math-inline\" data-latex=\"F\">$F$<\/span>-test). Au sein de l&rsquo;objet r\u00e9sum\u00e9 de notre mod\u00e8le <code>modele_cars<\/code>, ces indicateurs synth\u00e9tisent la proportion de variance de la consommation absorb\u00e9e par le sous-espace vectoriel lin\u00e9aire d\u00e9fini par les variables pr\u00e9dictrices.<\/p>\n<p>Le coefficient de d\u00e9termination multiple <span class=\"arabpsy-math-inline\" data-latex=\"R^2\">$R^2$<\/span> mesure le rapport de la somme des carr\u00e9s expliqu\u00e9e \u00e0 la somme des carr\u00e9s totale :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"R^2 = 1 - \\frac{\\sum_{i=1}^n (y_i - \\hat{y}_i)^2}{\\sum_{i=1}^n (y_i - \\bar{y})^2}\">$$R^2 = 1 &#8211; \\frac{\\sum_{i=1}^n (y_i &#8211; \\hat{y}_i)^2}{\\sum_{i=1}^n (y_i &#8211; \\bar{y})^2}$$<\/span><\/p>\n<p>Dans notre sp\u00e9cification, ce param\u00e8tre oscille aux alentours de 0.826, attestant qu&rsquo;environ 82.6 % de la dispersion observ\u00e9e de l&rsquo;efficacit\u00e9 \u00e9nerg\u00e9tique des v\u00e9hicules est prise en compte par le mod\u00e8le. Le coefficient ajust\u00e9 <span class=\"arabpsy-math-inline\" data-latex=\"R^2_{\\text{adj}}\">$R^2_{\\text{adj}}$<\/span>, p\u00e9nalisant le nombre de r\u00e9gresseurs introduits pour pr\u00e9venir le surajustement m\u00e9canique, corrobore cette solide assise pr\u00e9dictive.<\/p>\n<p>Parall\u00e8lement, la statistique globale <span class=\"arabpsy-math-inline\" data-latex=\"F\">$F$<\/span> teste l&rsquo;hypoth\u00e8se nulle conjointe <span class=\"arabpsy-math-inline\" data-latex=\"H_0 : \\beta_{\\text{disp}} = \\beta_{\\text{hp}} = \\beta_{\\text{wt}} = 0\">$H_0 : \\beta_{\\text{disp}} = \\beta_{\\text{hp}} = \\beta_{\\text{wt}} = 0$<\/span>. La <span class=\"arabpsy-math-inline\" data-latex=\"p\">$p$<\/span>-valeur associ\u00e9e, tr\u00e8s largement inf\u00e9rieure au seuil critique conventionnel <span class=\"arabpsy-math-inline\" data-latex=\"\\alpha = 0.001\">$\\alpha = 0.001$<\/span>, confirme le rejet cat\u00e9gorique de cette hypoth\u00e8se nulle. Enfin, l&rsquo;erreur standard r\u00e9siduelle (<em>Residual Standard Error<\/em>, not\u00e9e RSE), qui quantifie l&rsquo;\u00e9cart quadratique moyen des observations autour de l&rsquo;hyperplan ajust\u00e9 avec <span class=\"arabpsy-math-inline\" data-latex=\"n - p = 32 - 4 = 28\">$n &#8211; p = 32 &#8211; 4 = 28$<\/span> degr\u00e9s de libert\u00e9, s&rsquo;\u00e9tablit \u00e0 une valeur mod\u00e9r\u00e9e d&rsquo;environ 2.6 miles par gallon.<\/p>\n<h3>4.3 Extraction des \u00e9l\u00e9ments cl\u00e9s n\u00e9cessaires aux diagnostics<\/h3>\n<p>Pour mener \u00e0 bien un audit diagnostique rigoureux, il est essentiel de d\u00e9sassembler les composantes de l&rsquo;objet <code>modele_cars<\/code>. Plusieurs fonctions d&rsquo;extraction g\u00e9n\u00e9riques int\u00e9gr\u00e9es dans le socle de base de R permettent d&rsquo;acc\u00e9der directement aux \u00e9l\u00e9ments math\u00e9matiques n\u00e9cessaires \u00e0 la construction des m\u00e9triques d&rsquo;influence.<\/p>\n<p>Nous pouvons notamment isoler le vecteur des pr\u00e9dictions internes (les valeurs ajust\u00e9es <span class=\"arabpsy-math-inline\" data-latex=\"\\hat{y}_i\">$\\hat{y}_i$<\/span>) au moyen de la fonction <code>fitted()<\/code>, et le vecteur des r\u00e9sidus ordinaires bruts <span class=\"arabpsy-math-inline\" data-latex=\"e_i\">$e_i$<\/span> via la fonction <code>residuals()<\/code>. De m\u00eame, les param\u00e8tres scalaires relatifs \u00e0 la dimensionnalit\u00e9 du mod\u00e8le peuvent \u00eatre programm\u00e9s de mani\u00e8re totalement dynamique :<\/p>\n<p># Extraction des grandeurs structurales du modele<br \/>\nvaleurs_ajustees &lt;- fitted(modele_cars)<br \/>\nresidus_bruts &lt;- residuals(modele_cars)<br \/>\nn_obs &lt;- nrow(mtcars)<br \/>\np_params &lt;- length(coef(modele_cars)) # inclut la constante bo<br \/>\ndegres_liberte &lt;- df.residual(modele_cars)<\/p>\n<p>Ces \u00e9l\u00e9ments constituent le substrat informatique sur lequel les algorithmes d&rsquo;influence vont op\u00e9rer. En conservant l&rsquo;indexation nominale des lignes du tableau originel (ici, les d\u00e9nominations exactes des mod\u00e8les de v\u00e9hicules), R assure une tra\u00e7abilit\u00e9 sans faille entre les coordonn\u00e9es matricielles abstraites et les entit\u00e9s physiques observ\u00e9es.<\/p>\n<h2>5. Calcul pas \u00e0 pas des valeurs de DFFITS avec la fonction dffits()<\/h2>\n<h3>5.1 Utilisation de la fonction dffits() int\u00e9gr\u00e9e \u00e0 R<\/h3>\n<p>L&rsquo;extraction standardis\u00e9e des valeurs de DFFITS dans l&rsquo;environnement R ne requiert aucun calcul complexe pr\u00e9alable gr\u00e2ce \u00e0 la pr\u00e9sence de la fonction native <code>dffits()<\/code> appartenant au package <code>stats<\/code>. Cette fonction impl\u00e9mente directement les algorithmes d&rsquo;actualisation rapide bas\u00e9s sur la d\u00e9composition QR, permettant un calcul instantan\u00e9 sans qu&rsquo;aucune boucle it\u00e9rative co\u00fbteuse ne soit ex\u00e9cut\u00e9e sur la machine h\u00f4te.<\/p>\n<figure class=\"wpt-preserved-image\"><img fetchpriority=\"high\" decoding=\"async\" src=\"http:\/\/french.arabpsychology.com\/wp-content\/uploads\/2026\/09\/dffits1.png\" alt=\"DFFITS in R\" \/><figcaption>DFFITS in R<\/figcaption><\/figure>\n<p>L&rsquo;appel de la fonction s&rsquo;effectue en lui transmettant simplement en argument l&rsquo;objet de mod\u00e9lisation r\u00e9sultant de <code>lm()<\/code> :<\/p>\n<p># Calcul direct des valeurs de DFFITS<br \/>\nvaleurs_dffits &lt;- dffits(modele_cars)<br \/>\nhead(valeurs_dffits, 10)<\/p>\n<p>L&rsquo;objet retourn\u00e9 est un vecteur num\u00e9rique nomm\u00e9 \u00e0 une dimension, dont la longueur correspond rigoureusement \u00e0 la taille de l&rsquo;\u00e9chantillon <span class=\"arabpsy-math-inline\" data-latex=\"n\">$n$<\/span>. Chaque \u00e9l\u00e9ment vectoriel porte comme identifiant textuel le nom de l&rsquo;observation correspondante, ce qui facilite les op\u00e9rations de rep\u00e9rage et de manipulation ult\u00e9rieure.<\/p>\n<h3>5.2 Structuration des r\u00e9sultats dans un tableau r\u00e9capitulatif<\/h3>\n<p>Pour exploiter pleinement ces informations, la bonne pratique m\u00e9thodologique consiste \u00e0 agr\u00e9ger les grandeurs diagnostiques calcul\u00e9es au sein d&rsquo;un tableau de donn\u00e9es (<code>data.frame<\/code> ou <code>tibble<\/code>) regroupant les identifiants, les donn\u00e9es empiriques r\u00e9elles, les pr\u00e9dictions du mod\u00e8le et les valeurs d&rsquo;influence associ\u00e9es.<\/p>\n<p>Le code suivant construit une structure tabulaire unifi\u00e9e et trie les observations selon l&rsquo;amplitude absolue de leur perturbation pr\u00e9dictive, permettant ainsi de faire \u00e9merger imm\u00e9diatement les dix unit\u00e9s statistiques exer\u00e7ant les tensions les plus prononc\u00e9es :<\/p>\n<p># Structuration et hierarchisation tabulaire des resultats<br \/>\ndiagnostic_df &lt;- data.frame(<br \/>\n&nbsp;&nbsp;Vehicule = rownames(mtcars),<br \/>\n&nbsp;&nbsp;MPG_Reel = mtcars$mpg,<br \/>\n&nbsp;&nbsp;MPG_Predit = valeurs_ajustees,<br \/>\n&nbsp;&nbsp;Residu_Brut = residus_bruts,<br \/>\n&nbsp;&nbsp;DFFITS = valeurs_dffits,<br \/>\n&nbsp;&nbsp;Abs_DFFITS = abs(valeurs_dffits)<br \/>\n)<\/p>\n<p>diagnostic_ordonne &lt;- diagnostic_df %&gt;%<br \/>\n&nbsp;&nbsp;arrange(desc(Abs_DFFITS))<\/p>\n<p># Visualisation des dix cas les plus singuliers<br \/>\nhead(diagnostic_ordonne, 10)<\/p>\n<p>Cette disposition tabulaire fournit un bilan de contr\u00f4le synth\u00e9tique. Elle permet d&rsquo;appr\u00e9cier d&rsquo;un simple coup d&rsquo;\u0153il si un v\u00e9hicule particulier accumule un \u00e9cart pr\u00e9dictif substantiel conjointement \u00e0 une influence disproportionn\u00e9e sur sa propre estimation.<\/p>\n<h3>5.3 Interpr\u00e9tation du signe alg\u00e9brique du DFFITS<\/h3>\n<p>Contrairement aux mesures quadratiques globales d&rsquo;influence, le DFFITS poss\u00e8de une orientation sign\u00e9e qui rec\u00e8le une information diagnostique essentielle quant \u00e0 la dynamique d&rsquo;ajustement du point cible. Le signe du DFFITS d\u00e9coule directement du signe du r\u00e9sidu externe, lui-m\u00eame align\u00e9 sur celui du r\u00e9sidu ordinaire <span class=\"arabpsy-math-inline\" data-latex=\"e_i = y_i - \\hat{y}_i\">$e_i = y_i &#8211; \\hat{y}_i$<\/span>.<\/p>\n<p>Une valeur positive du DFFITS (<span class=\"arabpsy-math-inline\" data-latex=\"\\text{DFFITS}_i &gt; 0\">$\\text{DFFITS}_i &gt; 0$<\/span>) signifie que la valeur pr\u00e9dite compl\u00e8te <span class=\"arabpsy-math-inline\" data-latex=\"\\hat{y}_i\">$\\hat{y}_i$<\/span> est sup\u00e9rieure \u00e0 la pr\u00e9diction avec suppression <span class=\"arabpsy-math-inline\" data-latex=\"\\hat{y}_{(i)}\">$\\hat{y}_{(i)}$<\/span>. En d&rsquo;autres termes, la pr\u00e9sence de l&rsquo;observation <em>i<\/em> dans l&rsquo;\u00e9chantillon tire la surface de r\u00e9gression vers le haut au voisinage de ses coordonn\u00e9es, de sorte que l&rsquo;omission du point conduit \u00e0 une pr\u00e9diction amoindrie. La r\u00e9ponse r\u00e9elle observ\u00e9e pour cet individu d\u00e9passe ce que la structure tendancielle des autres donn\u00e9es pr\u00e9disait, contraignant le mod\u00e8le complet \u00e0 ajuster ses estimations vers le haut pour tenter de r\u00e9duire cet \u00e9cart.<\/p>\n<p>R\u00e9ciproquement, une valeur n\u00e9gative du DFFITS (<span class=\"arabpsy-math-inline\" data-latex=\"\\text{DFFITS}_i &lt; 0\">$\\text{DFFITS}_i &lt; 0$<\/span>) atteste que la valeur pr\u00e9dite compl\u00e8te <span class=\"arabpsy-math-inline\" data-latex=\"\\hat{y}_i\">$\\hat{y}_i$<\/span> est inf\u00e9rieure \u00e0 la pr\u00e9diction sans le point <span class=\"arabpsy-math-inline\" data-latex=\"\\hat{y}_{(i)}\">$\\hat{y}_{(i)}$<\/span>. L&rsquo;observation exerce une attraction descendante sur l&rsquo;hyperplan de r\u00e9gression. Si on retire ce point du calibrage, le mod\u00e8le r\u00e9estim\u00e9 pr\u00e9dit une valeur plus \u00e9lev\u00e9e pour ce m\u00eame ensemble de caract\u00e9ristiques explicatives. L&rsquo;analyste doit ainsi interpr\u00e9ter la magnitude absolue <span class=\"arabpsy-math-inline\" data-latex=\"|\\text{DFFITS}_i|\">$|\\text{DFFITS}_i|$<\/span> comme la force motrice de l&rsquo;influence exerc\u00e9e, et le signe alg\u00e9brique comme l&rsquo;orientation vectorielle du d\u00e9placement impos\u00e9 \u00e0 la pr\u00e9diction.<\/p>\n<h2>6. Calcul manuel et d\u00e9composition du DFFITS pour une validation th\u00e9orique<\/h2>\n<h3>6.1 Extraction des r\u00e9sidus studentis\u00e9s externes<\/h3>\n<p>Afin de valider la compr\u00e9hension th\u00e9orique des m\u00e9canismes r\u00e9gissant le DFFITS et de s&rsquo;\u00e9manciper d&rsquo;une logique de bo\u00eete noire logicielle, il est hautement formateur de reconstituer manuellement cette m\u00e9trique en programmant ses composants constitutifs \u00e9l\u00e9mentaires. La premi\u00e8re \u00e9tape consiste \u00e0 extraire les r\u00e9sidus studentis\u00e9s externes (r\u00e9sidus jackknife).<\/p>\n<p>Dans R, la fonction d\u00e9di\u00e9e <code>rstudent()<\/code> r\u00e9alise cette op\u00e9ration en appliquant la formule de suppression unitaire de la variance r\u00e9siduelle pour chaque observation :<\/p>\n<p># Extraction des residus studentises externes<br \/>\nresidus_jackknife &lt;- rstudent(modele_cars)<br \/>\nhead(residus_jackknife, 5)<\/p>\n<p>Sur le plan distributionnel, ces r\u00e9sidus permettent d&rsquo;isoler la variance propre \u00e0 l&rsquo;observation examin\u00e9e. Si un individu pr\u00e9sente une valeur r\u00e9siduelle extr\u00eamement large, l&rsquo;estimateur conventionnel de la variance r\u00e9siduelle globale <span class=\"arabpsy-math-inline\" data-latex=\"s^2\">$s^2$<\/span> est artificiellement tir\u00e9 vers le haut, ce qui tend \u00e0 compresser ind\u00fbment les r\u00e9sidus studentis\u00e9s internes (ph\u00e9nom\u00e8ne de masquage statistique). En \u00e9liminant l&rsquo;observation de l&rsquo;estimation de l&rsquo;erreur quadratique moyenne, le r\u00e9sidu externe <span class=\"arabpsy-math-inline\" data-latex=\"rstudent_i\">$rstudent_i$<\/span> restaure une sensibilit\u00e9 optimale face aux anomalies singuli\u00e8res.<\/p>\n<h3>6.2 Calcul des valeurs de levier (hatvalues)<\/h3>\n<p>Le second pilier n\u00e9cessaire \u00e0 la reconstitution du DFFITS r\u00e9side dans l&rsquo;extraction des \u00e9l\u00e9ments diagonaux de la matrice de projection <span class=\"arabpsy-math-inline\" data-latex=\"H\">$H$<\/span>, couramment d\u00e9nomm\u00e9s poids de levier ou <em>hat values<\/em> (<span class=\"arabpsy-math-inline\" data-latex=\"h_{ii}\">$h_{ii}$<\/span>). Dans l&rsquo;environnement R, ces valeurs s&rsquo;obtiennent directement au moyen de la fonction vectoris\u00e9e <code>hatvalues()<\/code> :<\/p>\n<p># Extraction des leviers diagonaux de la matrice chapeau<br \/>\nleviers_hii &lt;- hatvalues(modele_cars)<br \/>\nhead(leviers_hii, 5)<\/p>\n<p>D&rsquo;un point de vue g\u00e9om\u00e9trique, la grandeur <span class=\"arabpsy-math-inline\" data-latex=\"h_{ii}\">$h_{ii}$<\/span> quantifie l&rsquo;\u00e9loignement d&rsquo;une observation par rapport au barycentre (le point moyen) du nuage de points form\u00e9 par l&rsquo;ensemble des pr\u00e9dicteurs dans l&rsquo;espace <span class=\"arabpsy-math-inline\" data-latex=\"\\mathbb{R}^p\">$\\mathbb{R}^p$<\/span>. Elle est born\u00e9e par construction entre <span class=\"arabpsy-math-inline\" data-latex=\"1\/n\">$1\/n$<\/span> (dans un mod\u00e8le avec constante) et 1. La somme totale des \u00e9l\u00e9ments diagonaux d&rsquo;une matrice chapeau est invariablement \u00e9gale au nombre de colonnes lin\u00e9airement ind\u00e9pendantes de la matrice de dessein, soit la quantit\u00e9 exacte de coefficients <span class=\"arabpsy-math-inline\" data-latex=\"p\">$p$<\/span> :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"\\sum_{i=1}^n h_{ii} = \\text{tr}(H) = p\">$$\\sum_{i=1}^n h_{ii} = \\text{tr}(H) = p$$<\/span><\/p>\n<p>Une valeur <span class=\"arabpsy-math-inline\" data-latex=\"h_{ii}\">$h_{ii}$<\/span> particuli\u00e8rement \u00e9lev\u00e9e signale une configuration morphologique rare ou excentrique des covariables, conf\u00e9rant m\u00e9caniquement \u00e0 l&rsquo;observation correspondante un levier g\u00e9om\u00e9trique consid\u00e9rable sur l&rsquo;ajustement de la pente de r\u00e9gression.<\/p>\n<h3>6.3 Reconstitution algorithmique et v\u00e9rification de la concordance<\/h3>\n<p>Disposant d\u00e9sormais du vecteur des r\u00e9sidus studentis\u00e9s externes <code>residus_jackknife<\/code> et du vecteur des leviers <code>leviers_hii<\/code>, nous pouvons programmer l&rsquo;\u00e9quation de factorisation formelle et comparer les r\u00e9sultats obtenus \u00e0 ceux renvoy\u00e9s par la fonction standard <code>dffits()<\/code> :<\/p>\n<p># Reconstitution formelle de la formule mathematique<br \/>\ndffits_manuel &lt;- residus_jackknife * sqrt(leviers_hii \/ (1 &#8211; leviers_hii))<\/p>\n<p># Comparaison analytique et controle de precision numerique<br \/>\nconcordance &lt;- all.equal(valeurs_dffits, dffits_manuel)<br \/>\nprint(concordance)<\/p>\n<p>L&rsquo;ex\u00e9cution de la fonction <code>all.equal()<\/code> retourne la valeur bool\u00e9enne <code>TRUE<\/code>, attestant que les \u00e9carts r\u00e9siduels entre les deux approches se situent bien en de\u00e7\u00e0 des limites de pr\u00e9cision machine de la double pr\u00e9cision virgule flottante (g\u00e9n\u00e9ralement inf\u00e9rieure \u00e0 <span class=\"arabpsy-math-inline\" data-latex=\"10^{-15}\">$10^{-15}$<\/span>). Cet exercice apporte la preuve math\u00e9matique et computationnelle de l&rsquo;\u00e9quivalence stricte entre l&rsquo;approche th\u00e9orique par suppression s\u00e9quentielle des lignes et la factorisation matricielle directe via les leviers et les r\u00e9sidus jackknife.<\/p>\n<h2>7. \u00c9tablissement des seuils critiques d&rsquo;influence<\/h2>\n<h3>7.1 Seuils traditionnels recommand\u00e9s par Belsley, Kuh et Welsch<\/h3>\n<p>L&rsquo;\u00e9valuation quantitative du DFFITS n\u00e9cessite une grille de d\u00e9cision objective permettant de distinguer les fluctuations statistiques naturelles des perturbations excessives exigeant une investigation m\u00e9thodologique pouss\u00e9e. Dans leur publication fondatrice de 1980, David A. Belsley, Edwin Kuh et Roy E. Welsch ont propos\u00e9 deux r\u00e8gles heuristiques distinctes selon la nature et l&rsquo;envergure de l&rsquo;\u00e9chantillon analys\u00e9.<\/p>\n<p>Pour les \u00e9chantillons de taille modeste ou restreinte, les auteurs pr\u00e9conisent l&rsquo;application d&rsquo;un seuil empirique absolu fixe :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"\\text{Seuil}_{\\text{petit}} = 1.0\">$$\\text{Seuil}_{\\text{petit}} = 1.0$$<\/span><\/p>\n<p>Une valeur de <span class=\"arabpsy-math-inline\" data-latex=\"|\\text{DFFITS}_i| &gt; 1\">$|\\text{DFFITS}_i| &gt; 1$<\/span> implique que le retrait de l&rsquo;observation d\u00e9place sa propre valeur ajust\u00e9e de plus d&rsquo;un \u00e9cart-type complet d&rsquo;erreur pr\u00e9dictive, ce qui constitue une instabilit\u00e9 consid\u00e9rable pour un mod\u00e8le lin\u00e9aire param\u00e9trique.<\/p>\n<p>N\u00e9anmoins, pour les \u00e9chantillons de taille moyenne \u00e0 grande, l&rsquo;accroissement continu du d\u00e9nominateur d&rsquo;\u00e9chantillonnage <span class=\"arabpsy-math-inline\" data-latex=\"n\">$n$<\/span> a pour effet structurel de tasser m\u00e9caniquement les valeurs de levier <span class=\"arabpsy-math-inline\" data-latex=\"h_{ii}\">$h_{ii}$<\/span>. Dans ce cadre, un seuil fixe universel risquerait d&rsquo;\u00e9chouer \u00e0 d\u00e9tecter des observations exer\u00e7ant une influence relative tr\u00e8s nette au sein de leur propre population. Les auteurs ont donc con\u00e7u un seuil dynamique d\u00e9pendant de la dimensionnalit\u00e9 globale du mod\u00e8le :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"\\text{Seuil}_{\\text{grand}} = 2 \\times \\sqrt{\\frac{p}{n}}\">$$\\text{Seuil}_{\\text{grand}} = 2 \\times \\sqrt{\\frac{p}{n}}$$<\/span><\/p>\n<p>o\u00f9 <span class=\"arabpsy-math-inline\" data-latex=\"p\">$p$<\/span> d\u00e9signe le nombre de coefficients estim\u00e9s (y compris le terme constant) et <span class=\"arabpsy-math-inline\" data-latex=\"n\">$n$<\/span> le volume total d&rsquo;observations. Ce seuil correspond approximativement au double de la valeur quadratique moyenne attendue sous l&rsquo;hypoth\u00e8se de dispersion homog\u00e8ne de l&rsquo;influence parmi l&rsquo;ensemble des donn\u00e9es.<\/p>\n<h3>7.2 Calcul dynamique des seuils dans l&rsquo;environnement R<\/h3>\n<p>L&rsquo;automatisation du calcul du seuil dynamique constitue une excellente pratique algorithmique qui pr\u00e9vient les erreurs manuelles lors de modifications it\u00e9ratives de la structure des r\u00e9gresseurs ou de la taille de l&rsquo;\u00e9chantillon. Dans R, cette impl\u00e9mentation se programme en quelques lignes de syntaxe vectoris\u00e9e :<\/p>\n<p># Calcul des parametres dimensionnels<br \/>\nn &lt;- nrow(mtcars)<br \/>\np &lt;- length(coef(modele_cars))<\/p>\n<p># Determination des seuils critiques conventionnels<br \/>\nseuil_absolu &lt;- 1.0<br \/>\nseuil_dynamique &lt;- 2 * sqrt(p \/ n)<\/p>\n<p>cat(\u00ab\u00a0Taille de l&rsquo;echantillon (n) :\u00a0\u00bb, n, \u00ab\u00a0n\u00a0\u00bb)<br \/>\ncat(\u00ab\u00a0Nombre de parametres (p) :\u00a0\u00bb, p, \u00ab\u00a0n\u00a0\u00bb)<br \/>\ncat(\u00ab\u00a0Seuil dynamique BKW (2*sqrt(p\/n)) :\u00a0\u00bb, round(seuil_dynamique, 4), \u00ab\u00a0n\u00a0\u00bb)<\/p>\n<p>Dans notre cas exp\u00e9rimental avec <code>mtcars<\/code> (<span class=\"arabpsy-math-inline\" data-latex=\"n = 32\">$n = 32$<\/span>, <span class=\"arabpsy-math-inline\" data-latex=\"p = 4\">$p = 4$<\/span>), la formule dynamique produit :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"\\text{Seuil}_{\\text{dynamique}} = 2 \\times \\sqrt{\\frac{4}{32}} = 2 \\times \\sqrt{0.125} \\approx 0.7071\">$$\\text{Seuil}_{\\text{dynamique}} = 2 \\times \\sqrt{\\frac{4}{32}} = 2 \\times \\sqrt{0.125} \\approx 0.7071$$<\/span><\/p>\n<p>Nous pouvons alors proc\u00e9der au filtrage programmatique des unit\u00e9s statistiques franchissant ce seuil critique :<\/p>\n<p># Identification des observations depassant le seuil dynamique<br \/>\ncas_influents &lt;&#8211; diagnostic_df %&gt;%<br \/>\n&nbsp;&nbsp;filter(Abs_DFFITS &gt; seuil_dynamique) %&gt;%<br \/>\n&nbsp;&nbsp;arrange(desc(Abs_DFFITS))<\/p>\n<p>print(cas_influents[, c(\u00ab\u00a0Vehicule\u00a0\u00bb, \u00ab\u00a0DFFITS\u00a0\u00bb, \u00ab\u00a0Abs_DFFITS\u00a0\u00bb)])<\/p>\n<p>L&rsquo;application de ce crit\u00e8re dynamique permet d&rsquo;isoler rigoureusement les individus qui d\u00e9vient de fa\u00e7on disproportionn\u00e9e par rapport au niveau d&rsquo;influence moyen de l&rsquo;\u00e9chantillon \u00e9tudi\u00e9.<\/p>\n<h3>7.3 Nuances m\u00e9thodologiques selon la taille de l&rsquo;\u00e9chantillon<\/h3>\n<p>Bien que la r\u00e8gle <span class=\"arabpsy-math-inline\" data-latex=\"2\\sqrt{p\/n}\">$2\\sqrt{p\/n}$<\/span> offre une assise th\u00e9orique \u00e9l\u00e9gante, son application aveugle comporte des \u00e9cueils m\u00e9thodologiques bien document\u00e9s. Lorsque la taille d&rsquo;\u00e9chantillon devient exceptionnellement vaste (par exemple dans le cadre d&rsquo;\u00e9tudes g\u00e9nomiques, d&rsquo;enqu\u00eates de recensement ou de bases de donn\u00e9es transactionnelles massives o\u00f9 <span class=\"arabpsy-math-inline\" data-latex=\"n\">$n$<\/span> se chiffre en dizaines ou centaines de milliers), le seuil dynamique converge vers des valeurs infinit\u00e9simales :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"\\lim_{n to \\infty} 2 \\times \\sqrt{\\frac{p}{n}} = 0\">$$\\lim_{n to \\infty} 2 \\times \\sqrt{\\frac{p}{n}} = 0$$<\/span><\/p>\n<p>Dans ce contexte de m\u00e9gadonn\u00e9es (<em>big data<\/em>), un nombre consid\u00e9rable d&rsquo;observations ordinaires franchiront m\u00e9caniquement le seuil critique, g\u00e9n\u00e9rant un ph\u00e9nom\u00e8ne massif de fausses alertes (sur-d\u00e9tection d&rsquo;influence). Pour ces cohortes de grande dimension, l&rsquo;analyste avis\u00e9 privil\u00e9giera le seuil fixe de 1.0, voire un examen direct de la distribution empirique des valeurs de DFFITS via les quantiles extr\u00eames (par exemple, le 99e centile).<\/p>\n<p>\u00c0 l&rsquo;inverse, dans les protocoles pilotes ou les exp\u00e9rimentations biom\u00e9dicales restreintes o\u00f9 <span class=\"arabpsy-math-inline\" data-latex=\"n\">$n$<\/span> est particuli\u00e8rement r\u00e9duit par rapport au nombre de variables mesur\u00e9es, le seuil dynamique peut devenir excessivement \u00e9lev\u00e9, risquant de masquer des anomalies qui exercent pourtant une distorsion concr\u00e8te sur les param\u00e8tres estim\u00e9s (sous-d\u00e9tection). Il convient donc de traiter ces seuils num\u00e9riques non pas comme des barri\u00e8res absolues et dogmatiques, mais comme des indicateurs de tri heuristiques guidant l&rsquo;attention de l&rsquo;analyste vers les observations n\u00e9cessitant une inspection clinique approfondie.<\/p>\n<h2>8. Visualisation graphique des valeurs de DFFITS<\/h2>\n<h3>8.1 Repr\u00e9sentation graphique \u00e9l\u00e9mentaire avec le moteur graphique de base<\/h3>\n<p>L&rsquo;exploration visuelle constitue le compl\u00e9ment indissociable de l&rsquo;analyse tabulaire. L&rsquo;environnement graphique natif de R permet d&rsquo;\u00e9riger rapidement un diagramme d&rsquo;indices (<em>index plot<\/em>) mettant en regard l&rsquo;identifiant s\u00e9quentiel de chaque ligne et sa valeur de DFFITS correspondante.<\/p>\n<p>La syntaxe ci-apr\u00e8s illustre la cr\u00e9ation d&rsquo;un graphique d&rsquo;indices annot\u00e9 des seuils critiques :<\/p>\n<p># Graphique d&rsquo;indices avec le moteur de base R<br \/>\nplot(valeurs_dffits,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;type = \u00ab\u00a0h\u00a0\u00bb,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;main = \u00ab\u00a0Diagnostic d&rsquo;influence : DFFITS par observation\u00a0\u00bb,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xlab = \u00ab\u00a0Index de l&rsquo;observation\u00a0\u00bb,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ylab = \u00ab\u00a0Valeur du DFFITS\u00a0\u00bb,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;lwd = 2,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;col = \u00ab\u00a0steelblue\u00a0\u00bb)<br \/>\nabline(h = 0, lty = 1, col = \u00ab\u00a0grey60\u00a0\u00bb)<br \/>\nabline(h = c(-seuil_dynamique, seuil_dynamique), lty = 2, col = \u00ab\u00a0firebrick\u00a0\u00bb, lwd = 1.5)<br \/>\npoints(valeurs_dffits, pch = 19, col = \u00ab\u00a0steelblue\u00a0\u00bb, cex = 0.8)<\/p>\n<p>L&#8217;emploi du type <code>\"h\"<\/code> trace des barres verticales reliant chaque observation \u00e0 l&rsquo;axe d&rsquo;ordonn\u00e9e z\u00e9ro, tandis que la fonction <code>abline()<\/code> mat\u00e9rialise les fronti\u00e8res d&rsquo;alerte positives et n\u00e9gatives. Ce graphique offre un panorama visuel imm\u00e9diat de la sym\u00e9trie de la distribution et r\u00e9v\u00e8le sans ambigu\u00eft\u00e9 les observations qui s&rsquo;\u00e9chappent des bandes de confiance centrales.<\/p>\n<h3>8.2 Conception d&rsquo;une visualisation avanc\u00e9e avec ggplot2<\/h3>\n<p>Pour des pr\u00e9sentations destin\u00e9es \u00e0 des revues acad\u00e9miques ou des rapports d&rsquo;audit statistique formels, la grammaire graphique impl\u00e9ment\u00e9e dans <em>ggplot2<\/em> offre une flexibilit\u00e9 de mise en page et un rendu esth\u00e9tique sup\u00e9rieurs. Le graphique en b\u00e2tons (<em>lollipop plot<\/em>) repr\u00e9sente l&rsquo;alternative visuelle la plus \u00e9l\u00e9gante pour ce type de diagnostic univari\u00e9 sign\u00e9.<\/p>\n<p>Afin de pr\u00e9venir tout chevauchement textuel lors de l&rsquo;annotation des cas probl\u00e9matiques, nous pouvons adjoindre l&rsquo;extension <a rel=\"noopener noreferrer\" href=\"https:\/\/cran.r-project.org\/package=ggrepel\">ggrepel<\/a>, qui optimise algorithmiquement le placement des \u00e9tiquettes :<\/p>\n<p># Construction d&rsquo;un lollipop plot conditionnel avec ggplot2<br \/>\nlibrary(ggrepel)<\/p>\n<p>plot_df &lt;- diagnostic_df %&gt;%<br \/>\n&nbsp;&nbsp;mutate(<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;Index = row_number(),<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;Est_Influent = Abs_DFFITS &gt; seuil_dynamique,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;Label = if_else(Est_Influent, as.character(Vehicule), \u00ab\u00a0\u00a0\u00bb)<br \/>\n&nbsp;&nbsp;)<\/p>\n<p>ggplot(plot_df, aes(x = Index, y = DFFITS)) +<br \/>\n&nbsp;&nbsp;geom_segment(aes(x = Index, xend = Index, y = 0, yend = DFFITS),<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;color = if_else(plot_df$Est_Influent, \u00ab\u00a0firebrick\u00a0\u00bb, \u00ab\u00a0grey70\u00a0\u00bb),<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;linewidth = 0.8) +<br \/>\n&nbsp;&nbsp;geom_point(aes(color = Est_Influent), size = 2.5) +<br \/>\n&nbsp;&nbsp;scale_color_manual(values = c(\u00ab\u00a0FALSE\u00a0\u00bb = \u00ab\u00a0grey50\u00a0\u00bb, \u00ab\u00a0TRUE\u00a0\u00bb = \u00ab\u00a0firebrick\u00a0\u00bb)) +<br \/>\n&nbsp;&nbsp;geom_hline(yintercept = 0, color = \u00ab\u00a0black\u00a0\u00bb, linewidth = 0.4) +<br \/>\n&nbsp;&nbsp;geom_hline(yintercept = c(-seuil_dynamique, seuil_dynamique),<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;linetype = \u00ab\u00a0dashed\u00a0\u00bb, color = \u00ab\u00a0darkred\u00a0\u00bb, linewidth = 0.6) +<br \/>\n&nbsp;&nbsp;geom_text_repel(aes(label = Label), max.overlaps = 15, size = 3.2, box.padding = 0.5) +<br \/>\n&nbsp;&nbsp;labs(<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;title = \u00ab\u00a0Audit d&rsquo;influence : Diagnostic DFFITS par observation\u00a0\u00bb,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;subtitle = paste(\u00ab\u00a0Seuil dynamique critique : +\/-\u00ab\u00a0, round(seuil_dynamique, 3)),<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;x = \u00ab\u00a0Indice de l&rsquo;observation\u00a0\u00bb,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;y = \u00ab\u00a0Valeur DFFITS\u00a0\u00bb<br \/>\n&nbsp;&nbsp;) +<br \/>\n&nbsp;&nbsp;theme_minimal() +<br \/>\n&nbsp;&nbsp;theme(legend.position = \u00ab\u00a0none\u00a0\u00bb, plot.title = element_text(face = \u00ab\u00a0bold\u00a0\u00bb))<\/p>\n<p>Cette visualisation permet d&rsquo;identifier sans ambigu\u00eft\u00e9 les observations franchissant le seuil critique gr\u00e2ce \u00e0 un encodage chromatique conditionnel rouge, tandis que les \u00e9tiquettes textuelles d\u00e9signent nomm\u00e9ment les entit\u00e9s responsables des tensions observ\u00e9es.<\/p>\n<h3>8.3 Int\u00e9gration dans un tableau de bord diagnostique global<\/h3>\n<p>L&rsquo;\u00e9valuation isol\u00e9e du DFFITS ne saurait remplacer une analyse int\u00e9gr\u00e9e confrontant simultan\u00e9ment les diff\u00e9rents faisceaux de preuves diagnostiques. Dans les protocoles de publication acad\u00e9mique, il est recommand\u00e9 de juxtaposer le DFFITS avec la distance de Cook et l&rsquo;effet de levier diagonal <span class=\"arabpsy-math-inline\" data-latex=\"h_{ii}\">$h_{ii}$<\/span>.<\/p>\n<p>Cette mise en regard conjointe permet de d\u00e9terminer instantan\u00e9ment si l&rsquo;influence exerc\u00e9e par une entit\u00e9 statistique d\u00e9coule prioritairement d&rsquo;un r\u00e9sidu extr\u00eame sur la variable r\u00e9ponse ou d&rsquo;une position singuli\u00e8re dans l&rsquo;espace des covariables. Un tel tableau de bord graphique peut \u00eatre facilement agenc\u00e9 \u00e0 l&rsquo;aide de biblioth\u00e8ques de composition d&rsquo;images telles que <em>patchwork<\/em> ou la fonction matricielle native <code>layout()<\/code> de R.<\/p>\n<p>En observant la concordance entre ces multiples m\u00e9triques, le praticien consolide son jugement statistique. Une observation isol\u00e9e qui s&rsquo;av\u00e8re critique \u00e0 la fois sous l&rsquo;angle du DFFITS, de la distance de Cook et du levier de projection pr\u00e9sente un niveau de certitude diagnostique maximal justifiant l&rsquo;application d&rsquo;un protocole d&rsquo;inspection clinique et de sensibilit\u00e9 approfondi.<\/p>\n<h2>9. Analyse empirique et interpr\u00e9tation des observations influentes<\/h2>\n<h3>9.1 Inspection clinique des individus statistiques identifi\u00e9s<\/h3>\n<p>L&rsquo;application de nos scripts aux donn\u00e9es du jeu <code>mtcars<\/code> met en \u00e9vidence plusieurs mod\u00e8les automobiles franchissant le seuil critique dynamique <span class=\"arabpsy-math-inline\" data-latex=\"2\\sqrt{p\/n} \\approx 0.7071\">$2\\sqrt{p\/n} \\approx 0.7071$<\/span>. Parmi ces v\u00e9hicules figurent notamment la <em>Chrysler Imperial<\/em>, la <em>Cadillac Fleetwood<\/em> et la <em>Lincoln Continental<\/em>, aux c\u00f4t\u00e9s de mod\u00e8les sportifs de faible cylindr\u00e9e tels que la <em>Toyota Corolla<\/em> ou la <em>Porsche 914-2<\/em>.<\/p>\n<p>L&rsquo;analyste doit imp\u00e9rativement proc\u00e9der \u00e0 une inspection clinique d\u00e9taill\u00e9e de chaque cas signal\u00e9 en extrayant leur profil multivari\u00e9 complet :<\/p>\n<p># Extraction des profils complets des cas critiques<br \/>\nnoms_critiques &lt;- cas_influents$Vehicule<br \/>\nmtcars[noms_critiques, c(\u00ab\u00a0mpg\u00a0\u00bb, \u00ab\u00a0disp\u00a0\u00bb, \u00ab\u00a0hp\u00a0\u00bb, \u00ab\u00a0wt\u00a0\u00bb)]<\/p>\n<p>L&rsquo;examen des donn\u00e9es brutes de la <em>Chrysler Imperial<\/em> illustre parfaitement le m\u00e9canisme \u00e0 l&rsquo;\u0153uvre. Ce v\u00e9hicule affiche une consommation observ\u00e9e de 14.7 mpg, une cylindr\u00e9e imposante de 440 pouces cubes, une puissance de 230 chevaux et une masse colossale de 5345 livres. Bien que ces caract\u00e9ristiques soient extr\u00eames, elles demeurent parfaitement coh\u00e9rentes avec les standards industriels des berlines am\u00e9ricaines de luxe des ann\u00e9es 1970. Il ne s&rsquo;agit donc aucunement d&rsquo;une erreur mat\u00e9rielle de saisie ou de codage num\u00e9rique, mais d&rsquo;une entit\u00e9 l\u00e9gitime repr\u00e9sentant l&rsquo;extr\u00e9mit\u00e9 sup\u00e9rieure de l&rsquo;espace morphologique de l&rsquo;\u00e9chantillon.<\/p>\n<h3>9.2 Effet de levier versus r\u00e9sidu \u00e9lev\u00e9 : dissection des m\u00e9canismes<\/h3>\n<p>La puissance diagnostique du DFFITS r\u00e9side dans sa capacit\u00e9 \u00e0 d\u00e9composer la source pr\u00e9cise de l&rsquo;influence en croisant l&rsquo;effet de levier et l&rsquo;\u00e9cart r\u00e9siduel studentis\u00e9 :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"\\text{DFFITS}_i = \\underbrace{rstudent_i}_{\\text{Atypicit\u00e9 de la r\u00e9ponse } Y} \\times \\underbrace{\\sqrt{\\frac{h_{ii}}{1 - h_{ii}}}}_{\\text{Isolement dans l&#039;e\\space } X}\">$$\\text{DFFITS}_i = \\underbrace{rstudent_i}_{\\text{Atypicit\u00e9 de la r\u00e9ponse } Y} \\times \\underbrace{\\sqrt{\\frac{h_{ii}}{1 &#8211; h_{ii}}}}_{\\text{Isolement dans l&rsquo;e\\space } X}$$<\/span><\/p>\n<p>Nous pouvons diss\u00e9quer cette anatomie computationnelle pour les observations signal\u00e9es au sein de notre mod\u00e8le en extrayant conjointement ces deux composantes :<\/p>\n<p># Dissection des composantes de l&rsquo;influence<br \/>\ndissection_df &lt;- diagnostic_df %&gt;%<br \/>\n&nbsp;&nbsp;mutate(<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;RStudent = residus_jackknife,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;Levier = leviers_hii,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;Facteur_Levier = sqrt(Levier \/ (1 &#8211; Levier))<br \/>\n&nbsp;&nbsp;) %&gt;%<br \/>\n&nbsp;&nbsp;filter(Abs_DFFITS &gt; seuil_dynamique) %&gt;%<br \/>\n&nbsp;&nbsp;select(Vehicule, DFFITS, RStudent, Levier, Facteur_Levier) %&gt;%<br \/>\n&nbsp;&nbsp;arrange(desc(abs(DFFITS)))<\/p>\n<p>print(dissection_df)<\/p>\n<p>L&rsquo;analyse de ce tableau r\u00e9v\u00e8le deux typologies bien distinctes d&rsquo;influence empirique :<\/p>\n<ul>\n<li><strong>Les cas \u00e0 fort effet de levier :<\/strong> Des v\u00e9hicules tels que la <em>Maserati Bora<\/em> ou la <em>Cadillac Fleetwood<\/em> disposent d&rsquo;un facteur de levier tr\u00e8s prononc\u00e9 en raison d&rsquo;une puissance ou d&rsquo;une masse atypiques. M\u00eame lorsque leur r\u00e9sidu studentis\u00e9 demeure mod\u00e9r\u00e9, le multiplicateur g\u00e9om\u00e9trique propulse leur DFFITS au-del\u00e0 de la ligne de d\u00e9marcation critique.<\/li>\n<li><strong>Les cas \u00e0 fort r\u00e9sidu :<\/strong> \u00c0 l&rsquo;oppos\u00e9, certains mod\u00e8les affichent un levier modeste mais une discordance de consommation prononc\u00e9e par rapport aux pr\u00e9visions de la r\u00e9gression, ce qui suffit \u00e0 engendrer un DFFITS \u00e9lev\u00e9 par la seule force de leur divergence r\u00e9siduelle.<\/li>\n<\/ul>\n<h3>9.3 Impact direct sur les coefficients de r\u00e9gression<\/h3>\n<p>L&rsquo;existence de valeurs de DFFITS prononc\u00e9es implique directement qu&rsquo;une rotation sensible est impos\u00e9e au plan de r\u00e9gression par les points incrimin\u00e9s. Lorsqu&rsquo;une observation combine un r\u00e9sidu n\u00e9gatif et un levier fort \u00e0 l&rsquo;extr\u00e9mit\u00e9 sup\u00e9rieure d&rsquo;un r\u00e9gresseur, elle tire vers le bas l&rsquo;estimation de la pente associ\u00e9e \u00e0 cette variable.<\/p>\n<p>Cette distorsion a des cons\u00e9quences m\u00e9thodologiques directes sur la validit\u00e9 des conclusions substantives. Si une pente est artificiellement inclin\u00e9e par le poids d&rsquo;un ou deux individus isol\u00e9s, le risque d&rsquo;erreur de type I (conclure faussement \u00e0 l&rsquo;existence d&rsquo;une relation g\u00e9n\u00e9rale statistiquement significative dans la population) ou d&rsquo;erreur de type II (masquer une relation r\u00e9elle qui s&rsquo;appliquerait \u00e0 95 % des autres donn\u00e9es) devient majeur. De plus, l&rsquo;erreur quadratique moyenne de pr\u00e9diction globale (RMSE) se trouve perturb\u00e9e, d\u00e9gradant les capacit\u00e9s de g\u00e9n\u00e9ralisation du mod\u00e8le face \u00e0 de nouvelles donn\u00e9es ind\u00e9pendantes.<\/p>\n<h2>10. Comparaison approfondie : DFFITS, distance de Cook et DFBETAS<\/h2>\n<h3>10.1 DFFITS versus distance de Cook<\/h3>\n<p>Le dialogue diagnostique entre le DFFITS et la distance de Cook constitue l&rsquo;un des chapitres les plus \u00e9l\u00e9gants de la th\u00e9orie de la r\u00e9gression lin\u00e9aire. Si ces deux grandeurs mesurent l&rsquo;influence globale exerc\u00e9e sur les valeurs ajust\u00e9es, leurs comportements op\u00e9rationnels diff\u00e8rent sous plusieurs aspects cruciaux r\u00e9capitul\u00e9s ci-apr\u00e8s.<\/p>\n<p>La distance de Cook repose sur une formulation quadratique invariablement positive, born\u00e9e dans <span class=\"arabpsy-math-inline\" data-latex=\"[0, +\\infty[\">$[0, +\\infty[$<\/span>, ce qui la rend insensible \u00e0 la directionnalit\u00e9 de l&rsquo;\u00e9cart pr\u00e9dictif. \u00c0 l&rsquo;inverse, le DFFITS conserve le signe alg\u00e9brique de l&rsquo;\u00e9cart, conf\u00e9rant une vision vectorielle orient\u00e9e de la d\u00e9stabilisation induite sur la pr\u00e9diction locale de l&rsquo;individu.<\/p>\n<p>De plus, la sensibilit\u00e9 relative de ces m\u00e9triques varie en fonction de la structure des donn\u00e9es. Comme \u00e9tabli au point 2.3, l&rsquo;approximation <span class=\"arabpsy-math-inline\" data-latex=\"D_i \\approx \\text{DFFITS}_i^2 \/ p\">$D_i \\approx \\text{DFFITS}_i^2 \/ p$<\/span> montre que la distance de Cook comprime les \u00e9carts d&rsquo;influence par la mise au carr\u00e9 et la division par le nombre de r\u00e9gresseurs <span class=\"arabpsy-math-inline\" data-latex=\"p\">$p$<\/span>. Par cons\u00e9quent, dans des mod\u00e8les param\u00e9triques larges comportant un grand nombre de variables ind\u00e9pendantes, la distance de Cook aura tendance \u00e0 diluer visuellement l&rsquo;impact des cas atypiques, tandis que le DFFITS conservera une sensibilit\u00e9 accrue \u00e0 la variabilit\u00e9 de la pr\u00e9diction sp\u00e9cifique.<\/p>\n<h3>10.2 DFFITS versus DFBETAS<\/h3>\n<p>Alors que le DFFITS fournit une mesure synth\u00e9tique unidimensionnelle de l&rsquo;alt\u00e9ration globale de la pr\u00e9diction ponctuelle, l&rsquo;analyste a fr\u00e9quemment besoin de comprendre quel coefficient sp\u00e9cifique de r\u00e9gression subit la plus forte contrainte. C&rsquo;est pr\u00e9cis\u00e9ment l&rsquo;objet des statistiques DFBETAS (<em>Difference in Betas<\/em>).<\/p>\n<p>Pour chaque observation <em>i<\/em> et chaque variable ind\u00e9pendante index\u00e9e par <em>j<\/em> (<span class=\"arabpsy-math-inline\" data-latex=\"j = 0, dots, p-1\">$j = 0, dots, p-1$<\/span>), le DFBETAS quantifie la variation standardis\u00e9e du coefficient <span class=\"arabpsy-math-inline\" data-latex=\"\\beta_j\">$\\beta_j$<\/span> r\u00e9sultant du retrait de la <span class=\"arabpsy-math-inline\" data-latex=\"i\">$i$<\/span>-\u00e8me observation :<\/p>\n<p><span class=\"arabpsy-math-display\" data-latex=\"\\text{DFBETAS}_{ij} = \\frac{\\hat{\\beta}_j - \\hat{\\beta}_{j(i)}}{\\text{SE}(\\hat{\\beta}_{j(i)})}\">$$\\text{DFBETAS}_{ij} = \\frac{\\hat{\\beta}_j &#8211; \\hat{\\beta}_{j(i)}}{\\text{SE}(\\hat{\\beta}_{j(i)})}$$<\/span><\/p>\n<p>Dans R, cette m\u00e9trique matricielle bidimensionnelle s&rsquo;obtient via la fonction <code>dfbetas()<\/code> :<\/p>\n<p># Extraction des DFBETAS associes au modele<br \/>\nmatrice_dfbetas &lt;- dfbetas(modele_cars)<br \/>\nhead(matrice_dfbetas, 5)<\/p>\n<p>La compl\u00e9mentarit\u00e9 entre DFFITS et DFBETAS est \u00e9vidente : le DFFITS sert d&rsquo;alarme de premier niveau signalant qu&rsquo;une observation perturbe la structure globale des ajustements, tandis que l&rsquo;inspection subs\u00e9quente des DFBETAS permet d&rsquo;identifier avec pr\u00e9cision le coefficient de r\u00e9gression sp\u00e9cifique qui se trouve d\u00e9stabilis\u00e9 par cette m\u00eame observation.<\/p>\n<h3>10.3 Tableau comparatif des outils de diagnostic d&rsquo;influence dans R<\/h3>\n<p>L&rsquo;environnement R standardise l&rsquo;acc\u00e8s \u00e0 ces diff\u00e9rents indicateurs diagnostiques par le biais d&rsquo;un ensemble de fonctions vectoris\u00e9es d&rsquo;une grande coh\u00e9rence syntaxique. De plus, la fonction int\u00e9gr\u00e9e <code>influence.measures()<\/code> agr\u00e8ge l&rsquo;ensemble de ces mesures au sein d&rsquo;une structure unique assortie de drapeaux bool\u00e9ens d&rsquo;alerte :<\/p>\n<p># Synthese globale des diagnostics d&rsquo;influence dans R<br \/>\nsynthese_influence &lt;- influence.measures(modele_cars)<br \/>\nsummary(synthese_influence)<\/p>\n<p>Le tableau comparatif suivant synth\u00e9tise les propri\u00e9t\u00e9s math\u00e9matiques, les fonctions R d\u00e9di\u00e9es et les seuils d&rsquo;alerte associ\u00e9s \u00e0 chaque famille de diagnostic :<\/p>\n<ul>\n<li><strong>DFFITS :<\/strong> Fonction R <code>dffits()<\/code>. Mesure la diff\u00e9rence standardis\u00e9e sur la pr\u00e9diction de l&rsquo;observation omise. Borne <span class=\"arabpsy-math-inline\" data-latex=\"[-\\infty, +\\infty]\">$[-\\infty, +\\infty]$<\/span>. Seuil critique classique : <span class=\"arabpsy-math-inline\" data-latex=\"|\\text{DFFITS}| &gt; 1\">$|\\text{DFFITS}| &gt; 1$<\/span> (\u00e9chantillons r\u00e9duits) ou <span class=\"arabpsy-math-inline\" data-latex=\"|\\text{DFFITS}| &gt; 2\\sqrt{p\/n}\">$|\\text{DFFITS}| &gt; 2\\sqrt{p\/n}$<\/span> (\u00e9chantillons mod\u00e9r\u00e9s \u00e0 larges).<\/li>\n<li><strong>Distance de Cook :<\/strong> Fonction R <code>cooks.distance()<\/code>. Mesure le d\u00e9placement quadratique moyen de l&rsquo;ensemble des pr\u00e9dictions vectorielles. Borne <span class=\"arabpsy-math-inline\" data-latex=\"[0, +\\infty[\">$[0, +\\infty[$<\/span>. Seuil critique classique : <span class=\"arabpsy-math-inline\" data-latex=\"D &gt; 4\/n\">$D &gt; 4\/n$<\/span> ou comparaison avec le quantile <span class=\"arabpsy-math-inline\" data-latex=\"F(p, n-p)\">$F(p, n-p)$<\/span> \u00e0 50 %.<\/li>\n<li><strong>DFBETAS :<\/strong> Fonction R <code>dfbetas()<\/code>. Mesure la variation standardis\u00e9e de chaque coefficient individuel de r\u00e9gression. Borne <span class=\"arabpsy-math-inline\" data-latex=\"[-\\infty, +\\infty]\">$[-\\infty, +\\infty]$<\/span>. Seuil critique classique : <span class=\"arabpsy-math-inline\" data-latex=\"|\\text{DFBETAS}| &gt; 2\/\\sqrt{n}\">$|\\text{DFBETAS}| &gt; 2\/\\sqrt{n}$<\/span>.<\/li>\n<li><strong>Valeurs de levier (<span class=\"arabpsy-math-inline\" data-latex=\"h_{ii}\">$h_{ii}$<\/span>) :<\/strong> Fonction R <code>hatvalues()<\/code>. Mesure l&rsquo;\u00e9loignement structurel dans l&rsquo;espace des covariables. Borne <span class=\"arabpsy-math-inline\" data-latex=\"[1\/n, 1]\">$[1\/n, 1]$<\/span>. Seuil critique classique : <span class=\"arabpsy-math-inline\" data-latex=\"h_{ii} &gt; 2p\/n\">$h_{ii} &gt; 2p\/n$<\/span> ou <span class=\"arabpsy-math-inline\" data-latex=\"h_{ii} &gt; 3p\/n\">$h_{ii} &gt; 3p\/n$<\/span>.<\/li>\n<li><strong>Rapport de covariance (CovRatio) :<\/strong> Fonction R <code>covratio()<\/code>. Mesure l&rsquo;impact de l&rsquo;observation sur la pr\u00e9cision conjointe des estimations param\u00e9triques. Borne <span class=\"arabpsy-math-inline\" data-latex=\"[0, +\\infty[\">$[0, +\\infty[$<\/span>. Seuil critique classique : <span class=\"arabpsy-math-inline\" data-latex=\"|\\text{CovRatio} - 1| &gt; 3p\/n\">$|\\text{CovRatio} &#8211; 1| &gt; 3p\/n$<\/span>.<\/li>\n<\/ul>\n<h2>11. Strat\u00e9gies m\u00e9thodologiques face aux observations influentes<\/h2>\n<h3>11.1 La politique de r\u00e9tention ou de suppression des donn\u00e9es<\/h3>\n<p>La d\u00e9tection d&rsquo;un DFFITS exc\u00e9dant les seuils critiques ne doit sous aucun pr\u00e9texte d\u00e9clencher l&rsquo;\u00e9limination automatique de l&rsquo;observation concern\u00e9e. L&rsquo;\u00e9lagage m\u00e9canique des points influents sans justification th\u00e9orique constitue une entorse grave \u00e0 la d\u00e9ontologie scientifique, s&rsquo;apparentant \u00e0 une forme insidieuse de falsification de donn\u00e9es connue sous le vocable de <em>cherry-picking<\/em>. Une telle pratique vicie les estimations d&rsquo;erreur r\u00e9siduelle, biaise artificiellement les distributions vers une normalit\u00e9 factice et conduit \u00e0 une sous-estimation syst\u00e9matique de l&rsquo;incertitude r\u00e9elle r\u00e9gissant le ph\u00e9nom\u00e8ne \u00e9tudi\u00e9.<\/p>\n<p>La suppression d\u00e9finitive d&rsquo;une entit\u00e9 statistique ne peut \u00eatre m\u00e9thodologiquement l\u00e9gitim\u00e9e que dans deux configurations circonscrites :<\/p>\n<ul>\n<li>Une contamination technique document\u00e9e et irr\u00e9futable, r\u00e9sultant d&rsquo;une d\u00e9faillance instrumentale av\u00e9r\u00e9e, d&rsquo;une erreur de frappe non corrigible ou d&rsquo;un non-respect flagrant des crit\u00e8res d&rsquo;inclusion du protocole exp\u00e9rimental.<\/li>\n<li>Une observation d\u00e9montrant que l&rsquo;individu statistique n&rsquo;appartient manifestement pas \u00e0 la population cible couverte par la port\u00e9e d&rsquo;inf\u00e9rence du mod\u00e8le (par exemple, un prototype de course engag\u00e9 dans une enqu\u00eate ciblant la consommation de berlines familiales de s\u00e9rie).<\/li>\n<\/ul>\n<p>En l&rsquo;absence d&rsquo;une telle preuve mat\u00e9rielle de non-validit\u00e9, la singularit\u00e9 d&rsquo;une observation refl\u00e8te simplement la complexit\u00e9 intrins\u00e8que et la variabilit\u00e9 naturelle du monde empirique. L&rsquo;analyste a alors l&rsquo;obligation scientifique de conserver la donn\u00e9e tout en adaptant son appareil m\u00e9thodologique pour traiter son impact sur les estimations.<\/p>\n<h3>11.2 Mise en \u0153uvre d&rsquo;analyses de sensibilit\u00e9 syst\u00e9matiques<\/h3>\n<p>Face \u00e0 des points influents l\u00e9gitimes et valides, la meilleure pratique recommand\u00e9e par les normes de publication m\u00e9thodologiques (telles que les standards APA) consiste \u00e0 conduire une analyse de sensibilit\u00e9 syst\u00e9matique. Cette d\u00e9marche implique l&rsquo;estimation et la pr\u00e9sentation en vis-\u00e0-vis de deux sp\u00e9cifications parall\u00e8les du mod\u00e8le : l&rsquo;une calcul\u00e9e sur l&rsquo;\u00e9chantillon complet, l&rsquo;autre calibr\u00e9e apr\u00e8s exclusion temporaire des observations \u00e0 fort DFFITS.<\/p>\n<p>Le script R ci-apr\u00e8s documente la mise en \u0153uvre de cette proc\u00e9dure comparative :<\/p>\n<p># Extraction des indices a conserver sans les cas influents<br \/>\nindices_a_garder &lt;- which(abs(valeurs_dffits) &lt;= seuil_dynamique)<\/p>\n<p># Ajustement du modele sans les cas influents<br \/>\nmodele_sensibilite &lt;- lm(mpg ~ disp + hp + wt, data = mtcars, subset = indices_a_garder)<\/p>\n<p># Confrontation des estimations de coefficients<br \/>\ncomparaison_coefs &lt;- cbind(<br \/>\n&nbsp;&nbsp;Complet = coef(modele_cars),<br \/>\n&nbsp;&nbsp;Purge = coef(modele_sensibilite),<br \/>\n&nbsp;&nbsp;Variation_Pct = round(((coef(modele_sensibilite) &#8211; coef(modele_cars)) \/ coef(modele_cars)) * 100, 2)<br \/>\n)<br \/>\nprint(comparaison_coefs)<\/p>\n<p>Si la comparaison atteste que les grandeurs estim\u00e9es, leurs signes et leurs seuils de significativit\u00e9 statistique demeurent inchang\u00e9s, l&rsquo;analyste peut alors affirmer avec une grande robustesse que ses conclusions scientifiques ne sont pas tributaires d&rsquo;un art\u00e9fact induit par une poign\u00e9e d&rsquo;individus atypiques. Si, \u00e0 l&rsquo;inverse, l&rsquo;omission des points influents inverse le signe d&rsquo;un coefficient cl\u00e9 ou d\u00e9truit sa significativit\u00e9, cette fragilit\u00e9 structurelle doit \u00eatre rapport\u00e9e en toute transparence dans le manuscrit final.<\/p>\n<h3>11.3 Alternatives d&rsquo;estimation robuste dans R<\/h3>\n<p>Lorsque la pr\u00e9sence d&rsquo;observations \u00e0 fort DFFITS d\u00e9stabilise excessivement l&rsquo;estimation ordinaire sans que leur suppression ne soit admissible, l&rsquo;analyste doit abandonner les moindres carr\u00e9s ordinaires au profit de m\u00e9thodes d&rsquo;estimation robuste. Ces approches ont pour objet d&rsquo;attribuer un poids d\u00e9croissant aux observations au fur et \u00e0 mesure que leur atypicit\u00e9 r\u00e9siduelle ou g\u00e9om\u00e9trique s&rsquo;accro\u00eet.<\/p>\n<p>Une premi\u00e8re solution consiste \u00e0 mobiliser les estimateurs M ou MM de la r\u00e9gression robuste impl\u00e9ment\u00e9s dans la fonction <code>rlm()<\/code> du package <em>MASS<\/em> :<\/p>\n<p># Estimation par regression robuste (estimateurs MM de Huber \/ Tukey bisquare)<br \/>\nlibrary(MASS)<br \/>\nmodele_robuste &lt;- rlm(mpg ~ disp + hp + wt, data = mtcars, method = \u00ab\u00a0MM\u00a0\u00bb)<br \/>\nsummary(modele_robuste)<\/p>\n<p>Une alternative non param\u00e9trique consiste \u00e0 recourir \u00e0 la r\u00e9gression quantile (en particulier la r\u00e9gression m\u00e9diane) via le package <a rel=\"noopener noreferrer\" href=\"https:\/\/cran.r-project.org\/package=quantreg\">quantreg<\/a>, qui minimise la somme des valeurs absolues des \u00e9carts plut\u00f4t que leur somme quadratique, offrant une immunit\u00e9 structurelle remarquable contre les valeurs aberrantes en <span class=\"arabpsy-math-inline\" data-latex=\"Y\">$Y$<\/span>.<\/p>\n<p>Enfin, pour pr\u00e9server la structure des estimateurs tout en corrigeant les inf\u00e9rences statistiques contre les distorsions d&rsquo;\u00e9chantillonnage, la m\u00e9thode du r\u00e9\u00e9chantillonnage par bootstrap permet de construire des intervalles de confiance robustes pour les param\u00e8tres sans requ\u00e9rir l&rsquo;hypoth\u00e8se de normalit\u00e9 gaussienne des erreurs.<\/p>\n<h2>12. Protocole complet, reproductibilit\u00e9 et bonnes pratiques dans R<\/h2>\n<h3>12.1 Construction d&rsquo;un pipeline de diagnostic enti\u00e8rement automatis\u00e9<\/h3>\n<p>Afin d&rsquo;int\u00e9grer de mani\u00e8re fluide le calcul du DFFITS dans des flux de traitement de donn\u00e9es r\u00e9currents ou des architectures d&rsquo;analyse industrielle, il est pertinent d&rsquo;encapsuler l&rsquo;ensemble de la d\u00e9marche au sein d&rsquo;une fonction R personnalis\u00e9e, modulaire et document\u00e9e.<\/p>\n<p>La fonction suivante accepte en entr\u00e9e n&rsquo;importe quel objet de classe <code>\"lm\"<\/code>, applique les seuils th\u00e9oriques adapt\u00e9s, isole les observations singuli\u00e8res et retourne un compte rendu structur\u00e9 sous la forme d&rsquo;une liste exploitable :<\/p>\n<p># Fonction modulaire d&rsquo;audit DFFITS automatise<br \/>\nauditer_dffits &lt;- function(modele, seuil = c(\u00ab\u00a0dynamique\u00a0\u00bb, \u00ab\u00a0absolu\u00a0\u00bb)) {<br \/>\n&nbsp;&nbsp;if (!inherits(modele, \u00ab\u00a0lm\u00a0\u00bb)) {<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;stop(\u00ab\u00a0L&rsquo;argument &lsquo;modele&rsquo; doit etre un objet de classe &lsquo;lm&rsquo;.\u00a0\u00bb)<br \/>\n&nbsp;&nbsp;}<br \/>\n&nbsp;&nbsp;seuil &lt;- match.arg(seuil)<br \/>\n&nbsp;&nbsp;<br \/>\n&nbsp;&nbsp;n &lt;- nrow(model.matrix(modele))<br \/>\n&nbsp;&nbsp;p &lt;- length(coef(modele))<br \/>\n&nbsp;&nbsp;val_dffits &lt;- dffits(modele)<br \/>\n&nbsp;&nbsp;<br \/>\n&nbsp;&nbsp;seuil_critique &lt;- if (seuil == \u00ab\u00a0dynamique\u00a0\u00bb) 2 * sqrt(p \/ n) else 1.0<br \/>\n&nbsp;&nbsp;<br \/>\n&nbsp;&nbsp;donnees_audit &lt;- data.frame(<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;Observation = names(val_dffits),<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;DFFITS = val_dffits,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;Abs_DFFITS = abs(val_dffits),<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;Depassement = abs(val_dffits) &gt; seuil_critique<br \/>\n&nbsp;&nbsp;)<br \/>\n&nbsp;&nbsp;<br \/>\n&nbsp;&nbsp;anomalies &lt;- donnees_audit[donnees_audit$Depassement, ]<br \/>\n&nbsp;&nbsp;anomalies &lt;- anomalies[order(-anomalies$Abs_DFFITS), ]<br \/>\n&nbsp;&nbsp;<br \/>\n&nbsp;&nbsp;resultat &lt;- list(<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;nombre_observations = n,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;nombre_parametres = p,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;seuil_choisi = seuil,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;valeur_seuil = seuil_critique,<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;total_influents = nrow(anomalies),<br \/>\n&nbsp;&nbsp;&nbsp;&nbsp;cas_critiques = anomalies<br \/>\n&nbsp;&nbsp;)<br \/>\n&nbsp;&nbsp;return(resultat)<br \/>\n}<\/p>\n<p># Execution de la fonction personnalisee<br \/>\naudit_test &lt;- auditer_dffits(modele_cars, seuil = \u00ab\u00a0dynamique\u00a0\u00bb)<br \/>\nprint(audit_test)<\/p>\n<p>Cette approche fonctionnelle s&rsquo;ins\u00e8re naturellement dans des cha\u00eenes d&rsquo;int\u00e9gration continue de mod\u00e9lisation statistique, garantissant qu&rsquo;aucune d\u00e9cision ne soit prise sur la base d&rsquo;un mod\u00e8le fragilis\u00e9 par des donn\u00e9es influentes non document\u00e9es.<\/p>\n<h3>12.2 Bonnes pratiques de publication et documentation scientifique<\/h3>\n<p>La publication de r\u00e9sultats issus de mod\u00e8les lin\u00e9aires multiples dans des p\u00e9riodiques scientifiques \u00e0 comit\u00e9 de lecture exige une transparence totale quant \u00e0 la gestion des observations influentes. Conform\u00e9ment aux directives du manuel de publication de l&rsquo;American Psychological Association (APA 7th edition) et des standards de reproductibilit\u00e9 computationnelle, le chercheur doit expliciter :<\/p>\n<ul>\n<li>Les m\u00e9triques diagnostiques utilis\u00e9es pour sonder l&rsquo;influence (mention expresse du DFFITS et de la distance de Cook).<\/li>\n<li>Le seuil de d\u00e9cision statistique formel retenu pour classifier les cas influents (en pr\u00e9cisant syst\u00e9matiquement la formule math\u00e9matique, telle que <span class=\"arabpsy-math-inline\" data-latex=\"2\\sqrt{p\/n}\">$2\\sqrt{p\/n}$<\/span>, et la valeur num\u00e9rique exacte correspondante).<\/li>\n<li>Le nombre total d&rsquo;observations identifi\u00e9es et leur impact sur les param\u00e8tres du mod\u00e8le, document\u00e9 via un tableau de sensibilit\u00e9 comparative.<\/li>\n<li>La justification th\u00e9orique appuyant tout choix \u00e9ventuel d&rsquo;exclusion, de pond\u00e9ration ou de recours \u00e0 des estimateurs alternatifs de type r\u00e9gression robuste.<\/li>\n<\/ul>\n<p>De surcro\u00eet, la mise \u00e0 disposition publique du code R sous licence ouverte sur des plateformes de partage acad\u00e9mique (telles que Zenodo, OSF ou GitHub) constitue la cl\u00e9 de vo\u00fbte de la science ouverte, permettant aux pairs d&rsquo;auditer et de reproduire int\u00e9gralement la cha\u00eene de traitement diagnostique.<\/p>\n<h3>12.3 Synth\u00e8se et arbre de d\u00e9cision pour le praticien<\/h3>\n<p>Pour guider le praticien et le chercheur \u00e0 travers les diff\u00e9rentes \u00e9tapes de l&rsquo;\u00e9valuation diagnostique du DFFITS, il est utile de structurer la d\u00e9marche sous la forme d&rsquo;une s\u00e9quence logique de d\u00e9cisions op\u00e9rationnelles :<\/p>\n<p><strong>\u00c9tape 1 : Estimation initiale et extraction<\/strong><br \/>\nAjuster le mod\u00e8le de r\u00e9gression lin\u00e9aire par les moindres carr\u00e9s ordinaires avec <code>lm()<\/code>, v\u00e9rifier les conditions de lin\u00e9arit\u00e9 et de non-multicolin\u00e9arit\u00e9, puis extraire le vecteur des valeurs de DFFITS via la fonction native <code>dffits()<\/code>.<\/p>\n<p><strong>\u00c9tape 2 : \u00c9tablissement du seuil critique<\/strong><br \/>\nCalculer le seuil dynamique th\u00e9orique <span class=\"arabpsy-math-inline\" data-latex=\"2\\sqrt{p\/n}\">$2\\sqrt{p\/n}$<\/span>. Si l&rsquo;\u00e9chantillon est restreint (<span class=\"arabpsy-math-inline\" data-latex=\"n &lt; 50\">$n &lt; 50$<\/span>), confronter ce seuil dynamique au seuil absolu unitaire de 1.0 afin de calibrer le niveau de vigilance appropri\u00e9.<\/p>\n<p><strong>\u00c9tape 3 : D\u00e9tection et dissection de l&rsquo;influence<\/strong><br \/>\nIsoler les observations dont la valeur absolue du DFFITS d\u00e9passe le seuil retenu. Extraire les r\u00e9sidus studentis\u00e9s externes avec <code>rstudent()<\/code> et les leviers diagonaux avec <code>hatvalues()<\/code> pour d\u00e9terminer si l&rsquo;influence provient d&rsquo;un r\u00e9sidu anormal sur la r\u00e9ponse ou d&rsquo;une position excentrique dans l&rsquo;espace des covariables explicatives.<\/p>\n<p><strong>\u00c9tape 4 : Audit clinique de validit\u00e9 substantielle<\/strong><br \/>\nInspecter individuellement les donn\u00e9es brutes des cas identifi\u00e9s \u00e0 la recherche d&rsquo;\u00e9ventuelles erreurs de saisie, de d\u00e9faillances de mesure ou d&rsquo;incompatibilit\u00e9s avec la population cible du mod\u00e8le.<\/p>\n<p><strong>\u00c9tape 5 : Choix de la strat\u00e9gie m\u00e9thodologique finale<\/strong><br \/>\nSi une erreur mat\u00e9rielle irr\u00e9futable est av\u00e9r\u00e9e, corriger ou exclure l&rsquo;observation avec justification documentaire dans le rapport d&rsquo;analyse. Si les donn\u00e9es sont r\u00e9elles et l\u00e9gitimes, conduire une analyse de sensibilit\u00e9 comparative et\/ou ajuster un mod\u00e8le de r\u00e9gression robuste via <code>rlm()<\/code> du package <em>MASS<\/em> afin de consolider la port\u00e9e des conclusions scientifiques.<\/p>\n<h2>R\u00e9f\u00e9rences<\/h2>\n<p>Belsley, D. A., Kuh, E., &amp; Welsch, R. E. (1980). <em>Regression diagnostics: Identifying influential data and sources of collinearity<\/em>. John Wiley &amp; Sons. <a rel=\"noopener noreferrer\" href=\"https:\/\/doi.org\/10.1002\/0471725153\">https:\/\/doi.org\/10.1002\/0471725153<\/a><\/p>\n<p>Cook, R. D. (1977). Detection of influential observation in linear regression. <em>Technometrics<\/em>, 19(1), 15\u201318. <a rel=\"noopener noreferrer\" href=\"https:\/\/doi.org\/10.1080\/00401706.1977.10489493\">https:\/\/doi.org\/10.1080\/00401706.1977.10489493<\/a><\/p>\n<p>Fox, J., &amp; Weisberg, S. (2019). <em>An R companion to applied regression<\/em> (3rd ed.). Sage Publications. <a rel=\"noopener noreferrer\" href=\"https:\/\/socialsciences.mcmaster.ca\/jfox\/Books\/Companion\/\">https:\/\/socialsciences.mcmaster.ca\/jfox\/Books\/Companion\/<\/a><\/p>\n<p>Maronna, R. A., Martin, R. D., Yohai, V. J., &amp; Salibi\u00e1n-Barrera, M. (2019). <em>Robust statistics: Theory and methods (with R)<\/em> (2nd ed.). John Wiley &amp; Sons. <a rel=\"noopener noreferrer\" href=\"https:\/\/doi.org\/10.1002\/9781119214656\">https:\/\/doi.org\/10.1002\/9781119214656<\/a><\/p>\n<p>R Core Team. (2023). <em>R: A language and environment for statistical computing<\/em>. R Foundation for Statistical Computing, Vienna, Austria. <a rel=\"noopener noreferrer\" href=\"https:\/\/www.R-project.org\/\">https:\/\/www.R-project.org\/<\/a><\/p>\n<p>Rousseeuw, P. J., &amp; Leroy, A. M. (1987). <em>Robust regression and outlier detection<\/em>. John Wiley &amp; Sons. <a rel=\"noopener noreferrer\" href=\"https:\/\/doi.org\/10.1002\/0471725382\">https:\/\/doi.org\/10.1002\/0471725382<\/a><\/p>\n<p>Weisberg, S. (2014). <em>Applied linear regression<\/em> (4th ed.). John Wiley &amp; Sons. <a rel=\"noopener noreferrer\" href=\"https:\/\/doi.org\/10.1002\/9781118594858\">https:\/\/doi.org\/10.1002\/9781118594858<\/a><\/p>\n<p>Wickham, H., Averick, M., Bryan, J., Chang, W., McGowan, L. D., Fran\u00e7ois, R., Grolemund, G., Hayes, A., Henry, L., Hester, J., Kuhn, M., Pedersen, T. L., Miller, E., Bache, S. M., M\u00fcller, K., Ooms, J., Robinson, D., Seidel, D. P., Spinu, V., \u2026 Yutani, H. (2019). Welcome to the Tidyverse. <em>Journal of Open Source Software<\/em>, 4(43), 1686. <a rel=\"noopener noreferrer\" href=\"https:\/\/doi.org\/10.21105\/joss.01686\">https:\/\/doi.org\/10.21105\/joss.01686<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"<p>Guide complet et acad\u00e9mique pour calculer, visualiser et interpr\u00e9ter la m\u00e9trique DFFITS dans R afin d&rsquo;identifier les observations influentes en r\u00e9gression.<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","template":"","categories":[1829,2193],"tags":[7551,7552,7553,1910,2882],"class_list":["post-5658","psych_stat","type-psych_stat","status-publish","hentry","category-methodologie-statistique","category-programmation-r","tag-dffits","tag-diagnostics-de-regression","tag-observations-influentes","tag-regression-lineaire","tag-statistiques-r"],"_links":{"self":[{"href":"https:\/\/french.arabpsychology.com\/index.php?rest_route=\/wp\/v2\/psych_stat\/5658","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/french.arabpsychology.com\/index.php?rest_route=\/wp\/v2\/psych_stat"}],"about":[{"href":"https:\/\/french.arabpsychology.com\/index.php?rest_route=\/wp\/v2\/types\/psych_stat"}],"author":[{"embeddable":true,"href":"https:\/\/french.arabpsychology.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/french.arabpsychology.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=5658"}],"version-history":[{"count":0,"href":"https:\/\/french.arabpsychology.com\/index.php?rest_route=\/wp\/v2\/psych_stat\/5658\/revisions"}],"wp:attachment":[{"href":"https:\/\/french.arabpsychology.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=5658"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/french.arabpsychology.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=5658"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/french.arabpsychology.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=5658"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}