8

1 つのコマンドを使用して、R セッション全体で表示される桁数を指定するにはどうすればよいですか? つまり、値0を常に として表示するにはどうすればよい0.0ですか? コマンドを試しましたoptions(digits=1)が、0まだ表示され、表示され0ません0.0。私は本当に、各コマンドをprint(ifelse(x==0,"0.0",x)).

この問題の解決策が、たとえば、5として表示されるとよいでしょう5.0

4

2 に答える 2

6

options末尾の 0があるかどうかはわかりません。1 つの可能性は、独自の print.numeric および print.integer 関数を持つことです。

print.integer <- print.numeric <- function(..., digs=1)   {
    print(format(as.numeric(...), nsmall=digs), quote=F)
}

それはまだ必要printですが、よりきれいです

> print(-1:5)
[1] -1.0  0.0  1.0  2.0  3.0  4.0  5.0


nsmallまたは、引数を format で直接 使用することもできます。

mat <- matrix(as.numeric(rep(0:3, 5)), ncol=4)
print(format(mat, nsmall=2), quote=F)
于 2012-11-27T22:26:57.770 に答える