사용 if, ifelse및`if`

R.에서 if-statement를 수행하는 방법은 여러 가지가 있습니다. 골프 최적화 솔루션은 크게 다를 수 있습니다.

기본

1. if제어 흐름입니다. 벡터화되지 않습니다. 즉, 길이 1의 조건 만 평가할 수 있습니다. else선택적으로 else 값을 반환해야합니다.
2. ifelse함수입니다. 벡터화되어 임의 길이의 값을 반환 할 수 있습니다. 세 번째 주장 (다른 가치)은 의무적입니다. *
3. `if`와 구문이 동일한 함수 ifelse입니다. 벡터화되지 않았으며 반환 인수가 의무화되지 않았습니다.

* 기술적으로 의무적 인 것은 아닙니다. ifelse(TRUE,x)잘 작동하지만 세 번째 인수가 비어 있고 조건이로 평가되면 오류가 발생합니다 FALSE. 따라서 조건이 항상 확실하다고 확신하는 경우에만 사용하는 것이 안전하며 TRUE, 그러한 경우 if 문으로 귀찮게하는 이유는 무엇입니까?

예

이들은 모두 동등합니다 :

if(x)y else z # 13 bytes
ifelse(x,y,z) # 13 bytes
`if`(x,y,z)   # 11 bytes

else코드에서 직접 문자열을 사용하는 경우 공백 이 필요하지 않습니다.

if(x)"foo"else"bar"   # 19 bytes
ifelse(x,"foo","bar") # 21 bytes
`if`(x,"foo","bar")   # 19 bytes

지금까지 `if`입력을 벡터화하지 않은 한 승자가 될 것으로 보입니다. 그러나 else 조건에 관심이없는 경우는 어떻습니까? 조건이 인 경우 일부 코드 만 실행하려고한다고 가정 해보십시오 TRUE. 한 줄의 코드만으로도 if가장 좋습니다.

if(x)z=f(y)         # 11 bytes
ifelse(x,z<-f(y),0) # 19 bytes
`if`(x,z<-f(y))     # 15 bytes

여러 줄의 코드에서 if여전히 승자가됩니다.

if(x){z=f(y);a=g(y)}        # 20 bytes
ifelse(x,{z=f(y);a=g(y)},0) # 27 bytes
`if`(x,{z=f(y);a=g(y)})     # 23 bytes

이 우리가 가능성이기도 않는 다른 조건에 대한 관심은, 우리는 임의의 코드를 실행하는 대신 값을 반환 할 위치. 이러한 경우, if및 `if`바이트 수에 동일합니다.

if(x)a=b else z=b   # 17 bytes
ifelse(x,a<-b,z<-b) # 19 bytes
`if`(x,a<-b,z<-b)   # 17 bytes

if(x){z=y;a=b}else z=b   # 22 bytes
ifelse(x,{z=y;a=b},z<-b) # 24 bytes
`if`(x,{z=y;a=b},z<-b)   # 22 bytes

if(x)a=b else{z=b;a=y}   # 22 bytes
ifelse(x,a<-b,{z=b;a=y}) # 24 bytes
`if`(x,a<-b,{z=b;a=y})   # 22 bytes

if(x){z=y;a=b}else{z=b;a=y}   # 27 bytes
ifelse(x,{z=y;a=b},{z=b;a=y}) # 29 bytes
`if`(x,{z=y;a=b},{z=b;a=y})   # 27 bytes

요약

1. ifelse길이가 1보다 큰 입력을 사용하는 경우 사용하십시오 .

2. 많은 코드 줄을 실행하지 않고 간단한 값을 반환하는 경우 `if`함수를 사용하는 것이 full if… else문 보다 짧을 수 있습니다.

3. 언제 단일 값을 원하면을 TRUE사용하십시오 if.

4. 임의의 코드를 실행 `if`하고 if일반적 바이트 개수의 관점에서 동일하다; 나는 if주로 읽기 쉽기 때문에 추천 합니다.

답변

x=!x

x[0]=''

c(x,"")

x=+x