Displaying 1 result from an estimated 1 matches for "xyshort".
Did you mean:
xshort
2006 Jul 05
1
read.table() errors with tab as separator (PR#9061)
...> weblong <- "http://www.maths.anu.edu.au/~johnm/testfiles/long.txt"
> webshort <- "http://www.maths.anu.edu.au/~johnm/testfiles/short.txt"
> xyLong <- read.table(url(weblong), sep="\t")
> dim(xyLong) # Should be 1821 x 2
[1] 1569 2
> xyShort <- read.table(url(webshort), sep="\t")
> dim(xyShort) # Should be, and will be, 90 x 2
[1] 90 2
> long <- readLines(url(weblong))
> short <- readLines(url(webshort))
> length(long)
[1] 1821
> length(short)
[1] 90
> all(long[1561:1650]==short) # short i...