Чи -квадрат критерия согласия в R

У меня есть вектор наблюдаемых значений, а также вектор значений, рассчитанных с помощью модели :

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)

. Теперь я использую критерий согласия Хи -в квадрате, чтобы увидеть, насколько хорошо работает моя модель. Я написал следующее:

chisq.test(expected,actual) 

но это не работает. Можете ли вы помочь мне с этим?