Formatowanie miejsc dziesiętnych w R

Możesz sformatować liczbę, powiedzmy x, do miejsc po przecinku, jak chcesz. Tutaj x jest liczbą z wieloma miejscami po przecinku. 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" podaje liczby zmiennoprzecinkowe w zwykłych miejscach po przecinku powiedzmy, xxx. xxx, A digits określa liczbę cyfr. Dla kontrastu, jeśli chcesz uzyskać liczbę całkowitą do wyświetlenia, użyj format="d" (podobnie jak sprintf).

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

> # 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 x jest nadal wektorem liczbowym i możesz wykonać więcej obliczeń z tym samym formatowaniem.

> x + 1
[1] 2.13

Nawet lepiej, cyfry nie są tracone, można sformatować więcej cyfr w dowolnym momencie:)

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

Dla 2 miejsc po przecinku przy założeniu, że chcesz zachować końcowe zera

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

Co daje

[1] "5.50"

Jak @mpag wspomina poniżej, wydaje się, że R może czasami podać nieoczekiwane wartości za pomocą tej i metody okrągłej, np. sprintf(5.5550, fmt='%#.2f") daje 5.55, a nie 5.56

Sprawdź funkcje prettyNum, format

Aby mieć testujące zera (na przykład 123.1240) użyj sprintf(x, fmt='%#.4g')

Coś w tym stylu:

options(digits=2)

Definicja opcji cyfr:

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

Cóż, te dwa, które przychodzą mi na myśl to

fixed(1.128347132904321674821, digits=2)

Lub jeśli wolisz cyfry siginificant od stałych cyfr to;

signif(1.128347132904321674821,digits=3)

Funkcja formatC() może być używana do formatowania liczby do dwóch miejsc po przecinku. Dwa miejsca po przecinku są podane przez tę funkcję nawet wtedy, gdy wartości wynikowe zawierają końcowe zera.

Zauważ, że obiekty liczbowe w R są przechowywane z podwójną precyzją , co daje (w przybliżeniu) 16 cyfr dziesiętnych precyzji - reszta będzie szumem. Przyznam, że liczba pokazana powyżej jest prawdopodobnie tylko dla przykładu, ale ma 22 cyfry.

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

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

Wygląda mi na coś w rodzaju

library(tutoR)
format(1.128347132904321674821, 2)

Za małą Pomoc online .

Jeśli chcesz zaokrąglać liczbę lub listę, po prostu użyj

round(data, 2)

Wtedy dane będą zaokrąglone do 2 miejsca po przecinku.