R：创建一个表格，其中单元格在 rbind 后有 1 或 0 位小数

Question

我正在 R 中创建一个表格。某些行中的值应该有 0 个小数位（例如人数），而其他行中的值应该有 1 个小数位（例如人口百分比）。

我有数据框，然后使用R中的round函数round函数创建两个表-round0（小数点后0位）和round1（小数点后1位）。

round1<-round(prof.table[-c(2:3),], 1)
round0<-round(prof.table[2:3,], 0)

prof.table<-rbind(round0, round1)

将它们组合后，我希望round0 表中的值小数点后为零，而round1 中的值小数点后1 位。但是，在 rbind 之后，所有单元格中的值都有 1 个小数位，所以我的整数显示为 nnn.0。如何从整数中删除这个多余的小数位？

Answer 1

您正在尝试将 numeric 值与 integer 组合。一个向量（或 data.frame 列）只能有一个类。它要么将数字强制为整数，要么将整数强制为数字。鉴于此选择，后者更可取，因为将2 转换为2.0000 不会丢失数据。

这将有助于解释类的差异：What's the difference between integer class and numeric class in R

一个例子：

# create an integer vector x (0 decimal places) & numeric vector y (>0 decimal places)
x <- as.integer(1:3)
y <- runif(3)

# check their classes to confirm
class(x)
class(y)

# bind them together, and view class
z <- c(x, y)
z
class(z)

Answer 2

由于我需要将数据显示在表格中，因此我按照@Rui 的建议将数据强制转换为字符格式，并感谢@Jonny 提示向量只能是一个类：

#Round certain variables to one decimal point
round1<-round(prof.table[-c(2:3),], 1) 

#set as character
round1$`V1`<-as.character(round1$`V1`) 
round1$`V2`<-as.character(round1$`V2`) 

#Round others to zero decimal point
round0<-round(prof.table[2:3,], 0) 

#set them as character
round0$`V1`<-as.character(round0$`V1`) 
round0$`V2`<-as.character(round0$`V2`) 

#combine into data frame
prof.table<-rbind(round0, round1)