R Apply mutate() Function with Conditional Values – dplyr Package (Example Code)
This article illustrates how to apply the mutate function with an ifelse condition in the R programming language.
Preparing the Example
data(iris) # Load iris data head(iris) # Sepal.Length Sepal.Width Petal.Length Petal.Width Species # 1 5.1 3.5 1.4 0.2 setosa # 2 4.9 3.0 1.4 0.2 setosa # 3 4.7 3.2 1.3 0.2 setosa # 4 4.6 3.1 1.5 0.2 setosa # 5 5.0 3.6 1.4 0.2 setosa # 6 5.4 3.9 1.7 0.4 setosa |
data(iris) # Load iris data head(iris) # Sepal.Length Sepal.Width Petal.Length Petal.Width Species # 1 5.1 3.5 1.4 0.2 setosa # 2 4.9 3.0 1.4 0.2 setosa # 3 4.7 3.2 1.3 0.2 setosa # 4 4.6 3.1 1.5 0.2 setosa # 5 5.0 3.6 1.4 0.2 setosa # 6 5.4 3.9 1.7 0.4 setosa
install.packages("dplyr") # Install dplyr package library("dplyr") # Load dplyr package |
install.packages("dplyr") # Install dplyr package library("dplyr") # Load dplyr package
Example: Apply mutate Function Based On Logical Condition
iris_new <- iris %>% # Applying mutate mutate(new = (Sepal.Length > 5 & Petal.Width < 0.3) * 1) head(iris_new) # Sepal.Length Sepal.Width Petal.Length Petal.Width Species new # 1 5.1 3.5 1.4 0.2 setosa 1 # 2 4.9 3.0 1.4 0.2 setosa 0 # 3 4.7 3.2 1.3 0.2 setosa 0 # 4 4.6 3.1 1.5 0.2 setosa 0 # 5 5.0 3.6 1.4 0.2 setosa 0 # 6 5.4 3.9 1.7 0.4 setosa 0 |
iris_new <- iris %>% # Applying mutate mutate(new = (Sepal.Length > 5 & Petal.Width < 0.3) * 1) head(iris_new) # Sepal.Length Sepal.Width Petal.Length Petal.Width Species new # 1 5.1 3.5 1.4 0.2 setosa 1 # 2 4.9 3.0 1.4 0.2 setosa 0 # 3 4.7 3.2 1.3 0.2 setosa 0 # 4 4.6 3.1 1.5 0.2 setosa 0 # 5 5.0 3.6 1.4 0.2 setosa 0 # 6 5.4 3.9 1.7 0.4 setosa 0