Ошибка в Mutiple если заявления

Question

Я пишу следующий код в R, но он дает мне ошибку

S=function(x,a){ 
if(x<=a) {return (g)} 
    else 
     if (a < x <= b) {return(h)} 

> Error: unexpected '<=' in: 
> " 
> else if (a < x <=" 
>     else (return(i)) 
> } 

Как исправить это?

Answer 1

Итак, я переписал вашу функцию для компиляции и оценки, но я понятия не имею, что она делает для вашей проблемы.

S=function(x, a, b){ 

    if (x <= a){ 
     return(a) 
    } 
    else if ((a < x) && (x <= b)){ # break up the compound into two tests 
     return(a) 
    } 
    else{ 
     return(a) 
    } 

} 

Вам необходимо пройти b, и я не знаю, что h,g были, но они не были назначены в вашем объявлении функции.

> S(1,2,3) 
[1] 2