如何在 R 中舍入包含一些字符变量的 data.frame

发布于01月30日

我有一个数据框，我希望对所有的数字进行四舍五入(准备导出).这一定很简单，但我遇到了一些问题，因为数据帧的某些位不是数字.例如，我想在下面的例子中将数字四舍五入到最接近的整数:

ID = c("a","b","c","d","e")
Value1 = c("3.4","6.4","8.7","1.1","0.1")
Value2 = c("8.2","1.7","6.4","1.9","10.3")
df<-data.frame(ID,Value1,Value2)

有人能帮我吗？我可以对单个列(例如round(df$Value1, 2))进行四舍五入，但我想对包含一些非数字列的整张表进行四舍五入.

推荐答案

首先确保数字列是数字:

ID = c("a","b","c","d","e")
Value1 = as.numeric(c("3.4","6.4","8.7","1.1","0.1"))
Value2 = as.numeric(c("8.2","1.7","6.4","1.9","10.3"))
df<-data.frame(ID,Value1,Value2, stringsAsFactors = FALSE)

然后，只对数字列进行四舍五入:

df[,-1] <-round(df[,-1],0) #the "-1" excludes column 1
df

  ID Value1 Value2
1  a      3      8
2  b      6      2
3  c      9      6
4  d      1      2
5  e      0     10