Formatieren von Dezimalstellen in R.

Ich habe eine Zahl, zum Beispiel 1.128347132904321674821, die ich bei der Ausgabe auf dem Bildschirm (oder beim Schreiben in eine Datei) nur als zwei Dezimalstellen anzeigen möchte. Wie macht man das?

x <- 1.128347132904321674821

BEARBEITEN:

Die Verwendung von:

options(digits=2)

Wurde als mögliche Antwort vorgeschlagen. Gibt es eine Möglichkeit, dies in einem Skript für die einmalige Verwendung anzugeben? Wenn ich es meinem Skript hinzufüge, scheint es nichts anderes zu tun, und ich bin nicht daran interessiert, viele Zahlen erneut einzugeben, um jede Zahl zu formatieren (ich automatisiere einen sehr großen Bericht).

- -

Antwort: rund (x, Ziffern = 2)

Hintergrund: Einige auf dieser Seite vorgeschlagenen Antworten (zB signif, options(digits=...)) nicht garantieren , dass eine bestimmte Anzahl von Dezimalstellen für eine beliebige Anzahl angezeigt werden. Ich gehe davon aus, dass dies ein Konstruktionsmerkmal in R ist, bei dem nach guter wissenschaftlicher Praxis eine bestimmte Anzahl von Ziffern auf der Grundlage der Prinzipien " signifikanter Zahlen " angezeigt wird . In vielen Domänen (z. B. APA-Stil , Geschäftsberichte) schreiben die Formatierungsanforderungen jedoch vor, dass eine bestimmte Anzahl von Dezimalstellen angezeigt wird. Dies geschieht häufig aus Gründen der Konsistenz und Standardisierung, anstatt sich mit signifikanten Zahlen zu befassen.

Lösung :

Der folgende Code zeigt genau zwei Dezimalstellen für die Zahl x.

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

Beispielsweise:

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"

Eine allgemeinere Funktion lautet wie folgt: Wo xist die Anzahl und kdie Anzahl der anzuzeigenden Dezimalstellen? trimwsEntfernt alle führenden Leerzeichen, die nützlich sein können, wenn Sie einen Zahlenvektor haben.

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

Z.B,

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

Sie können eine Zahl beispielsweise xbis zu Dezimalstellen formatieren, wie Sie möchten. Hier xist eine Zahl mit vielen Dezimalstellen. Angenommen, wir möchten bis zu 8 Dezimalstellen dieser Zahl anzeigen:

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

Hier werden format="f"Gleitkommazahlen mit den üblichen Dezimalstellen digitsangegeben , z. B. xxx.xxx, und die Anzahl der Ziffern angegeben. Im Gegensatz dazu würden Sie format="d"(ähnlich wie sprintf) verwenden , wenn Sie eine Ganzzahl anzeigen möchten .

Sie können versuchen, mein Paket formatierbar .

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

Das Gute ist, dass xes sich immer noch um einen numerischen Vektor handelt und Sie mit derselben Formatierung mehr Berechnungen durchführen können.

> x + 1
[1] 2.13

Noch besser, die Ziffern gehen nicht verloren, Sie können jederzeit mit mehr Ziffern neu formatieren :)

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

für 2 Dezimalstellen unter der Annahme, dass Sie nach Nullen bleiben möchten

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

was gibt

[1] "5.50"

Wie @mpag unten erwähnt, scheint es, dass R damit manchmal unerwartete Werte liefern kann, und die runde Methode, z. B. sprintf (5.5550, fmt = '% #. 2f'), ergibt 5.55, nicht 5.56

Sowas in der Art :

options(digits=2)

Option zur Definition der Ziffern:

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

Überprüfen Sie die Funktionen PrettyNum, Format

Probieren von Nullen (z. B. 123.1240) verwenden sprintf(x, fmt='%#.4g')

Wenn Sie signifikante Ziffern festen Ziffern vorziehen, kann der Befehl signieren hilfreich sein:

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

Mit dieser Funktion formatC()kann eine Zahl auf zwei Dezimalstellen formatiert werden. Diese Funktion gibt zwei Dezimalstellen an, selbst wenn die resultierenden Werte nachgestellte Nullen enthalten.

Ich verwende diese Variante für den Kraftdruck K Dezimalstellen:

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

Beachten Sie, dass numerische Objekte in R mit doppelter Genauigkeit gespeichert werden , wodurch Sie (ungefähr) 16 Dezimalstellen erhalten - der Rest ist Rauschen. Ich gebe zu, dass die oben gezeigte Nummer wahrscheinlich nur ein Beispiel ist, aber 22 Ziffern lang.

Sieht für mich so aus

library(tutoR)
format(1.128347132904321674821, 2)

Per ein wenig Online-Hilfe .

Wenn Sie nur eine Zahl oder eine Liste runden möchten, verwenden Sie einfach

round(data, 2)

Dann werden die Daten auf 2 Dezimalstellen gerundet.