Итак, я попытался извлечь некоторые данные из нескольких документов .xls.Данные, которые я извлек, взяты из определенной ячейки в каждом документе .xls.Функция выдает ожидаемые значения плюс logi (0).
Данные извлекаются из аппарата ВЭЖХ, который выводит данные в формате .xls.Отсюда я пытаюсь извлечь конкретное значение из листа «Интеграция» и ячейки E30, как показано в коде.
library(readxl)
#gives a list over paths to the xls documents
files=list.files(path = "/media/david/USB THUMB/Summit_02/KLL/Kolesterol/KT4BF19/240419.SEQ/205nm", pattern = '*.XLS', full.names = T)
#Length of the path list
n=length(files)
#Data extraction function
f1=function(ind)
{
res=c()#Creating a vector
while(ind != n+1) #The while loop inserts a value from .xls in the vector res
{
a=read_xls(files[ind], range = "Integration!E30")
show(a)
ind=ind+1
res=c(res,a)
}
return(res)
}
res=f1(1)
res
Первый вывод из списка -
res$ 324.585
логический (0)
Когда ожидаемое значение должно быть только 324,585, что упрощает его преобразование в список или размещение в кадре данных.