删除第一个和最后一个引用

Question

我有以下矢量值。

A<-c("‘7X6’", "‘UY8’", "‘JX0’", "‘8D8’", 
"‘RGNSW9’", "‘BH7P1’") 

使用代码

paste(A, collapse = ", ")

然后使用建议我粘贴到SQL查询的代码

EUR<-data.frame(sqlQuery(myConn, paste("SELECT TOP 10000 [AxiomaDate]
                                      ,[RiskModelID] ,[AxiomaID],[Factor1],[Factor2],[Factor3]
FROM [PortfolioAnalytics].[Data_Axioma].[SecurityExposures]
                                      Where AxiomaID IN ('", cat(A, "\n"))))

此输出只是粘贴值而不读取查询。我也意识到我需要'引用类型而不是'。无论如何我可以粘贴通过R校正的值 - 在这里遇到很多麻烦。