[R] Odp: (no subject)
Petr PIKAL
petr.pikal at precheza.cz
Tue Aug 18 15:12:07 CEST 2009
Hi
r-help-bounces at r-project.org napsal dne 18.08.2009 10:35:11:
> Dear all,
>
> I have a problem with the function read.xls from the gdata package,
error
> message see below. Two examples:
>
> First, I try to read my data, which does not work;
> Secondly, I tried the example code/data with the Iris data, which worked
>
> Any idea?
I did not see any response yet and do not have much knowledge of read.xls
experience but from the messages you sent it seems to me that there is
some mismatch during converting your xls to csv and reading from it.
> > read.xls(xlsfile, sheetNames[1], na.strings = c("na","
","."),verbose=TRUE)
> Sheetnumber must be an integer larger than 0. at C:/Programme/R/R-2.8.1/
> library/gdata/perl/xls2csv.pl line 57.
Is it possible that read.xls requires not names as in sheetNames but plain
numbers?
Regards
Petr
>
> Thanks,
> Lars
>
> > path<-"I:/subProjects/bh/HPGD/"
> >
> > setwd(path)
> >
> > xls <- "Platten_Liste_090421.xls"
> >
> > xlsfile <- file.path(path,xls)
> >
> > file.exists(xlsfile)
> [1] TRUE
> >
> >
> >
> > oxl <- comCreateObject("Excel.Application")
> >
> > comSetProperty(oxl, "Visible", TRUE)
> NULL
> >
> > owb <- comGetProperty(oxl, "Workbooks")
> >
> > ob <- comInvoke(owb, "Open", xlsfile)
> >
> > osheets <- comGetProperty(ob, "Worksheets")
> >
> > n <- comGetProperty(osheets, "Count")
> >
> > ithSheetName <- function(i) comGetProperty(comGetProperty(osheets,
"Item", i), "Name")
> >
> > sheetNames <- sapply(1:n, ithSheetName)
> >
> > #> sheetNames
> > # [1] "Platten gesamt" "Platte 1-5" "Platte 6-10"
> "Platte 11-15" "Platte 16-20" "Platte 21-25"
> > # [7] "Platte 26-30" "Platte 31-35" "Platte 36-42"
> "Replikate Platte 1-10" "Replikate Platte 11-20" "Replikate Platte
21-30"
> > #[13] "Replikate Platte 31-42"
> >
> >
> > comInvoke(oxl, "Quit")
> NULL
> >
> > read.xls(xlsfile, sheetNames[1], na.strings = c("na","
","."),verbose=TRUE)
>
> Converting xls file
> "I:/subProjects/bh/HPGD//Platten_Liste_090421.xls"
> to csv file
> "C:\DOKUME~1\beckmann\LOKALE~1\Temp\RtmpCU2zBu\file4db74d06.csv"
> ...
>
> Executing perl C:/Programme/R/R-2.8.1/library/gdata/perl/xls2csv.pl
"I:/
> subProjects/bh/HPGD//Platten_Liste_090421.xls"
"C:\DOKUME~1\beckmann\LOKALE~1
> \Temp\RtmpCU2zBu\file4db74d06.csv" Platten gesamt ...
>
> Sheetnumber must be an integer larger than 0. at C:/Programme/R/R-2.8.1/
> library/gdata/perl/xls2csv.pl line 57.
> Done.
>
> Fehler in xls2csv(xls, sheet, verbose = verbose, ..., perl = perl) :
> Unable to read translated csv file 'C:\DOKUME~1\beckmann\LOKALE~1\Temp
> \RtmpCU2zBu\file4db74d06.csv'.
> Fehler in file.exists(tfn) : ungültiges 'file' Argument
> >
>
> > xlsfile <- file.path(.path.package('gdata'),'xls','iris.xls')
> > xlsfile
> [1] "C:/Programme/R/R-2.8.1/library/gdata/xls/iris.xls"
> >
> > iris <- read.xls(xlsfile)
> Converting xls file to csv file... Done.
> Reading csv file... Done.
> > head(iris) # look at the top few rows
> Sepal.Length Sepal.Width Petal.Length Petal.Width Species
> 1 5.1 3.5 1.4 0.2 setosa
> 2 4.9 3.0 1.4 0.2 setosa
> 3 4.7 3.2 1.3 0.2 setosa
> 4 4.6 3.1 1.5 0.2 setosa
> 5 5.0 3.6 1.4 0.2 setosa
> 6 5.4 3.9 1.7 0.4 setosa
> >
>
>
>
>
>
> --
> Jetzt kostenlos herunterladen: Internet Explorer 8 und Mozilla Firefox 3
-
> sicherer, schneller und einfacher! http://portal.gmx.net/de/go/chbrowser
>
> ______________________________________________
> R-help at 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.
More information about the R-help
mailing list