0

よろしくお願いいたします。米国国勢調査の Web サイト (下記) で、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() システムで FAQ を見ることができるはずです。私のマシンでは、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 に答える