Prop_test error message

I am trying to conduct a prop test.
This is my code :
X1 <- c(rep("appartient",6),rep("n'appartient pas",167))
X2 <- c(rep("appartient",3),rep("n'appartient pas",190))
X3 <- c(rep("appartient",27),rep("n'appartient pas",431))
X4 <- c(rep("appartient",23),rep("n'appartient pas",253))
X5 <- c(rep("appartient",58),rep("n'appartient pas",278))
Y <- c(X1,X2,X3,X4,X5)
Z <- c(rep("A",173),rep("B",193),rep("C",458),rep("D",276),rep("E",336))
Prop_test(variable = Y, success = "appartient", by = Z)
For some reason I am getting this error message :
Error in [.data.frame(data, , ind.var) :
colonnes non définies sélectionnées

Have anyone had this issue before ?
Thanks

La variable Z doit être une trame de données, pas un vecteur, comme indiqué dans l'exemple de help (Prop_test) (Traduction par app)

library(lessR)
#> 
#> lessR 4.2.8                         feedback: gerbing@pdx.edu 
#> --------------------------------------------------------------
#> > d <- Read("")   Read text, Excel, SPSS, SAS, or R data file
#>   d is default data frame, data= in analysis routines optional
#> 
#> Learn about reading, writing, and manipulating data, graphics,
#> testing means and proportions, regression, factor analysis,
#> customization, and descriptive statistics from pivot tables.
#>   Enter:  browseVignettes("lessR")
#> 
#> View changes in this and recent versions of lessR.
#>   Enter: news(package="lessR")
#> 
#> Interactive data analysis.
#>   Enter: interact()
# generate data
Classvalues <- c("Freshman", "Sophomore", "Junior", "Senior")
Goodvalues <- c("Nice", "OK", "Mean")
Class <- sample(Classvalues, size=250, replace=TRUE)
Goodness <- sample(Goodvalues, size=250, replace=TRUE)
d <- data.frame(Class, Goodness)
# Test multiple proportions, one each for each level of Plan
Prop_test(Goodness, "Nice", by=Class)
#> 
#> <<< 4-sample test for equality of proportions without continuity correction 
#> 
#> variable: Goodness 
#> success: Nice 
#> by: Class 
#> 
#> --- Description
#> 
#>               Freshman   Junior   Senior   Sophomore
#> -----------  ---------  -------  -------  ----------
#> n_Nice              18       16       24          15
#> n_total             62       68       66          54
#> proportion       0.290    0.235    0.364       0.278
#> 
#> --- Inference
#> 
#> Chi-square statistic: 2.750 
#> Degrees of freedom: 3 
#> Hypothesis test of equal population proportions: p-value = 0.432

Created on 2023-05-10 with reprex v2.0.2

J'ai changé le type vers une trame de données.
Je reçois ce message :
Error in names(data)[ind.var] : invalid subscript type 'list'

Pourriez-vous s'il vous plaît prouver le résultat de l'application de la fonction str () au bloc de données que vous utilisiez? (Traduction par app.)

J'ai pas compris la question.
Pourriez-vous reformuler ?

Ma demande est didactique, car, contrairement à l'exemple que j'ai fourni précédemment, je pense que l'argument de Prop_test que vous utilisez n'est pas une trame de données mais un vecteur. (Traduction par app.)