Định dạng các vị trí thập phân trong R

Tôi có một số, ví dụ 1.128347132904321674821 mà tôi muốn chỉ hiển thị dưới dạng hai chữ số thập phân khi xuất ra màn hình (hoặc ghi vào tệp). Làm thế nào để làm điều đó?

x <- 1.128347132904321674821

BIÊN TẬP:

Việc sử dụng:

options(digits=2)

Đã được đề xuất như một câu trả lời có thể. Có cách nào để xác định điều này trong một tập lệnh để sử dụng một lần không? Khi tôi thêm nó vào tập lệnh của mình, nó dường như không làm gì khác và tôi không quan tâm đến việc gõ lại để định dạng từng số (Tôi đang tự động hóa một báo cáo rất lớn).

-

Trả lời: vòng (x, chữ số = 2)

Bối cảnh: Một số câu trả lời gợi ý trên trang này (ví dụ signif, options(digits=...)) không đảm bảo rằng một số lượng nhất định của số thập phân được hiển thị cho một số tùy ý. Tôi cho rằng đây là một tính năng thiết kế trong R, theo đó thực tiễn khoa học tốt liên quan đến việc hiển thị một số chữ số nhất định dựa trên các nguyên tắc của "các số liệu quan trọng ". Tuy nhiên, trong nhiều tên miền (ví dụ: kiểu APA , báo cáo doanh nghiệp) yêu cầu định dạng cho rằng một số vị trí thập phân nhất định được hiển thị. Điều này thường được thực hiện cho mục đích thống nhất và tiêu chuẩn hóa hơn là quan tâm đến các số liệu quan trọng.

Giải pháp :

Đoạn mã sau hiển thị chính xác hai chữ số thập phân cho số x.

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

Ví dụ:

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"

Một hàm tổng quát hơn như sau trong đó xlà số và klà số thập phân cần hiển thị. trimwsloại bỏ bất kỳ khoảng trắng hàng đầu nào có thể hữu ích nếu bạn có một vectơ số.

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

Ví dụ,

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

Bạn có thể định dạng một số, giả sử x, đến số thập phân như bạn muốn. Đây xlà một số có nhiều chữ số thập phân. Giả sử chúng tôi muốn hiển thị tối đa 8 chữ số thập phân của số này:

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

Ở đây format="f"đưa ra các số trôi nổi ở các vị trí thập phân thông thường, nói là xxx.xxx và digitschỉ định số chữ số. Ngược lại, nếu bạn muốn lấy một số nguyên để hiển thị, bạn sẽ sử dụng format="d"(rất giống sprintf).

Bạn có thể thử gói của tôi có thể định dạng .

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

Điều tốt là, xvẫn là một vectơ số và bạn có thể thực hiện nhiều phép tính hơn với cùng định dạng.

> x + 1
[1] 2.13

Thậm chí tốt hơn, các chữ số không bị mất, bạn có thể định dạng lại với nhiều chữ số hơn bất cứ lúc nào :)

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

cho 2 vị trí thập phân giả sử rằng bạn muốn giữ các số 0 ở cuối

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

cái nào cho

[1] "5.50"

Như @mpag đề cập bên dưới, có vẻ như R đôi khi có thể đưa ra các giá trị không mong muốn với phương thức này và phương thức làm tròn, ví dụ sprintf (5.5550, fmt = '% #. 2f') cho 5.55, không phải 5.56

Một cái gì đó như thế:

options(digits=2)

Định nghĩa tùy chọn chữ số:

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

Kiểm tra chức năng PrettyNum, định dạng

để có các số không trialling (ví dụ 123.1240) sprintf(x, fmt='%#.4g')

Nếu bạn thích các chữ số có nghĩa hơn các chữ số cố định thì lệnh Signif có thể hữu ích:

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

Hàm này formatC()có thể được sử dụng để định dạng một số đến hai chữ số thập phân. Hai vị trí thập phân được cho bởi hàm này ngay cả khi các giá trị kết quả bao gồm các số 0 ở cuối.

Tôi đang sử dụng biến thể này để in số thập phân K:

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

Lưu ý rằng các đối tượng số trong R được lưu trữ với độ chính xác gấp đôi , cung cấp cho bạn (khoảng) 16 chữ số thập phân chính xác - phần còn lại sẽ là nhiễu. Tôi cho rằng số hiển thị ở trên có lẽ chỉ là một ví dụ, nhưng nó dài 22 chữ số.

Có vẻ như tôi sẽ giống như

library(tutoR)
format(1.128347132904321674821, 2)

Mỗi một sự giúp đỡ trực tuyến .

nếu bạn chỉ muốn làm tròn một số hoặc một danh sách, chỉ cần sử dụng

round(data, 2)

Sau đó, dữ liệu sẽ được làm tròn đến 2 chữ số thập phân.