Formatowanie miejsc dziesiętnych w R.

Mam numer, na przykład 1.128347132904321674821, który chciałbym wyświetlać jako tylko dwa miejsca po przecinku podczas wyświetlania na ekranie (lub zapisywaniu do pliku). Jak to zrobić?

x <- 1.128347132904321674821

EDYTOWAĆ:

Sposób użycia:

options(digits=2)

Zostało zasugerowane jako możliwa odpowiedź. Czy istnieje sposób na określenie tego w skrypcie do jednorazowego użytku? Gdy dodam go do skryptu, wydaje się, że nie robi nic innego i nie jestem zainteresowany ponownym pisaniem w celu sformatowania każdej liczby (automatyzuję bardzo duży raport).

-

Odpowiedź: okrągły (x, cyfry = 2)

Tło: Niektóre odpowiedzi je na tej stronie (np signif, options(digits=...)) nie gwarantują, że pewna liczba miejsc po przecinku są wyświetlane dla dowolnej liczby. Zakładam, że jest to cecha projektowa w R, zgodnie z którą dobra praktyka naukowa polega na pokazywaniu pewnej liczby cyfr w oparciu o zasady „ znaczących cyfr ”. Jednak w wielu domenach (np. Styl APA , raporty biznesowe) wymagania dotyczące formatowania nakazują wyświetlanie pewnej liczby miejsc dziesiętnych. Odbywa się to często w celach spójności i standaryzacji, a nie w przypadku znaczących liczb.

Rozwiązanie :

Poniższy kod pokazuje dokładnie dwa miejsca po przecinku dla liczby x.

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

Na przykład:

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"

Bardziej ogólna funkcja jest następująca, gdzie xjest liczba i kliczba miejsc po przecinku do wyświetlenia. trimwsusuwa wszelkie białe znaki, które mogą być przydatne, jeśli masz wektor liczb.

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

Na przykład,

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

Możesz sformatować liczbę, powiedzmy x, do miejsc po przecinku, jak chcesz. Oto xliczba z wieloma miejscami dziesiętnymi. Załóżmy, że chcemy pokazać do 8 miejsc po przecinku tej liczby:

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

Tutaj format="f"daje liczb zmiennoprzecinkowych w zwykłych miejsc po przecinku powiedzieć, xxx.xxx i digitsokreśla liczbę cyfr. Natomiast jeśli chcesz uzyskać liczbę całkowitą do wyświetlenia, użyłbyś format="d"(podobnie jak sprintf).

Możesz wypróbować mój pakiet formable .

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

Dobrą rzeczą jest to, że xnadal jest wektorem numerycznym i można wykonać więcej obliczeń przy tym samym formatowaniu.

> x + 1
[1] 2.13

Co więcej, cyfry nie są zgubione, w dowolnym momencie możesz sformatować więcej cyfr :)

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

dla 2 miejsc po przecinku, zakładając, że chcesz zachować końcowe zera

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

co daje

[1] "5.50"

Jak wspomniano poniżej @mpag, wydaje się, że R może czasem dać nieoczekiwane wartości za pomocą tej i okrągłej metody, np. Sprintf (5.5550, fmt = '% #. 2f') daje 5,55, a nie 5,56

Coś w tym stylu :

options(digits=2)

Definicja opcji cyfr:

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

Sprawdź funkcje prettyNum, format

mieć próbne zera (na przykład 123.1240) sprintf(x, fmt='%#.4g')

Jeśli wolisz cyfry znaczące niż stałe, wówczas przydatne może być polecenie signif :

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

Za pomocą tej funkcji formatC()można sformatować liczbę z dokładnością do dwóch miejsc po przecinku. Ta funkcja podaje dwa miejsca po przecinku, nawet jeśli wynikowe wartości zawierają końcowe zera.

Używam tego wariantu do wymuszonego drukowania miejsc dziesiętnych K:

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

Zauważ, że obiekty numeryczne w R są przechowywane z podwójną precyzją , co daje (z grubsza) 16 cyfr dziesiętnych precyzji - reszta będzie szumem. Przyznaję, że powyższy numer jest prawdopodobnie tylko przykładem, ale ma 22 cyfry.

Wygląda mi na to, że byłoby coś takiego

library(tutoR)
format(1.128347132904321674821, 2)

Za małą pomoc online .

jeśli chcesz tylko zaokrąglić liczbę lub listę, po prostu użyj

round(data, 2)

Następnie dane będą zaokrąglane do 2 miejsc po przecinku.