Tengo un vector de valores observados y también un vector de valores calculados con el modelo:

actual <- c(1411,439,214,100,62,38,29,64)
expected <- c(1425.3,399.5,201.6,116.9,72.2,46.3,30.4,64.8)

Ahora estoy usando la prueba de bondad de ajuste de Chi cuadrado para ver qué tan bien se desempeña mi modelo. Escribí lo siguiente:

chisq.test(expected,actual) 

pero no funciona ¿Me puede ayudar con esto?