在 R 中结合子集和唯一

Question

有没有办法将这 2 个不同的 R 语句结合起来，使其更简洁一些？

x6 <- subset(dBase, dBase$Operation_Name == "Wash")
x7 <- unique(x6$machine_number)

这行得通，但想知道是否有可能将其放在一行中。

目标是获得独一无二的 machine_number，其中 Operation_Name == "Wash"

谢谢！

Answer 1

unique(dBase[dbase$Operation_Name=="Wash",]$machine_number)

Answer 2

一个dplyr解决方案：

df <- data.frame(Operation_Name = c("Wash", "Fold", "Rince"),
                 machine_number = c(42, 43, 44))

library(dplyr)

df %>%
  filter(Operation_Name == "Wash") %>%
  pull(machine_number)
# [1] 42

在 R 中结合子集和唯一

Combine Subset & Unique in R

r

coding-efficiency