The R Project SVN – R – Diff – /trunk/tests/reg-IO2.R



sapply(res2, typeof)
sapply(res2, class)
unlink("foo7")
 
# should be logical
type.convert(character(0), as.is=FALSE)
 
# test of comments in data files
cat("# a test file",
    "# line 2",
    "# line 3",

Rev 78051	Rev 78541
Line 60...	Line 60...
60	`sapply(res2, typeof)`	60	`sapply(res2, typeof)`
61	`sapply(res2, class)`	61	`sapply(res2, class)`
62	`unlink("foo7")`	62	`unlink("foo7")`
63		63
64	`# should be logical`	64	`# should be logical`
65	`type.convert(character(0))`	65	`type.convert(character(0), as.is=FALSE)`
66		66
67	`# test of comments in data files`	67	`# test of comments in data files`
68	`cat("# a test file",`	68	`cat("# a test file",`
69	`"# line 2",`	69	`"# line 2",`
70	`"# line 3",`	70	`"# line 3",`

The R Project SVN R

(root)/trunk/tests/reg-IO2.R – Rev 78051 → 78541