我必须创建一个名为 是.同花顺当且仅当手牌是同花顺时才是对的-同花顺是一种包含五张相同花色的牌的手.这是我的数据集
deck <- data.frame(suit = rep(c("D","C","H","S"), 13),rank = rep(2:14, 4))
参考=#D=♦钻石，C=♣俱乐部，H=♥心，S=♠黑桃
11=杰克，12=皇后，13=国王，14=ACE
这就是我到目前为止所try 的:我只是手动挑选了5个相同西装的值，并使用唯一的函数来证明我已经知道的东西，然而，这显然不是一个好方法，我也没有创造任何逻辑价值.
hand <- deck[c(43,15,35,7,27),]
unique(hand)
如有任何帮助，我们不胜感激！干杯