在R中使用switch語句

Question

我知道R中的switch語句並非旨在像在C ++中那樣工作，但是我已經閱讀了文檔並且似乎無法弄清楚為什么以下內容不起作用

file.types <- c('bmp', 'jpeg', 'png', 'tiff', 'eps', 'pdf', 'ps')
  if(tolower(file.type) %in% file.types) {
    switch(file.type,
           bmp = bmp(filename=paste(file.location, file.name, '.',
                                    file.type, sep=''), 
                     width=res[2], height=res[1])
           jpeg = jpeg(filename=paste(file.location, file.name, '.',
                                      file.type, sep=''),
                     width=res[2], height=res[1])
           png = png(filename=paste(file.location, file.name, '.',
                                    file.type, sep=''),
                     width=res[2], height=res[1])
           tiff = tiff(filename=paste(file.location, file.name, '.',
                                      file.type, sep=''),
                       width=res[2], height=res[1])
           eps = postscript(filename=paste(file.location, file.name, '.',
                                           file.type, sep=''),
                            width=res[2], height=res[1])
           pdf = postscript(filename=paste(file.location, file.name, '.',
                                           file.type, sep=''),
                            width=res[2], height=res[1])
           ps = postscript(filename=paste(file.location, file.name, '.',
                                          file.type, sep=''),
                           width=res[2], height=res[1]))  
  } else {
      stop(paste(file.type,' is not supported', sep=''))
  }

當file.type為'jpeg'時出現以下錯誤

Error: unexpected symbol in:
"           bmp = {bmp(filename=paste(file.location, file.name, '.', file.type, sep=''), width=res[2], height=res[1])}
       jpeg"

感謝任何見識！

Answer 1

這是語法錯誤。 你是缺少一個,在每個選項在結束（逗號） switch ，如

switch(file.type,
       bmp = bmp(filename=paste(file.location, file.name, '.', 
                                file.type, sep=''), 
                 width=res[2], height=res[1]),
                                             ^ here

一般形式是

switch(foo,
       opt1 = statement1,
       opt2 = statement2,
       opt3 = ,
       opt4 = statement3)

opt3和opt4返回statement3的值。