我必须创建一个名为 是。当且仅当这手牌是同花时,同花为真 - 同花是指包含五张花色相同的牌的手牌。这是我的数据集
deck <- data.frame(suit = rep(c("D","C","H","S"), 13),rank = rep(2:14, 4))
供引用= # D = ♦ 方 block ,C = ♣ 梅花,H = ♥ 红心,S = ♠ 黑桃
11 = Jack,12 = Queen,13 = King,14 = Ace
这是我目前尝试的方法:我只是手动选择了 5 个相同花色的值,并使用 unique 函数来证明我已经知道的东西,然而,这显然不是一个好方法,我也没有创建任何逻辑值。
hand <- deck[c(43,15,35,7,27),]
unique(hand)
感谢任何帮助!干杯
最佳答案
您可以检查 hand$suit
中的所有花色是否都等于该向量中的第一花色 (hand$suit[1]
)。
is.Flush <- all(hand$suit == hand$suit[1])
is.Flush
#> TRUE
关于r - 如果数字属于特定类别,我如何在 R 中创建一个逻辑值为 TRUE 的值?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/73925186/