I’m trying to calculate the levene tests with multiple interactions.

Herbivore   Treatment   Level   Evenness
N   C   C   0.796
S   U   L   0.780
G   U   L   0.833
C   U   L   0.757
S   U   H   0.819
G   U   H   0.820
C   U   H   0.882


install.packages("car") 
library(car)
levene_test <- leveneTest(Eveness ~ Herbivore * Treatment * Level, data = data)

But I got this as response:

Levene's Test for Homogeneity of Variance (center = median)
      Df F value Pr(>F)
group  6     NaN    NaN
       0   

I checked the data the Eveness is considered as numeric value. I Created a frame with the provided data but I got the same error.
I reached chatGPT but he is providing the same code.

Impossible to know where the problem is…