change default argument pct.symbol to FALSE

philsf · philsf · commit d5bfe1710b40 · 2018-10-05T05:27:49.000-03:00
diff --git a/R/format.pct.R b/R/format.pct.R
@@ -1,4 +1,4 @@
-format.pct <- function(p, digits = 1, pct.symbol = TRUE) {
+format.pct <- function(p, digits = 1, pct.symbol = FALSE) {
   symbol <- "%"
   if (!pct.symbol) symbol <- NULL
   paste0(format.float(p*100, digits), symbol)

Original file line number	Diff line number	Diff line change
`@@ -1,4 +1,4 @@`
`1`		`-format.pct <- function(p, digits = 1, pct.symbol = TRUE) {`
	`1`	`+format.pct <- function(p, digits = 1, pct.symbol = FALSE) {`
`2`	`2`	`symbol <- "%"`
`3`	`3`	`if (!pct.symbol) symbol <- NULL`
`4`	`4`	`paste0(format.float(p*100, digits), symbol)`