我试图在表格中读入R以获取此链接： http://www.insidestocks.com/optqte.asp?sym=ESU4&view=add&mode=d
我的R代码如下。由于某种原因，它无法识别表格。也许有一个更好的方案供我这样做？任何帮助将不胜感激！
library(XML)
theurl <- "http://www.insidestocks.com/optqte.asp?sym=ESU4&view=add&mode=d"
tables <- readHTMLTable(theurl)
n.rows <- unlist(lapply(tables, function(t) dim(t)[1]))
tables[[whictablesh.max(n.rows)]]
答案 0 :(得分：2)
相关的是第七个表格。
tables[[7]]
我们得到了
Strike Open High Low Close Change Volume Open Int Prem ($)
1 600.00C 1247.75 1243.20 1243.25s +9.75 0 202 62162.50
2 600.00P 0.05 0.01 0.01s unch 0 0 0.50
3 625.00C 1222.75 1218.20 1218.25s +9.75 0 202 60912.50
4 625.00P 0.05 0.01 0.01s unch 0 0 0.50
5 650.00C 1197.75 1193.20 1193.25s +9.75 0 0 59662.50