Add pretty parameter to the show method in R

maropu · Jun 22, 2015 · e582628 · e582628
1 parent a3cd55b
commit e582628
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/pkg/R/DataFrame.R b/R/pkg/R/DataFrame.R
@@ -169,8 +169,8 @@ setMethod("isLocal",
 #'}
 setMethod("showDF",
           signature(x = "DataFrame"),
-          function(x, numRows = 20) {
-            s <- callJMethod(x@sdf, "showString", numToInt(numRows), TRUE)
+          function(x, numRows = 20, pretty = TRUE) {
+            s <- callJMethod(x@sdf, "showString", numToInt(numRows), pretty)
             cat(s)
           })