The R Project SVN R

Rev

Rev 16975 | Rev 34279 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 16975 Rev 16976
Line 88... Line 88...
88 
    '"1"\t"0.8"\t"3"\n', '"2"\t"0.6"\t"2"\n', '"3"\t"0.8"\t"3"\n',
 88 
    '"1"\t"0.8"\t"3"\n', '"2"\t"0.6"\t"2"\n', '"3"\t"0.8"\t"3"\n',
89 
    file = "test.dat", sep="")
 89 
    file = "test.dat", sep="")
90 
read.table("test.dat")
 90 
read.table("test.dat")
91 
unlink("test.dat")
 91 
unlink("test.dat")
92 
 
 92 
 
- 
 
 93 
cat('%comment\n\n%another\n%\n%\n',
- 
 
 94 
    'C1\tC2\tC3\n"Panel"\t"Area Examined"\t"% Blemishes"\n',
- 
 
 95 
    '"1"\t"0.8"\t"3"\n', '"2"\t"0.6"\t"2"\n', '"3"\t"0.8"\t"3"\n',
- 
 
 96 
    file = "test.dat", sep="")
- 
 
 97 
read.table("test.dat", comment.char = "%")
- 
 
 98 
unlink("test.dat")
- 
 
 99 
 
93 
## end of tests
 100 
## end of tests