Chuyển đổi dấu chấm dấu phẩy trong số

Question

Nếu tôi có một khung dữ liệu:

a b 
2.4 4.6 
3.6 66.7 
5.8 44.6 

Cả a và b là số.

Tôi muốn chuyển đổi "." đến "" với

df$a <- as.numeric(gsub(".", ",", df$a)) 

nhưng tôi luôn có được

Warning message:NAs introduced by coercion 

và tất cả các giá trị được chuyển đổi sang NA. Tại sao?

Answer 1

Ý tưởng ban đầu của bạn gần như chính xác, chỉ biểu thức chính quy là sai, vì . khớp với bất kỳ biểu tượng nào. Bạn cần một cái gì đó như (điều này sẽ chuyển đổi vector số thành một vector ký tự)

df$a <- gsub("\\.", ",", df$a) 

Bạn cũng có thể thay đổi đầu ra từ in R, vẽ và hành động của hàm as.character. Bạn thay đổi nó từ mặc định của nó với:

options(OutDec= ",")

Và tùy chọn khác là sử dụng format chức năng.

format(df, decimal.mark=",") 

Tôi cho rằng bạn quan tâm đến cách thức con số được in (đầu ra), vì trong nội bộ số được lưu giữ như một số dấu chấm động có độ chính xác gấp đôi (Cập nhật nhờ bình luận bằng @digemall). Ngoài ra, trừ khi đối với một số chức năng như read.table, nó được xác định cụ thể rằng dấu phân cách thập phân là ,, không thể thực hiện được cách khác, bởi vì theo mặc định , được sử dụng để tách đối số hàm.

Và NA được giới thiệu chính xác vì lý do đó (ngoài regex không chính xác).

df$a <- as.numeric(gsub("\\.", ",", df$a)) 

Theo trình phân tích cú pháp mặc định không biết rằng , được sử dụng làm dấu tách thập phân.

Answer 2

Nếu bạn chỉ muốn dấu phẩy để in, bạn có thể sử dụng định dạng:

data <- data.frame(a=rnorm(5), b=rnorm(5)) 
format(data, decimal.mark=",") 
       a   b 
1 1,058878354 0,1812629 
2 1,026163906 -0,6666500 
3 1,538423889 -1,4206752 
4 -0,561585916 -0,4729558 
5 -0,004685406 1,0744514 

Tuy nhiên điều này sẽ chỉ thay đổi cách họ nhìn. Bạn sẽ vẫn phải sử dụng dấu chấm trong gán.

Answer 3

Bạn đang sử dụng OSX hoặc Windows hoặc ...?

Để thay đổi biểu diễn, bạn muốn xem thông số LC_NUMERIC, mặc dù tài liệu R cảnh báo rằng việc thay đổi điều này có thể khiến R hoạt động lạ (khó sử dụng , làm số thập phân khi nó được sử dụng để xác định danh sách ...)

> Sys.getlocale("LC_NUMERIC") 
[1] "C" 
> a=c(1.01,2.01) 
> a 
[1] 1.01 2.01 
> Sys.setlocale("LC_NUMERIC", "de_DE") # this is OSX syntax 
> a 
[1] 1,01 2,01 

Có thể an toàn hơn chỉ để sống với nó!