아래 첨자 할당에는 NAS를 사용할 수 없습니다.

Question

간단한 문제가 있지만이를 극복하기위한 논리를 파악할 수 없습니다.

나는 NAs가있는 숫자 벡터를 가지며 조건 종속 연산을 적용하려고합니다.

x <- c(1,3,5,7,NA,2,4,6) 
x[x>=5] <- c(1:8)[x>=5] 
x[x<5] <- (c(1:8)*10)[x<5] 

그것은 "의 NA가 첨자 지정에 사용할 수 없습니다"라는 오류를 반환, 그래서 나는 그것에 대해 합리적인 해결책이 될 것이 무엇인지 알고 싶습니다 :

내 문제와 유사한 간단한 예입니다 각 속성을 실행하면 예상대로 작동합니다.

나는의 예상 결과를 가지고 싶다 : 바람직

[1] 10 20 3 4 NA 60 70 8 

을이 작업은 나이를 취하고 반복이 많은 널 (null) 모델링 기능에 이미로, 루프를하지 않고도.

난 당신이 할당 및 첨자를 혼용 생각, 사전에 레오나르도

Answer 1

당신의 논리는 또한 하위 집합의 NA를 배제 할 필요가 있습니다. 다음 예제를 참조하십시오. x이 수정되기 전에 부분 집합 벡터가 저장된다는 점에 유의하십시오.

x <- c(1,3,5,7,NA,2,4,6) 
subset1 <- x>=5 & !is.na(x) 
subset2 <- x<5 & !is.na(x) 

x[subset1] <- which(subset1) 
x[subset2] <- 10*which(subset2) 

Answer 2

을 주셔서 감사합니다. 당신이 한 일이 이것에 더 가깝다고 생각합니다 :

x <- c(1,3,5,7,NA,2,4,6) 
x.greater <- c(1:8)[x>=5] 
x.less <- (c(1:8)*10)[x<5] 

x.greater 
# 3 4 NA 8 
x.less 
# 10 20 NA 60 70 

result <- c(x.greater, x.less) 
result 
# 3 4 NA 8 10 20 NA 60 70