Я загрузил книгу в R и прочитал ее с помощью xlConnect, но мне было интересно, есть ли способ извлечь имена листов, возможно, в векторе?

Пока что мой код:

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

... и я хочу извлечь названия листов листов вlst.