似乎无法识别数据

Question

我有这段代码可以尝试从 Kitco 网站获取黄金的每日现货价格。

library("rvest")
library("dplyr")
library("tidyr")
library("tibble")
maya <- read_html("http://www.kitco.com/market/")
mara <- html_nodes(maya, "table")
mata <- html_table(mara, fill=TRUE)
mana <- mata[32]

我似乎无法确定 "mana" 变量是什么。它不是数据框，我似乎无法通过键入

将其变成数据框

mala <- as_data_frame(mana)

甚至

mala <- as_data_frame(mana[1])

我错过了什么？

Answer 1

library(rvest)
library(tidyverse)
"http://www.kitco.com/market/" %>%
    read_html() %>%
    html_nodes("table") %>%
    html_table(fill = TRUE) %>%
    .[32] %>%
    as.data.frame()

as.data.frame 接受 "any R object" 而 as_data.frame 只接受矩阵或数据帧。如果你更喜欢整洁的方法和as_data_frame，你可以这样做：

    ...
    .[[32]] %>%
    as_data_frame()

这里我们提取了列表，现在我们的对象 class 是数据框，我们可以将其通过管道传输到 as_data_frame

似乎无法识别数据

Can't seem to identify data

r

rvest

tidyverse