尝试将数据保存为CSV。没有错误，但没有保存

Question

这样可以很好地删除数据。

library(XML)
require(reshape2)

# URL of interest:
mps <- "http://stockreports.nasdaq.edgar-online.com/aapl.html"
# parse the document for R representation:
mps.doc <- htmlParse(mps)
# get all the tables in mps.doc as data frames
mps.tabs <- readHTMLTable(mps.doc)

mat <- melt(mps.tabs)

mps.tabs看起来不错。但我无法将其保存为CSV文件。我不断得到并且错误。

mat <- melt(mps.tabs)
write.csv(mat, file = "C:/Users/rshuell001/Desktop/MyData.csv")

没有任何内容保存到我的CSV中。没有错误信息;根本不值一提。有人能让我知道这里有什么问题吗？

Answer 1

我找到了办法！

library(XML)
stocks = "http://stockreports.nasdaq.edgar-online.com/aapl.html"
stocks.table = readHTMLTable(airline, header=T, which=1,stringsAsFactors=F)
write.csv(stocks.table, file = "C:/Users/rshuell001/Desktop/MyData.csv")