diff options
author | Johannes Ranke <jranke@uni-bremen.de> | 2019-03-04 10:36:53 +0100 |
---|---|---|
committer | Johannes Ranke <jranke@uni-bremen.de> | 2019-03-04 10:36:53 +0100 |
commit | d3da24d4d7e616ba2c862905a1a57fc05f453746 (patch) | |
tree | 950f71987007d6498b7a2e547b8a38176c363b37 /R | |
parent | d0a358a8f4fd03c95536409523e492eb15726f44 (diff) |
signif for DTx when printing nafta results
In order to be able to test cross-platform
Diffstat (limited to 'R')
-rw-r--r-- | R/nafta.R | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -73,7 +73,7 @@ print.nafta <- function(x, quiet = TRUE, digits = 3, ...) { print(x$parameters, digits = digits) t_rep <- .evaluate_nafta_results(x$S, x$S_c, x$distimes, quiet = quiet) cat("\nDTx values:\n") - print(x$distimes, digits = digits) + print(signif(x$distimes, digits = digits)) cat("\nRepresentative half-life:\n") print(t_rep) } |