data_base<- c("www.url1.com","www.url2.com","www.url3.com")
data1<-c("www.url4.com","www.url5.com","www.url2.com")
lapply(data1,function(x){if(is.element(x, data_base)==F){
data_base<-c(data_base,x)}else{NULL}})
"data1"벡터의 각 요소를 테스트하고 "data_base"에 이미 존재하는 요소와 일치하지 않는 경우 "data_base"에 추가합니다. 조건이 true 인 경우에도 추가되지 않습니다.
이를 수행하는 가장 좋은 방법은 다음과 같습니다.
data_base <- union( data_base , data1 )
그래서
data_base<- c("www.url1.com","www.url2.com","www.url3.com")
data1<-c("www.url4.com","www.url5.com","www.url2.com")
data_base <- union(data_base, data1)
> data_base
[1] "www.url1.com" "www.url2.com" "www.url3.com" "www.url4.com" "www.url5.com"
그러나 귀하의 질문에 직접 대답 data_base
하려면의 함수로 생성 된 환경 내 에서만 업데이트 하고 있습니다 lapply
. <<-
예상 한 동작을 얻으려면 반환하거나 사용하여 할당해야합니다 (하지만 그렇게하지 마십시오).
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다