Мне нужна помощь с моим кодом об ординальной логистической регрессии

Question

У меня есть следующие данные:

Quimioterapia.data
       Terapy      Gene  Response    Frecuency
1   Secuencial Masculino        EP         28
2   Secuencial  Femenino        EP          4
3  Alternativa Masculino        EP         41
4  Alternativa  Femenino        EP         12
5   Secuencial Masculino        NC         45
6   Secuencial  Femenino        NC         12
7  Alternativa Masculino        NC         44
8  Alternativa  Femenino        NC          7
9   Secuencial Masculino        RP         29
10  Secuencial  Femenino        RP          5
11 Alternativa Masculino        RP         20
12 Alternativa  Femenino        RP          3
13  Secuencial Masculino        RT         26
14  Secuencial  Femenino        RT          2
15 Alternativa Masculino        RT         20
16 Alternativa  Femenino        RT          1

И когда я пытаюсь запустить этот код для получения результата модели:

Quimioterapia.m1 <- vglm(Response ~ Gene + Terapy + Frecuency, family = cumulative)

Я понял:

Error in tapplymat1(cump, "diff") : 
  NA/NaN/Inf in foreign function call (arg 1)

как я могу решить эту проблему