函数write.csv返回错误
问题描述:
R函数write.csv
返回错误。函数write.csv返回错误
这是我想写的data.frame:
> VaRStats
A Index B Index C Index
Daily VaR -0.65006 -0.50391 -0.5557
Daily CVaR -0.75679 -0.57491 -0.65174
5 Days VaR -1.4204 -1.0077 -1.2269
这里的类VaRStats
:
> class(VaRStats)
[1] "data.frame"
而这里的VaRStats
的dput()
输出:
> dput(VaRStats)
structure(list(`JWFXA Index` = structure(list(`NA` = -0.650061101980277,
`NA` = -0.756791819719978, `JWFXA Index` = -1.42035638029947), .Names = c(NA,
NA, "JWFXA Index")), `CCYT1 Index` = structure(list(`NA` = -0.503912574910245,
`NA` = -0.574907003405759, `CCYT1 Index` = -1.00773735259718), .Names = c(NA,
NA, "CCYT1 Index")), `FX Multistrategy Index` = structure(list(
`NA` = -0.555699685451229, `NA` = -0.651738541799373, `FX Multistrategy Index` = -1.22688572580144), .Names = c(NA,
NA, "FX Multistrategy Index"))), .Names = c("JWFXA Index", "CCYT1 Index",
"FX Multistrategy Index"), row.names = c("Daily VaR", "Daily CVaR",
"5 Days VaR"), class = "data.frame")
的通过产生的错误功能
> write.csv(VaRStats, "SummaryStats.csv")
Error in write.table(x, file, nrow(x), p, rnames, sep, eol, na, dec, as.integer(quote), :
type 'list' not implemented in 'EncodeElement'
这怎么可能?
答
在这里,您可以简单地这样做:
write.csv(as.matrix(dd), "SummaryStats.csv")
这工作,因为所有你列是数字的。
read.csv("SummaryStats.csv")
X JWFXA.Index CCYT1.Index FX.Multistrategy.Index
1 Daily VaR -0.6500611 -0.5039126 -0.5556997
2 Daily CVaR -0.7567918 -0.5749070 -0.6517385
3 5 Days VaR -1.4203564 -1.0077374 -1.2268857
EDIT
该解决方案是正确的。
,如果你有在你一个字符串列表:
dd[1,1] <- 'a'
as.matrix(dd)
JWFXA Index CCYT1 Index FX Multistrategy Index
Daily VaR "a" -0.5039126 -0.5556997
Daily CVaR -0.7567918 -0.574907 -0.6517385
5 Days VaR -1.420356 -1.007737 -1.226886
但使用as.numeric
将失败或至少转换为NA
sapply(dd, as.numeric)
JWFXA Index CCYT1 Index FX Multistrategy Index
[1,] NA -0.5039126 -0.5556997
[2,] -0.7567918 -0.5749070 -0.6517385
[3,] -1.4203564 -1.0077374 -1.2268857
Warning message:
+0
不错(重要)跟进! – Arun 2013-03-15 14:36:16
答
你可以给一个可重复的例子,我的猜测是,你有row.names
和col.names
的问题,还可以使用write.table
,这样就可以将所有你想要的参数
编辑:我有同样的问题看在str
!!!
R) str(test)
'data.frame': 3 obs. of 3 variables:
$ JWFXA Index :List of 3
..$ NA : num -0.65
..$ NA : num -0.757
..$ JWFXA Index: num -1.42
$ CCYT1 Index :List of 3
..$ NA : num -0.504
..$ NA : num -0.575
..$ CCYT1 Index: num -1.01
$ FX Multistrategy Index:List of 3
..$ NA : num -0.556
..$ NA : num -0.652
..$ FX Multistrategy Index: num -1.23
你的数据不是COMMUN data.frame
@juba具有良好的修复,利用lapply
每个列表转换为numeric
矢量
工作正常,我...必须有缺少一块你不提供。 – 2013-03-15 13:53:15
这里工作也很好。也许你可以在你的'VaRStats'对象上复制/粘贴'dput'? – juba 2013-03-15 13:54:21
我最近有一个类似的奇怪的错误 - 它通过简单地重新启动R被修复。 – alexwhan 2013-03-15 13:56:02