刚开始入门R，符号老是不对，修改了还是不对，求点建议

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

用的是美式键盘，win10自带的，R-China，Rstudio，下面贴出源代码，用其他输入法试了还是不行，望各位前辈指点迷津，写代码的一些小技巧。还有其中的else有时报错有时不报错，毫无头绪。

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()
symbols
same <- symbols[1] == symbols[2] && symbols[2] == symbols[3]
same
bars <- symbols %in% c('BB', 'B', 'BBB')
bars
if (same) {
  payout <- c(
    'DD' = 100,
    '7' = 80,
    'BBB' = 40,
    'BB' = 25,
    'B' = 10,
    'C' = 10
    ,
    '0' = 0
  )
  prize <- unname(payout[symbols[1]])
} if else {
  (all(bars))
  prize <- 5
} else {sum<-(symbols=='c')
prize<-c(0,2,5)[cherries+1]}

模拟老虎机的代码。。。。
> 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()> symbols[1] "B" "0" "0"> same <- symbols[1] == symbols[2] && symbols[2] == symbols[3]> same[1] FALSE> bars <- symbols %in% c('BB', 'B', 'BBB')> bars[1]  TRUE FALSE FALSE> if (same) {+   payout <- c(+     'DD' = 100,+     '7' = 80,+     'BBB' = 40,+     'BB' = 25,+     'B' = 10,+     'C' = 10+     ,+     '0' = 0+   )+   prize <- unname(payout[symbols[1]])+ } else if {Error: unexpected '{' in:"  prize <- unname(payout[symbols[1]])} else if {">   (all(bars))[1] FALSE>   prize <- 5> } else {sum<-(symbols=='c')Error: unexpected '}' in "}"> prize<-c(0,2,5)[cherries+1]}Error: unexpected '}' in "prize<-c(0,2,5)[cherries+1]}"

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：SYMBOLS RStudio symbol Studio China 输入法 源代码 小技巧 键盘

代码问题：
if else的结构是像下面这样子的，你的反了。

1. if (condition)
   
2.     {###
   
3. } else if(condition){
   
4.    ####
   
5. } else {
   
6. ###
   
7. }

复制代码

代码技巧：
多写就好

jiangbeilu 发表于 2016-12-9 16:32
代码问题：
if else的结构是像下面这样子的，你的反了。

请问您有没有什么好方法能查出标点符号的错误，或者怎么避免标点符号的错误，同样的输入法有时候是对的，有时候又是错的，studio提示的错误我改了还是提示相同的错误

恋石兰兮 发表于 2016-12-9 17:04
请问您有没有什么好方法能查出标点符号的错误，或者怎么避免标点符号的错误，同样的输入法有时候是对的， ...

什么叫标点符号的错误，举个例子？

qoiqpwqr 发表于 2016-12-9 17:22
什么叫标点符号的错误，举个例子？

就像我上面有贴运行后的工作区，老是   }   报错，修改了还是报错，怎么都改不过来。之前有段时间   ，  号老是报错，每次报错改不过来，我都是重头打一遍。

qoiqpwqr 发表于 2016-12-9 17:22
什么叫标点符号的错误，举个例子？

就像我上面有贴运行后的工作区，老是   }   报错，修改了还是报错，怎么都改不过来。之前有段时间   ，  号老是报错，每次报错改不过来，我都是重头打一遍。

qoiqpwqr 发表于 2016-12-9 17:22
什么叫标点符号的错误，举个例子？

就像我上面有贴运行后的工作区，老是   }   报错，修改了还是报错，怎么都改不过来。之前有段时间   ，  号老是报错，每次报错改不过来，我都是重头打一遍。

把输入语言默认为英文的，就不会有错了。
一般rstudio会提示你，如果是中文标点的话，会在下面出现浪线的。

jiangbeilu 发表于 2016-12-10 09:45
把输入语言默认为英文的，就不会有错了。
一般rstudio会提示你，如果是中文标点的话，会在下面出现浪线的。 ...

请问您是用什么输入法输入的？还有我运行之前，没有提醒啊，Rstudio是需要设置才会提醒的吗？

恋石兰兮 发表于 2016-12-10 10:26
请问您是用什么输入法输入的？还有我运行之前，没有提醒啊，Rstudio是需要设置才会提醒的吗？

跟输入法无关，你输入中文的时候，就会有波浪线提醒了。