Rでの小数位のフォーマット

画面に出力する（またはファイルに書き込む）ときに、小数点以下2桁のみとして表示したい1.128347132904321674821などの数値があります。どうやってそれを行うのですか？

x <- 1.128347132904321674821

編集：

の用法：

options(digits=2)

可能な答えとして提案されています。これをスクリプト内で一度だけ使用するように指定する方法はありますか？スクリプトに追加しても何も変わらないようで、各数値をフォーマットするために何度も再入力する必要はありません（非常に大きなレポートを自動化しています）。

-

回答：丸め（x、桁数= 2）

背景：このページに提案いくつかの答えは、（例えば、signif、options(digits=...)）小数点以下の特定の数は、任意の数のために表示されていることを保証するものではありません。これはRの設計上の特徴であると思います。これにより、優れた科学的実践には、「有効数字」の原則に基づいて特定の桁数を示すことが含まれます。ただし、多くのドメイン（APAスタイル、ビジネスレポートなど）では、書式設定の要件により、特定の小数点以下の桁数が表示されます。これは多くの場合、重要な数値に関係するのではなく、一貫性と標準化の目的で行われます。

ソリューション：

次のコードは、数値の小数点以下2桁を示していますx。

format(round(x, 2), nsmall = 2)

例えば：

format(round(1.20, 2), nsmall = 2)
# [1] "1.20"
format(round(1, 2), nsmall = 2)
# [1] "1.00"
format(round(1.1234, 2), nsmall = 2)
# [1] "1.12"

より一般的な関数は次のとおりです。xは数値で、kは表示する小数点以下の桁数です。trimws数値のベクトルがある場合に役立つ、先頭の空白を削除します。

specify_decimal <- function(x, k) trimws(format(round(x, k), nsmall=k))

例えば、

specify_decimal(1234, 5)
# [1] "1234.00000"
specify_decimal(0.1234, 5)
# [1] "0.12340"

x必要に応じて、小数点以下まで数値をフォーマットできます。これxは、小数点以下の桁数の多い数値です。この数値の小数点以下8桁までを表示するとします。

x = 1111111234.6547389758965789345
y = formatC(x, digits = 8, format = "f")
# [1] "1111111234.65473890"

ここでformat="f"は、通常の小数点以下の浮動小数点数、たとえばxxx.xxxを示し、digits桁数を指定します。対照的に、表示する整数を取得したい場合は、format="d"（のようにsprintf）使用します。

私のパッケージのformattableを試すことができます。

> # devtools::install_github("renkun-ken/formattable")
> library(formattable)
> x <- formattable(1.128347132904321674821, digits = 2, format = "f")
> x
[1] 1.13

良いことは、xそれでも数値ベクトルであり、同じフォーマットでより多くの計算を実行できることです。

> x + 1
[1] 2.13

さらに良いことに、数字は失われず、いつでもより多くの数字で再フォーマットできます:)

> formattable(x, digits = 6, format = "f")
[1] 1.128347

後続ゼロを保持したいと仮定した場合の小数点以下2桁

sprintf(5.5, fmt = '%#.2f')

与える

[1] "5.50"

@mpagが以下で言及するように、Rはこれで予期しない値を与えることがあるようです。たとえば、sprintf（5.5550、fmt = '％＃。2f'）は5.55ではなく5.55を返します。

そんな感じ ：

options(digits=2)

桁オプションの定義：

digits: controls the number of digits to print when printing numeric values.

関数prettyNum、フォーマットをチェック

ゼロを試行する（たとえば123.1240）を使用するには sprintf(x, fmt='%#.4g')

固定数字よりも有効数字を好む場合は、signifコマンドが役立ちます。

> signif(1.12345, digits = 3)
[1] 1.12
> signif(12.12345, digits = 3)
[1] 12.1
> signif(12345.12345, digits = 3)
[1] 12300

この関数formatC()は、数値を小数点以下2桁にフォーマットするために使用できます。結果の値に後続ゼロが含まれている場合でも、この関数によって小数点以下2桁が与えられます。

私はKの小数点以下の桁数を強制的に出力するためにこのバリアントを使用しています：

# format numeric value to K decimal places
formatDecimal <- function(x, k) format(round(x, k), trim=T, nsmall=k)

Rの数値オブジェクトは倍精度で格納されることに注意してください。これにより、（おおよそ）16桁の精度が得られます。残りはノイズになります。上記の数字はほんの一例であることを認めますが、22桁です。

私のように見えるのは次のようなものです

library(tutoR)
format(1.128347132904321674821, 2)

少しのオンラインヘルプあたり。

数値またはリストを丸めるだけの場合は、単に

round(data, 2)

その後、データは小数点以下2桁に丸められます。