aboutsummaryrefslogtreecommitdiff
path: root/R
diff options
context:
space:
mode:
authorJohannes Ranke <jranke@uni-bremen.de>2019-04-10 11:06:51 +0200
committerJohannes Ranke <jranke@uni-bremen.de>2019-04-10 11:06:51 +0200
commit129ff33d91bbea9a90b11f8230b78493eba45fe3 (patch)
tree59330b3c52d6e02e2cae5256ac6f43d6ae88906c /R
parent194659fcaccdd1ee37851725b8c72e99daa3a8cf (diff)
Address failure on travis
Also reduce the digits in the representative half-live given by nafta()
Diffstat (limited to 'R')
-rw-r--r--R/nafta.R2
1 files changed, 1 insertions, 1 deletions
diff --git a/R/nafta.R b/R/nafta.R
index a98a7852..ef752e0c 100644
--- a/R/nafta.R
+++ b/R/nafta.R
@@ -75,7 +75,7 @@ print.nafta <- function(x, quiet = TRUE, digits = 3, ...) {
cat("\nDTx values:\n")
print(signif(x$distimes, digits = digits))
cat("\nRepresentative half-life:\n")
- print(t_rep)
+ print(round(t_rep, 2))
}
.evaluate_nafta_results <- function(S, S_c, distimes, quiet = FALSE) {

Contact - Imprint