Fatal编程技术网
  • r/
  • 对数字进行四舍五入并保持R中的科学记数法

对数字进行四舍五入并保持R中的科学记数法

r

对数字进行四舍五入并保持R中的科学记数法,r,R,我有一个数据框，我希望四舍五入到小数点后两位，因为它目前是16位。我是这样做的 ##rounding numbers p32_us1rounding = read.csv("p32_us1_ff6.csv") #print(p32_us1rounding) dfp32_us1 = data.frame(p32_us1rounding[-1]) dfp32_us1 <- round(dfp32_us1, digits = 2) write.csv(dfp32_u

我有一个数据框，我希望四舍五入到小数点后两位，因为它目前是16位。我是这样做的

##rounding numbers

p32_us1rounding = read.csv("p32_us1_ff6.csv")

#print(p32_us1rounding)

dfp32_us1 = data.frame(p32_us1rounding[-1])

dfp32_us1 <- round(dfp32_us1, digits = 2)

write.csv(dfp32_us1, "32 Fama French for US Market on or before 01-08-2005.csv")

##四舍五入数字
p32_us1rounding=read.csv（“p32_us1_ff6.csv”）
#打印（p32_US1环绕）
dfp32_us1=数据帧（p32_us1环绕[-1]）

dfp32_us1您必须将数字转换为字符串以使用不同的格式。然后只需使用
write.csv
中的
quote=FALSE
参数，以防止它们被引号包围：


set.seed(42)
x <- runif(100)*100/39
x <- matrix(x, 10, 10)
y <- ifelse(x > .1, sprintf("%.2f", x), sprintf("%.2e", x))
write.csv(y, "Test.csv", quote=FALSE, row.names=FALSE)
cat(readLines("Test.csv", 4), sep="\n")
# V1,V2,V3,V4,V5,V6,V7,V8,V9,V10
# 2.35,1.17,2.32,1.89,0.97,0.85,1.73,0.11,1.49,1.71
# 2.40,1.84,0.36,2.08,1.12,0.89,2.52,0.36,0.40,6.13e-04
# 0.73,2.40,2.54,1.00,9.60e-02,1.02,1.95,0.55,0.92,0.53



set.seed（42）

你能提供一个样本数据集吗？