Displaying 1 result from an estimated 1 matches for "tmpos".
Did you mean:
tmpfs
2002 Dec 20
0
RE workspace vs. image
...-
function(x, pos=NA, dir="c:/directory name/file name", replace=F) {
if (is.na(pos)) dirL _ paste("file:", dir, sep="") else dirL _
search()[pos]
if (mode(x) != "character") name _ deparse(substitute(x)) else name _ x
# Assign the correct number to tmpos = pos, if it is not already assigned.
if (is.na(pos)) {
tmp _ search() == dirL
if (sum(tmp) < 1) stop(message=paste(dir, "not in search path."))
if (sum(tmp) > 1) {
cat("There is more than one directory named",
dir,...