Hi again all, 

@Rui, melt did the trick. Thanks!


I managed to make this thing work somehow. ABellow is the script for this :
                

                setwd("C:/Users/mpavlic/Desktop/HE Krsko/HEK/FOC/Data/Jun/DDF")
                library(reshape2)
                library(sqldf)
                #imena datotek
                txt_files = list.files(pattern = '*.ddf');
                flist<-txt_files
                flistNew <- sub("^channel 1 ([0-9 ]+).*", "\\1", flist)
                flistNew <-c("D",flistNew)
                # koordinate posamezne lokacije vzdolž FOC
                coordinate<-read.csv("coordinate_linija1.csv", sep=";", 
dec=".")[,2:4]
                D<-seq(1,970,by=1)
                coordinate<-(cbind(D,coordinate))
                #dolžina vzdolž FOC
                #Length <- read.table(flist[1], skip=917, nrows=970)[, 1] 
                Temp <- do.call(cbind, lapply(flist, function(x) read.table(x, 
skip=917,
nrows=970)[, 2])) 
                Temp1<-as.data.frame(cbind(D,Temp))
                colnames(Temp1)<-flistNew
                # zdruzi v tableo, tako da so temperature za posameni file po 
vrsticah 
                dm <- melt(Temp1, id=("D"))
                dm <-data.frame(X=11.11, Y=11.11, dolzina=11.11, dm)

But i have another problem...
Is it possible to trnasform the names of each file which are listed in the
variable txt_files to official R DateTime format? For example :
so that this :  "channel 1 20120601 003507 00001.ddf"  would be saved like
this "2012-06-07 00:35:07"

Thanks for the help

--
View this message in context: 
http://r.789695.n4.nabble.com/importing-multiple-file-form-folder-tp4631637p4632942.html
Sent from the R help mailing list archive at Nabble.com.

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to