Formatando casas decimais em R

Eu tenho um número, por exemplo, 1.128347132904321674821 que gostaria de mostrar como apenas duas casas decimais quando a saída é exibida na tela (ou gravada em um arquivo). Como é que alguém faz isso?

x <- 1.128347132904321674821

EDITAR:

O uso de:

options(digits=2)

Foi sugerido como uma resposta possível. Existe uma maneira de especificar isso em um script para uso único? Quando o adiciono ao meu script, parece não fazer nada diferente e não estou interessado em re-digitar muito para formatar cada número (estou automatizando um relatório muito grande).

-

Resposta: arredondado (x, dígitos = 2)

Antecedentes: Algumas respostas sugeridas nesta página (por exemplo, signif, options(digits=...)) não garantem que um certo número de casas decimais são exibidos para um número arbitrário. Presumo que este seja um recurso de design em R, no qual boas práticas científicas envolvem mostrar um certo número de dígitos com base em princípios de " figuras significativas ". No entanto, em muitos domínios (por exemplo, estilo APA , relatórios comerciais), os requisitos de formatação determinam que um determinado número de casas decimais seja exibido. Isso geralmente é feito para fins de consistência e padronização, em vez de se preocupar com números significativos.

Solução :

O código a seguir mostra exatamente duas casas decimais para o número x.

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

Por exemplo:

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"

Uma função mais geral é a seguinte, onde xestá o número e ko número de casas decimais a serem exibidas. trimwsremove qualquer espaço em branco inicial que possa ser útil se você tiver um vetor de números.

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

Por exemplo,

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

Você pode formatar um número, digamos x, com casas decimais conforme desejar. Aqui xestá um número com muitas casas decimais. Suponha que desejamos mostrar até 8 casas decimais deste número:

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

Aqui, os format="f"números flutuantes nas casas decimais habituais dizem xxx.xxx e digitsespecifica o número de dígitos. Por outro lado, se você quisesse exibir um número inteiro, usaria format="d"(muito parecido sprintf).

Você pode tentar o meu pacote formatável .

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

O bom xé que ainda é um vetor numérico e você pode fazer mais cálculos com a mesma formatação.

> x + 1
[1] 2.13

Melhor ainda, os dígitos não são perdidos, você pode reformatar com mais dígitos a qualquer momento :)

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

por 2 casas decimais, supondo que você queira manter zeros à direita

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

que dá

[1] "5.50"

Como o @mpag menciona abaixo, parece que o R às vezes pode fornecer valores inesperados com isso e o método round, por exemplo, sprintf (5.5550, fmt = '% #. 2f') fornece 5,55, e não 5,56

Algo parecido :

options(digits=2)

Definição da opção de dígitos:

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

Verificar funções prettyNum, formato

ter zeros de teste (123.1240 por exemplo) use sprintf(x, fmt='%#.4g')

Se você preferir dígitos significativos a dígitos fixos, o comando signif pode ser útil:

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

A função formatC()pode ser usada para formatar um número com duas casas decimais. Duas casas decimais são fornecidas por essa função, mesmo quando os valores resultantes incluem zeros à direita.

Estou usando esta variante para forçar a impressão de casas decimais K:

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

Observe que objetos numéricos em R são armazenados com precisão dupla , o que fornece (aproximadamente) 16 dígitos decimais de precisão - o restante será ruído. Concordo que o número mostrado acima provavelmente seja apenas um exemplo, mas tem 22 dígitos.

Parece-me que seria algo como

library(tutoR)
format(1.128347132904321674821, 2)

Por uma pequena ajuda online .

se você quiser arredondar um número ou uma lista, basta usar

round(data, 2)

Em seguida, os dados serão arredondados para duas casas decimais.