0

预先感谢您的帮助。在美国人口普查网站（下）上，我正在寻找第 4 表第 6 行第 3 列中的元素。

这是我正在编写的代码：

complete_URL <- "http://quickfacts.census.gov/qfd/states/01/01011.html"
temp_TBL <- readHTMLTable(complete_URL, which=4)
business_number_vector <- temp_TBL[6,3]
print(business_number_vector)

我得到的是：

[1] 417
Levels: 417

我想要的是：

[1] 417

再次感谢您的帮助！

4

2 回答 2

1

它实际上是 R-FAQ 7.10：

您应该能够使用 R-help() 系统查看常见问题解答。在我的机器上，它设置为 html：

http://127.0.0.1:23603/doc/manual/R-FAQ.html#How-do-I-convert-factors-to-numeric_003f

7.10 如何将因子转换为数值？

当将数值数据读入 R 时（通常是读入文件时），它们可能会作为因子出现。如果 f 是这样一个因子对象，您可以使用

as.numeric(as.character(f)) 来取回数字。更有效但更难记住的是

as.numeric(levels(f))[as.integer(f)] 在任何情况下，不要为手头的任务直接调用 as.numeric() 或他们的喜欢（as.numeric() 或 unclass() 给内部代码）。

于 2013-03-28T00:46:02.160 回答
0

Arun 和 Dason 提供了以下答案：

阿伦推荐：

complete_URL <- "http://quickfacts.census.gov/qfd/states/01/01011.html"
temp_TBL <- readHTMLTable(complete_URL, which=4)
business_number_vector <- as.numeric(as.character(temp_TBL[6,3]))
print(business_number_vector)

见第 3 行，在哪里as.numeric(as.character())帮了大忙！

达森推荐：

complete_URL <- "http://quickfacts.census.gov/qfd/states/01/01011.html"
temp_TBL <- readHTMLTable(complete_URL, which=4)
business_number_vector <- temp_TBL[6,3]
business_number_vector <- as.numeric(levels(business_number_vector)[business_number_vector])
print(business_number_vector)

请参阅第 4 行，其中as.numeric(levels(business_number_vector)[business_number_vector])也有很大帮助！

于 2013-03-27T23:07:03.953 回答