r - 如何控制 write.table() 输出中的小数位数？

Question

在处理数据时(例如，在 data.frame 中)，用户可以使用控制显示数字

options(digits=3) 

并像这样列出 data.frame。

ttf.all

当用户需要像这样将数据粘贴到 Excel 中时

write.table(ttf.all, 'clipboard', sep='\t',row.names=F)

忽略数字参数，并且数字不会四舍五入。

看到不错的输出

> ttf.all
  year V1.x.x V1.y.x ratio1 V1.x.y V1.y.y ratioR V1.x.x V1.y.x ratioAL V1.x.y V1.y.y ratioRL
1 2006    227    645   35.2     67    645   10.4    150    645    23.3     53    645    8.22
2 2007    639   1645   38.8    292   1645   17.8    384   1645    23.3    137   1645    8.33
3 2008   1531   3150   48.6    982   3150   31.2    755   3150    24.0    235   3150    7.46
4 2009   1625   3467   46.9   1026   3467   29.6    779   3467    22.5    222   3467    6.40

但 Excel(剪贴板)中的内容并未四舍五入。如何在write.table()中进行控制？

Answer 1

您可以使用函数format()，如下所示:

write.table(format(ttf.all, digits=2), 'clipboard', sep='\t',row.names=F)

format() 是一个通用函数，它具有许多类的方法，包括 data.frames。与round()不同，如果您的数据帧不全是数字，它不会抛出错误。有关格式选项的更多详细信息，请通过 ?format 参阅帮助文件