ok so with this:
files<-list.files(path = "~/Desktop/Zelos Enegy/Script project/Test_files2", pattern=".txt")
files
library(readr)
for(i in files){
A<-read_table(file.path('~/Desktop/Zelos Enegy/Script project/Test_files2/',i),
,col_names = FALSE, skip = 68)
B<-A[-c(1,2,13)]
C<-B[29,5]
D<-B[43,2]
E<-data.frame(A,B)
E
}
I am getting something. Not the result I want though.
I need the script to open each txt.file in the folder (skipping the first 68 lines for each file), delete those three columns, and go get the value for two specific cells. I would like it just to print me this two values for all the txt files in the folder. Do you think it's possible?