@@ -67,7 +67,7 @@ xls2sep(xls, sheet=1, verbose=FALSE, blank.lines.skip=TRUE, ...,
6767\examples {
6868
6969 # iris.xls is included in the gregmisc package for use as an example
70- xlsfile <- file.path(. path.package(' gdata' ),' xls' ,' iris.xls' )
70+ xlsfile <- file.path(path.package(' gdata' ),' xls' ,' iris.xls' )
7171 xlsfile
7272
7373 iris <- read.xls(xlsfile ) # defaults to csv format
@@ -121,9 +121,9 @@ xls2sep(xls, sheet=1, verbose=FALSE, blank.lines.skip=TRUE, ...,
121121
122122 # # Examples demonstrating selection of specific 'sheets'
123123 # # from the example XLS file 'ExampleExcelFile.xls'
124- exampleFile <- file.path(. path.package(' gdata' ),' xls' ,
124+ exampleFile <- file.path(path.package(' gdata' ),' xls' ,
125125 ' ExampleExcelFile.xls' )
126- exampleFile2007 <- file.path(. path.package(' gdata' ),' xls' ,
126+ exampleFile2007 <- file.path(path.package(' gdata' ),' xls' ,
127127 ' ExampleExcelFile.xlsx' )
128128
129129 # # see the number and names of sheets:
@@ -147,7 +147,7 @@ xls2sep(xls, sheet=1, verbose=FALSE, blank.lines.skip=TRUE, ...,
147147
148148 # # load a file containing data and column names using latin-1
149149 # # characters
150- latinFile <- file.path(. path.package(' gdata' ),' xls' ,' latin-1.xls' )
150+ latinFile <- file.path(path.package(' gdata' ),' xls' ,' latin-1.xls' )
151151 latin1 <- read.xls(latinFile , fileEncoding = " latin1" )
152152 colnames(latin1 )
153153
0 commit comments