Jak używać operatora %in% w r (z przykładami)

Operator %in% w R pozwala określić, czy element należy do wektora lub ramki danych.

W tym samouczku przedstawiono trzy przykłady użycia tej funkcji w różnych scenariuszach.

Przykład 1: Używanie %in% z wektorami

Możemy użyć operatora %in% , aby określić, ile elementów wektora należy do innego wektora:

 #define two vectors of data
data1 <- c(3, 5, 7, 7, 14, 19, 22, 25)

data2 <- c(1, 2, 3, 4, 5)

#produce new vector that contains elements of data1 that are in data2
data1[data1 %in% data2]

[1] 3 5

Widzimy, że wartości 3 i 5 to jedyne elementy wektora oznaczonego data2 , które znajdują się w wektorze oznaczonym data1 .

Przykład 2: Użyj %in% do filtrowania ramek danych

Możemy również użyć operatora %in% do filtrowania wierszy w ramce danych zawierających określone wartości:

 #define data frame
df <- data.frame(team=c('A', 'A', 'B', 'B', 'B', 'C'),
                 points=c(67, 72, 77, 89, 84, 97),
                 assists=c(14, 16, 12, 22, 25, 20))

#view data frame
df

  team points assists
1 A 67 14
2 A 72 16
3 B 77 12
4 B 89 22
5 B 84 25
6 C 97 20

#produce new data frame that only contains rows where team is 'B'
df_new <- df[df$team %in% c(' B '), ]
df_new

  team points assists
3 B 77 12
4 B 89 22
5 B 84 25

#produce new data frame that only contains rows where team is 'B' or 'C'
df_new2 <- df[df$team %in% c(' B ', ' C '), ]
df_new2

  team points assists
3 B 77 12
4 B 89 22
5 B 84 25
6 C 97 20

Przykład 3: Użyj %in%, aby utworzyć kolumny ramki danych

Możemy także użyć operatora %in% do utworzenia nowych kolumn ramki danych.

Na przykład poniższy kod pokazuje, jak utworzyć nową kolumnę o nazwie dywizja , w której zespoły „A” i „C” zostaną umieszczone jako „Wschód”, a zespoły „B” jako „Zachód”:

 library (dplyr)

#define data frame
df <- data.frame(team=c('A', 'A', 'B', 'B', 'B', 'C'),
                 points=c(67, 72, 77, 89, 84, 97),
                 assists=c(14, 16, 12, 22, 25, 20))

#view data frame
df

  team points assists
1 A 67 14
2 A 72 16
3 B 77 12
4 B 89 22
5 B 84 25
6 C 97 20

#create new column called division
df$division = if_else (df$team %in% c(' A ', ' C '), ' East ', ' West ')
df

  team points assists division
1 A 67 14 East
2 A 72 16 East
3 B 77 12 West
4 B 89 22 West
5 B 84 25 West
6 C 97 20 East

Dodatkowe zasoby

Jak połączyć dwie kolumny w jedną w R
Jak dodać wiersze do ramki danych w R
Jak porównać dwie kolumny w R