试图创建一个新的列，使观察结果响应2个单独列中的标准并确定输出

Question

我正在尝试使用if else函数创建一列。我有大量数据。我只需要其中一列来指定if else函数，但是我在该列中有多个观察点，这将是if else函数所基于的内容。我已经从本专栏中进行了必要的观察。原始列称为lg $ name。大概是这样设置的

names <- c("UK STERLING", "US DOLLARS" ,"STH AFRICAN RAND")
cash <- c("GBP", "USD", "ZDA")
id <- c(1 ,2 ,3)
df <- data.frame(names,cash,id)
#new column 
df$type <- ifelse("UK Sterling", "cur" "not cur")
df$type <- ifelse("US DOLLARS", "cur", not cur")
#so on and so forth...             

字符串包含原始数据集lg中的观察值，将需要使用这些观察值来确定新列中的输出。无需运行多个代码，这将在数据使用方面效率低下。我正在使用数据表包来做到这一点。

 string <- ("AUSTRALIAN DOLLAR","BRAZILIAN REAL","CANADIAN DOLLAR","CHINESE 
        YUAN","COLOMBIAN PESO","DANISH KRONER",
        "EURO, , HONG KONG DOLLAR", "HUNGARIAN FORINT", "INDIAN RUPEE", 
       "INDONESIAN RUPIAH",
        "JAPANESE YEN", "KOREA (SOUTH) WON", "MEXICAN PESO","MALAYSIAN 
          RINGGIT",  
        "NORWEIGIAN KRONER", "NEW ZEALAND DOLLAR",  "PERUVIAN SOL", 
        "POLISH ZLOTY", "Russian Rouble (new)",
        "SINGAPORE DOLLAR", "STH AFRICAN RAND", 
        "SWEIDSH KRONER", "SWISS FRANC", "TAIWANESE DOLAR",
        "THAILAND BAHTS", "TURKISH LIRA","UK STERLING", "US DOLLAR")

Answer 1

您可以使用%in%：