ケース好きなときにR

Question

ifelse文を使って変数のrのcase文と似たようにしたいと思います。例えば、私は、次の列ベクトルを持って言うことができます「Letter_Test」は、データフレームに：

アルファ - テスト、ベータテスト、ゼタテスト、アルファ - 二、ベータ - 二

私は」基本的にデータがAlpha、次に 'Alpha'のようなものであれば、列結果を返します。

SQLでは（Letter_Test LIKE '％Alpha％' THEN Alpha else 'Letter-Test'が終了した場合）です。

Answer 1

実際にはわからないが、あなたが意味する場合は、「アルファ」列文字であるかどうかをテストしたいですテストはTRUEになり、FALSEになると、単語がfounであればTRUEを返します。 d。

それとも、データフレームに直接新しい列に結果を置くことができます。

> df$AplhaTest <- ifelse(test = grepl("Alpha", df$Letter.Test), yes = "Alpha", no = df$Letter.Test) 
> df 
    Letter.Test AplhaTest 
1 Alpha - Test  Alpha 
2 Beta- Test Beta- Test 
3 Zeta-Test Zeta-Test 
4 Alpha-Two  Alpha 
5  Beta-Two Beta-Two 

Answer 2

一つのオプション：

new_thing <- ifelse("Alpha" %in% df$Letter_Test, "Alpha", "Letter-Test") 

別のオプション：私は右の質問を得た場合

new_thing2 <- gsub(".*(Alpha).*", "\\1", df$Letter_Test) 

Answer 3

は）（％述語などの および％をcase_whenを使用してください。

case_when(
     species %like% "Alpha"  ~ "Alpha", 
     TRUE      ~ "Alpha" 
    )