[R-gregmisc-users] SF.net SVN: r-gregmisc:[1959] trunk/gdata/R/write.fwf.R
Brought to you by:
warnes
|
From: <wa...@us...> - 2015-04-25 07:56:25
|
Revision: 1959
http://sourceforge.net/p/r-gregmisc/code/1959
Author: warnes
Date: 2015-04-25 07:56:23 +0000 (Sat, 25 Apr 2015)
Log Message:
-----------
Remove stray call to 'browser'
Modified Paths:
--------------
trunk/gdata/R/write.fwf.R
Modified: trunk/gdata/R/write.fwf.R
===================================================================
--- trunk/gdata/R/write.fwf.R 2015-04-25 06:26:40 UTC (rev 1958)
+++ trunk/gdata/R/write.fwf.R 2015-04-25 07:56:23 UTC (rev 1959)
@@ -37,7 +37,7 @@
options("scipen"=100)
}
-
+
if(rownames) {
x <- cbind(rownames(x), x)
rowColVal <- ifelse(!is.null(rowCol), rowCol, "row")
@@ -80,8 +80,6 @@
## Collect information about how format() will format columns.
## We need to get this info now, since format will turn all columns to character
-browser()
-
tmp <- apply(x, 2, format.info, ...)
tmp1 <- sapply(tmp, length)
tmp <- t(as.data.frame(tmp))
@@ -171,7 +169,7 @@
na=na,
row.names=FALSE,
col.names=FALSE,
- qmethod=qmethod)
+ qmethod=qmethod)
}
write.table(x=x,
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|