使用R包包含查询

我有一个SQL查询，我想随我构建的R包一起提供，但是当我试图将它包含在R包中的

inst

或

extdata

或

data

文件夹中时，我不知道如何让函数引用它。例如：查询文件是

myQuery.sql

runDbQuery = function(){
   queryfile = 'folder/myQuery.sql'
   query = readChar(queryfile, file.info(queryfile)$size)
   require(RODBC)
   channel <- odbcConnect("mydb", uid = "uid", 
    pwd = "pwd")
  dbResults = sqlQuery(channel = channel, query = query, as.is = T)
  close(channel)
  return(dbResults)
}

runDbQuery=function（）{
queryfile='folder/myQuery.sql'
query=readChar（queryfile，file.info（queryfile）$size）
要求（RODBC）
通道我将
.sql
文件放入
/inst/sql
中的包中，然后通过以下途径在函数中获取它们的路径：

system.file("sql/myquery.sql",package = "mypackage")