R'de ondalık basamakları biçimlendirme

Ekrana çıktı (veya bir dosyaya yazılırken) yalnızca iki ondalık basamak olarak göstermek istiyorum, örneğin 1.128347132904321674821 bir numara var. biri bunu nasıl yapar?

x <- 1.128347132904321674821

DÜZENLE:

Kullanımı:

options(digits=2)

Olası bir cevap olarak önerilmiştir. Bunu bir kerelik kullanım için bir komut dosyasında belirtmenin bir yolu var mı? Komut dosyasına eklediğimde, farklı bir şey yapmıyor gibi görünüyor ve her sayıyı biçimlendirmek için çok fazla yeniden yazmayla ilgilenmiyorum (çok büyük bir raporu otomatikleştiriyorum).

-

Cevap: yuvarlak (x, basamak = 2)

Arka plan: Bu sayfada önerilen bazı yanıtlar (örn. signif, options(digits=...)) , Rasgele bir sayı için belirli sayıda ondalık sayı görüntüleneceğini garanti etmez. Bunun R'deki bir tasarım özelliği olduğunu düşünüyorum, burada iyi bilimsel uygulama " önemli figürler " ilkelerine dayalı olarak belirli sayıda basamak göstermeyi içerir . Bununla birlikte, birçok alanda (ör. APA stili , iş raporları) biçimlendirme gereksinimleri belirli sayıda ondalık basamağın gösterilmesini gerektirir. Bu genellikle önemli rakamlarla ilgilenmektense tutarlılık ve standardizasyon amacıyla yapılır.

Çözüm :

Aşağıdaki kod, sayı için tam olarak iki ondalık basamak gösterir x.

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

Örneğin:

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"

Daha genel bir işlev aşağıdaki xsayıdır ve kgösterilecek ondalık sayıdır. trimwsbir sayı vektörünüz varsa yararlı olabilecek tüm önde gelen beyaz boşlukları kaldırır.

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

Örneğin,

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

Bir sayıyı, örneğin x, ondalık basamaklara kadar istediğiniz gibi biçimlendirebilirsiniz . İşte xondalık basamakları olan bir sayı. Bu sayının en fazla 8 ondalık basamağını göstermek istediğimizi varsayalım:

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

Burada format="f", xxx.xxx gibi normal ondalık basamaklarda kayan sayılar verir ve digitsbasamak sayısını belirtir. Tersine, görüntülemek için bir tamsayı almak istiyorsanız format="d"(çok benzer sprintf) kullanırsınız.

Biçimlendirilebilir paketimi deneyebilirsiniz .

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

İyi olan şu ki, xyine de sayısal bir vektör ve aynı biçimlendirmeyle daha fazla hesaplama yapabilirsiniz.

> x + 1
[1] 2.13

Daha da iyisi, rakamlar kaybolmaz, istediğiniz zaman daha fazla rakamla yeniden biçimlendirebilirsiniz :)

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

sondaki sıfırları tutmak istediğinizi varsayarak 2 ondalık basamak için

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

hangi verir

[1] "5.50"

@Mpag'den bahsedildiği gibi, R bazen bununla beklenmedik değerler verebilir ve yuvarlak yöntem örneğin sprintf (5.5550, fmt = '% #. 2f') 5.56 değil 5.55 verir

Bunun gibi bir şey :

options(digits=2)

Basamak seçeneğinin tanımı:

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

Kontrol fonksiyonları prettyNum, biçim

sıfırlayan sıfırlara sahip olmak (örneğin 123.1240) kullanmak sprintf(x, fmt='%#.4g')

Sabit basamaklara göre önemli basamakları tercih ederseniz, signif komutu yararlı olabilir:

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

İşlev formatC(), bir sayıyı iki ondalık basamağa biçimlendirmek için kullanılabilir. Elde edilen değerler sondaki sıfırlar olsa bile, bu işlev tarafından iki ondalık basamak verilir.

Bu varyantı zorla baskı K ondalık basamakları için kullanıyorum:

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

R'deki sayısal nesnelerin çift ​​hassasiyetle saklandığını unutmayın , bu size (kabaca) 16 ondalık basamak basamağı verir - gerisi gürültü olacaktır. Yukarıda gösterilen sayının muhtemelen sadece bir örnek için olduğunu, ancak 22 basamak uzunluğunda olduğunu düşünüyorum.

Bana öyle bir şey gibi görünüyor

library(tutoR)
format(1.128347132904321674821, 2)

Biraz çevrimiçi yardım başına .

sadece bir sayıyı veya listeyi yuvarlamak istiyorsanız,

round(data, 2)

Ardından, veriler 2 ondalık basamağa yuvarlanır.