2017-02-24 37 views

回答

5

如何

x <- c(2, 5) 
n <- 6 
replace(integer(n), x, 1L) 
# [1] 0 1 0 0 1 0 

而另一種選擇是

as.integer(1:n %in% x) 
# [1] 0 1 0 0 1 0 
+0

這正是我所看到的ing,謝謝! – TurtleFace

+0

我很驚訝我用'switch'和'ifelse'工作了這麼久,並沒有接觸到(或舒適)'replace'和'recode',直到進入我的R-learning。你知道「替換」與「ifelse」相對嗎? (我意識到它們不是完全可以互換的。) – r2evans

+0

@ r2evans - 我還沒有跑過。它是一個非常簡單的替換函數(請參閱源代碼),它甚至可以在列表上工作。 –