ifelse文 - 条件に基づいて変数を追加します

Question

国のリストを持つデータセットに、「開発済み」と「開発中」の要素変数「経済」を追加しようとしています。

私は間違っていますか？

Developed <- data.frame(c("Andorra", "Faroe Islands", "Ireland", "Monaco", "Spain", "Australia", "Finland", 
      "Israel", "Netherlands", "Sweden", "Austria", "France", "Italy", "New Zealand", "Switzerland", 
      "Belgium", "Germany", "Japan", "Norway", "Turkey", "Bermuda", "Greece", "Liechtenstein", 
      "Portugal", "United Kingdom", "Canada", "Holy See", "Luxembourg", "San Marino", "United States", 
      "Denmark", "Iceland", "Malta", "South Africa", "Hong Kong", "South Korea", "Singapore", "Taiwan")) 
names(Developed) <- "Country" 

total$Economy <- ifelse(d$Country==Developed$Country, "Developed", "Developing") 

それは次のエラー生成：

Warning messages: 
1: In is.na(e1) | is.na(e2) : 
longer object length is not a multiple of shorter object length 
2: In `==.default`(data$Country, Developed$Country) : 
longer object length is not a multiple of shorter object length 

Answer 1

@DJJを、

ifelse(d$Country%in%Developed$Country, "Developed", "Developing") 

は完全に働きました！問題が解決しました。