我试图从这个链接中删除一些数据:
http://finance.yahoo.com/quote/MSFT/key-statistics?p=MSFT
基本上,我想从td elements
获取div class="Mstart(a) Mend(a)"
。
library(rvest)
html <- read_html("http://finance.yahoo.com/quote/MSFT/key-statistics?p=MSFT")
cast <- html_nodes(html, "qsp-statistics .Fw(500) Ta(end)")
length(cast)
html_text(cast)
我真的认为这些HTML元素是正确的。
div data-test="qsp-statistics"
td class=".Fw(500) Ta(end)"
我想我没有正确解析HTML。有人可以跳进去帮帮忙吗?
完成后应该看起来像这样。
Market Cap (intraday) 5 472.17B
Enterprise Value 3 402.95B
Trailing P/E 29.08
Forward P/E 1 18.74
PEG Ratio (5 yr expected) 1 2.07
Price/Sales (ttm) 5.53
Price/Book (mrq) 6.72
Enterprise Value/Revenue 3 4.72
Enterprise Value/EBITDA 6 14.95
Financial Highlights
Fiscal Year
Fiscal Year Ends 30-Jun-16
Most Recent Quarter (mrq) 30-Sep-16
Profitability
Profit Margin 19.42%
Operating Margin (ttm) 24.27%
谢谢大家。