Formateo de decimales en R

Tengo un número, por ejemplo 1.128347132904321674821 que me gustaría mostrar como solo dos decimales cuando se muestra en la pantalla (o se escribe en un archivo). ¿Cómo se hace eso?

x <- 1.128347132904321674821

EDITAR:

El uso de:

options(digits=2)

Se ha sugerido como una posible respuesta. ¿Hay alguna manera de especificar esto dentro de un script para uso único? Cuando lo agrego a mi script, no parece hacer nada diferente y no estoy interesado en volver a escribir mucho para formatear cada número (estoy automatizando un informe muy grande).

-

Respuesta: ronda (x, dígitos = 2)

Antecedentes: algunas respuestas sugeridas en esta página (p. Ej. signif, options(digits=...)) No garantizan que se muestre un cierto número de decimales para un número arbitrario. Supongo que esta es una característica de diseño en R por la cual una buena práctica científica implica mostrar un cierto número de dígitos basados ​​en los principios de " cifras significativas ". Sin embargo, en muchos dominios (por ejemplo, estilo APA , informes comerciales), los requisitos de formato dictan que se muestre un cierto número de decimales. Esto a menudo se hace con fines de coherencia y estandarización en lugar de preocuparse por cifras significativas.

Solución :

El siguiente código muestra exactamente dos lugares decimales para el número x.

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

Por ejemplo:

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"

Una función más general es la siguiente, donde xestá el número y kes el número de decimales que se muestran. trimwselimina cualquier espacio en blanco inicial que pueda ser útil si tiene un vector de números.

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

P.ej,

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

Puede formatear un número, digamos x, hasta decimales como desee. Aquí xhay un número con muchos decimales. Supongamos que deseamos mostrar hasta 8 decimales de este número:

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

Aquí format="f"da números flotantes en los lugares decimales habituales, digamos, xxx.xxx, y digitsespecifica el número de dígitos. Por el contrario, si desea obtener un número entero para mostrar, lo usaría format="d"(al igual que sprintf).

Puedes probar mi paquete formatable .

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

Lo bueno es que xsigue siendo un vector numérico y puede hacer más cálculos con el mismo formato.

> x + 1
[1] 2.13

Aún mejor, los dígitos no se pierden, puede volver a formatear con más dígitos en cualquier momento :)

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

por 2 decimales suponiendo que desea seguir ceros al final

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

lo que da

[1] "5.50"

Como @mpag menciona a continuación, parece que R a veces puede dar valores inesperados con esto y el método redondo, por ejemplo, sprintf (5.5550, fmt = '% #. 2f') da 5.55, no 5.56

Algo como eso :

options(digits=2)

Opción de definición de dígitos:

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

Comprobar funciones prettyNum, formato

tener ceros de prueba (123.1240 por ejemplo) usar sprintf(x, fmt='%#.4g')

Si prefiere dígitos significativos a dígitos fijos, el comando signif podría 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

La función formatC()se puede usar para formatear un número con dos decimales. Esta función proporciona dos lugares decimales incluso cuando los valores resultantes incluyen ceros finales.

Estoy usando esta variante para forzar la impresión de K decimales:

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

Tenga en cuenta que los objetos numéricos en R se almacenan con doble precisión , lo que le proporciona (aproximadamente) 16 dígitos decimales de precisión; el resto será ruido. Admito que el número que se muestra arriba probablemente sea solo un ejemplo, pero tiene 22 dígitos.

Me parece que sería algo así como

library(tutoR)
format(1.128347132904321674821, 2)

Por un poco de ayuda en línea .

si solo desea redondear un número o una lista, simplemente use

round(data, 2)

Luego, los datos se redondearán a 2 decimales.