#读取中国财经网今日人民币外汇牌价表
library(rvest)
words <- read_html("http://app.finance.china.com.cn/forex/rmb/")
table<-html_table(html_nodes(words, "table"),fill = TRUE,
#读取中国财经网今日人民币外汇牌价表
library(rvest)
words <- read_html("http://app.finance.china.com.cn/forex/rmb/")
table<-html_table(html_nodes(words, "table"),fill = TRUE,