如何从R中的Excel文件中提取工作表名称

我已经将工作簿加载到R中，并使用xlConnect读取了工作表，但是我想知道是否有一种方法可以提取向量中工作表的名称？

到目前为止，我的代码是：

dataIn<-loadWorkbook(file.path(filenames[1],sep=""))
lst = readWorksheet(dataIn, sheet = getSheets(dataIn), startRow=1, startCol=1, header=TRUE)

...并且我想提取中的工作表的工作表名称lst。