老虎机综合
老虎机综合
发布时间：2025-09-22 22:32:24
请在 下方输入 要搜索的题目：
推荐参考答案 (
由 题搜搜 官方老师解答 )
答案：
get_symbols<-function(){
wheel<-c("DD","7","BBB","BB","B","C","0")
sample(wheel,size=3,replace = TRUE,prob = c(0.03,0.03,0.06,0.1,0.25,0.01,0.52))
}
symbols<-get_symbols()
print(symbols)
if (all(symbols==symbols1])){
payouts("DD"=100,"7"=80,"BBB"=40,"BB"=25,"B"=10,"0"=0)
prize<-unname(payoutssymbols1]])
} else if(all(symbols %in% c("BB","B","BBB"))){
prize<-5
} else{
cherries<-sum(symbols=="C")
prize<-c(0,2,5)cherries+1]
}
prize
dimonds<-sum(symbols=="DD")
prize<-prize*2^diamonds
prize
