diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2014-10-14 22:04:54 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2014-10-14 22:04:54 +0200 |
| commit | 4510a609159216041f10a33146534f5a8366ac76 (patch) | |
| tree | 852eb7e1d69d2e141d1d74f19e82516dc7abb808 /R | |
| parent | ceabddf8bf8bd43f1b57edf112a0fe11c76f5251 (diff) | |
Further formatting improvement for differential equations
Diffstat (limited to 'R')
| -rw-r--r-- | R/mkinfit.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/mkinfit.R b/R/mkinfit.R index 5c1de846..a966cea6 100644 --- a/R/mkinfit.R +++ b/R/mkinfit.R @@ -567,7 +567,7 @@ print.summary.mkinfit <- function(x, digits = max(3, getOption("digits") - 3), . if (!is.null(x$warning)) cat("\n\nWarning:", x$warning, "\n\n")
cat("\nEquations:\n")
- cat(noquote(strwrap(x[["diffs"]], exdent = 11)), fill = TRUE)
+ writeLines(strwrap(x[["diffs"]], exdent = 11))
df <- x$df
rdf <- df[2]
|