Personnaliser les préférences

Nous utilisons des cookies pour vous aider à naviguer efficacement et à exécuter certaines fonctions. Vous trouverez ci-dessous des informations détaillées sur tous les cookies sous chaque catégorie de consentement.

Les cookies classés comme « Nécessaires » sont stockés sur votre navigateur car ils sont essentiels pour activer les fonctionnalités de base du site.... 

Toujours actif

Necessary cookies are required to enable the basic features of this site, such as providing secure log-in or adjusting your consent preferences. These cookies do not store any personally identifiable data.

Aucun cookie à afficher.

Functional cookies help perform certain functionalities like sharing the content of the website on social media platforms, collecting feedback, and other third-party features.

Aucun cookie à afficher.

Analytical cookies are used to understand how visitors interact with the website. These cookies help provide information on metrics such as the number of visitors, bounce rate, traffic source, etc.

Aucun cookie à afficher.

Performance cookies are used to understand and analyze the key performance indexes of the website which helps in delivering a better user experience for the visitors.

Aucun cookie à afficher.

Advertisement cookies are used to provide visitors with customized advertisements based on the pages you visited previously and to analyze the effectiveness of the ad campaigns.

Aucun cookie à afficher.

Comment effectuer un test Chow dans R



Un test de Chow est utilisé pour tester si les coefficients de deux modèles de régression différents sur des ensembles de données différents sont égaux.

Ce test est généralement utilisé dans le domaine de l’économétrie avec des données de séries chronologiques pour déterminer s’il existe une rupture structurelle dans les données à un moment donné.

Ce didacticiel fournit un exemple étape par étape de la façon d’effectuer un test Chow dans R.

Étape 1 : Créer les données

Tout d’abord, nous allons créer de fausses données :

#create data
data <- data.frame(x = c(1, 1, 2, 3, 4, 4, 5, 5, 6, 7, 7, 8, 8, 9, 10, 10,
                         11, 12, 12, 13, 14, 15, 15, 16, 17, 18, 18, 19, 20, 20),
                   y = c(3, 5, 6, 10, 13, 15, 17, 14, 20, 23, 25, 27, 30, 30, 31,
                         33, 32, 32, 30, 32, 34, 34, 37, 35, 34, 36, 34, 37, 38, 36))

#view first six rows of data
head(data)

  x  y
1 1  3
2 1  5
3 2  6
4 3 10
5 4 13
6 4 15

Étape 2 : Visualisez les données

Ensuite, nous allons créer un nuage de points simple pour visualiser les données :

#load ggplot2 visualization package
library(ggplot2)

#create scatterplot
ggplot(data, aes(x = x, y = y)) +
    geom_point(col='steelblue', size=3)

Test de bouffe dans R

À partir du nuage de points, nous pouvons voir que le modèle dans les données semble changer à x = 10. Ainsi, nous pouvons effectuer le test de Chow pour déterminer s’il existe un point de rupture structurelle dans les données à x = 10.

Étape 3 : Effectuer le test Chow

Nous pouvons utiliser la fonction sctest du package strucchange pour effectuer un test Chow :

#load strucchange package
library(strucchange)

#perform Chow test
sctest(data$y ~ data$x, type = "Chow", point = 10)

	Chow test

data:  data$y ~ data$x
F = 110.14, p-value = 2.023e-13

À partir du résultat du test, nous pouvons voir :

  • Statistique du test F : 110,14
  • Valeur p : <.0000

Puisque la valeur p est inférieure à 0,05, nous pouvons rejeter l’hypothèse nulle du test. Cela signifie que nous disposons de suffisamment de preuves pour affirmer qu’un point de rupture structurelle est présent dans les données.

En d’autres termes, deux droites de régression peuvent adapter le modèle dans les données plus efficacement qu’une seule droite de régression.

Ajouter un commentaire

Votre adresse e-mail ne sera pas publiée. Les champs obligatoires sont indiqués avec *