3

我正在用 R 为 C++ 中的程序编写功能测试。典型的输出文件有一些列为“字符串”，其他列为“双”。然后，我想将diffR 返回的预期输出文件与 C++ 返回的观察到的输出文件进行比较。

在伪 C++ 中，我只是这样做：

stringstream ssTxt;
ssTxt.precision (7);
ssTxt.setf (ios::scientific);
for(i=0; i<10; ++i){
  ssTxt << names[i] << " " << values[0][i] << " " << values[1][i] << " " << values[2][i] << endl;
  // write in file and clear ssTxt
}

这是一个典型的输出：

item1 2.8200000e-01 500 4.1846912e-04

在 R 中，我这样做：

results <- data.frame(name="item1", val1=0.282, val2=500, val3=0.00041846912873)
write.table(x=format(results, digits=8, nsmall=7, scientific=TRUE), file=...)

这是对应于相同数据的输出：

item1 2.82e-01 500 4.1846912e-04

如您所见，它几乎可以工作，但 R 不会在“2.82”之后添加尾随 0。我更喜欢更改 R 代码而不是 C++ 代码。那么我该怎么做呢？

4

1 回答 1

6

你试过了吗
sprintf？formatC

具体来说，我认为

sprintf("%e", 2.82e-01)

should do the trick but as mentioned above have a look at help(sprintf), which describes the various formatting capabilities of this function ...

于 2012-12-15T21:51:37.917 回答