- 在线时间
- 5024 小时
- 最后登录
- 2022-11-28
- 注册时间
- 2009-4-8
- 听众数
- 738
- 收听数
- 1
- 能力
- 23 分
- 体力
- 77390 点
- 威望
- 96 点
- 阅读权限
- 255
- 积分
- 27143
- 相册
- 1
- 日志
- 14
- 记录
- 36
- 帖子
- 4293
- 主题
- 1341
- 精华
- 15
- 分享
- 16
- 好友
- 1975

数学中国总编辑
TA的每日心情 | 衰 2016-11-18 10:46 |
|---|
签到天数: 206 天 [LV.7]常住居民III 超级版主
 群组: 2011年第一期数学建模 群组: 第一期sas基础实训课堂 群组: 第二届数模基础实训 群组: 2012第二期MCM/ICM优秀 群组: MCM优秀论文解析专题 |
万维网过多的信息,股票报价,电影评论,市场价格趋势话题,几乎所有的东西,可以发现在点击一个按钮。在分析数据中发现,许多SAS用户感兴趣在网络上,但你得到这个数据的SAS环境呢?有很多方法,如 SAS数据步骤中的代码在设计你自己的网络爬虫或利用SAS%TMFILTER宏 ® 文本挖掘。在本文中,我们将审查一个网络爬虫的总体架构。我们将讨论获得网站的方法到SAS的信息,以及审查内部所谓的SAS搜索从实验项目的实验代码管道。我们也将提供咨询如何轻松定制一个网络爬虫,以适应个性化需求,以及如何具体的数据导入到SAS ® 企业矿工™。
3 g# h/ t/ t5 n6 d& H简介:互联网已经成为一个有用的信息来源。通常是Web上的数据,我们要使用内的SAS,所以我们需要找到一种方式来获得这个数据。最好的办法是使用一个网络爬虫。 SAS提供几个从Web爬行和提取信息的方法。您可以使用基本的SAS数据步骤中的代码,或SAS文本矿工的%TMFILTER宏。虽然目前无法使用,SAS搜索管道将是一个功能强大的Web爬行产品,并提供更多的工具,网络爬行。每种方法都有其优点和缺点,所以取决于你想实现抓取的,它是最好对其进行审查。6 u9 i) {( {1 F6 q0 ?
. E. Z# j* H8 J- } W0 z! x首先,重要的是要了解网络爬虫是如何工作的。你应该熟悉数据步骤的代码,宏,和SAS过程PROC SQL,然后再继续。# y* B |' `) @' @ n
网络爬虫概述:一个网络爬虫是一个程序,一个或多个起始地址作为“种子URL”,下载网站这些URL相关的网页,在网页中包含的任何超链接提取,并递归地继续这些超链接标识下载Web页。从概念上讲,网络爬虫是很简单的。
% u! |6 ]# V6 O: W, r" P* t一个Web 履带式有四项职责:
9 I7 k% Y# b. ~. w6 n6 U5 m: U1。从候选人中选择一个网址。
9 v- ?0 [1 o! g v* I2。它下载相关的Web页。
1 p8 \% c3 J+ y& R, K: |1 e9 d3。它提取物在网页中的URL(超链接)。, {" G: e1 Q R0 |: i
4。它补充说,未曾遇到的候选集的URL, L3 F) ]/ v) U3 W |* o
方法1:在WEB SAS数据步骤中的代码履带式
+ S8 J: X; M$ o/ B# h首先创建一个网址的网站的Web crawler将开始列表。/ g* B% B+ C. |! H+ z4 K
data work.links_to_crawl;
% e- l/ C2 b- d. K1 N% D" Q$ q: ^3 Llength url $256 ;
" | l1 i& f# N/ q: |$ finput url $;
0 G$ `3 ?. E( S E7 ^' j. g4 y6 Tdatalines;# ~* ?6 ~- J( |
http://www.yahoo.com
5 D- A$ v; A+ k) w. H1 J" @) dhttp://www.madio.net
2 o( G- L1 I+ @/ l: mhttp://www.google.com5 u0 d) X q* ~3 h, U
;3 E+ Y- N3 x5 F! D5 d( {
run
) X8 O/ C& l: x1 L4 E% y为了确保我们不抓取相同的URL一次以上,持有环节已创建一个数据抓取。
6 w8 ?# |( t7 q" @( F2 T# L+ e H当Web数据集将在开始时是空的,但一个网站的网址将被添加到数据集履带式完成抓取该网站。
- n/ ?' U+ Y6 E& Q3 {) s. q$ o) ndata work.links_crawled;
/ C9 O) J' _0 F B& B) M0 Llength url $256;
( V4 G O0 W2 J: d8 ]/ \run;, U& u* X) f v. [2 |, ~$ ?6 G7 p2 Q
现在我们开始爬行!该代码需要我们的 work.links_to_crawl数据集的第一个URL。在第一观察“_N_式1”,网址是投入名为 next_url 宏变量,所有剩余的URL放回我们的种子URL数据集,使他们在未来的迭代。
# Q* [5 D7 |0 f# w/* pop the next url off */
0 F' K1 ?' _% R4 N" U, P" Z, P%let next_url = ;$ h @9 E0 ]- M+ l& L7 R8 w( g
data work.links_to_crawl;
+ f' \. {6 G# i. [9 K& ?set work.links_to_crawl;5 i/ q: W' p& {+ @) b( w
if _n_ eq 1 then call symput(“next_url”, url);
1 m5 O7 ?4 `6 o& X" Yelse output;' S3 x" r3 U5 P' O# Q" i& M* {
run;
8 j" C' o/ R" S现在,从互联网上下载的网址。创建一个文件名称 _nexturl 。我们让SAS知道它是一个URL 而且可以发现,AT&next_url,这是我们的宏观变量,它包含的网址我们从拉 work.links_to_crawl数据集。! [- w; p+ U& Z7 M) Q
/* crawl the url */% T1 E. M- a/ }$ q& J% B; _0 G) A
filename _nexturl url “&next_url”3 @; b$ U# Z8 O
建立后的文件名的URL参考,确定一个地方把我们下载的文件。创建另一个文件名引用所谓 htmlfilm的条目,并在那里把从 url_file.html收集到的信息。" G9 e0 q1 r8 Q9 w- D
/* put the file we crawled here */
: k1 e3 u0 C0 B1 j4 nfilename htmlfile “url_file.html”8 {2 d ^7 i' \" ^% C) X
接下来,我们通过数据的循环,把它写htmlfilm的条目文件名参考,并寻找更多的网址添加到我们的 work.links_to_crawl数据集。
" z0 E B# B3 `/* find more urls */ * a, c$ g) E( Z) o. ?
data work._urls(keep=url);
% U+ D/ Z+ g: j. W# hlength url $256 ;
, O8 e( x" P: rfile htmlfile;$ c4 P. q# c+ I- X
infile _nexturl length=len;; s+ O5 i) F$ c, b2 o5 r
input text $varying2000. len;8 \7 e/ ]' r3 k0 U3 O( l
put text;/ K1 I7 }6 B5 y9 v( r2 V2 x
start = 1;( @* g5 U1 c6 P
stop = length(text);
3 i0 }5 j& `4 X' Z3 p D) H1 R% y使用正则表达式一个网站的网址,以帮助搜索。正则表达式的匹配方法文本字符串,如字,词,或字符模式。 SAS已经提供了许多强大的字符串功能。然而,正则表达式通常会提供一个更简洁的方式,操纵和匹配的文本.
, t) Z8 w7 J% b' ~$ I% s, N; cif _n_ = 1 then do;/ g1 ?$ }! k% P8 @; q
retain patternID;, q6 h& ]1 K o' M! [* `
pattern = ‘/href=”([^"]+)”/i’;; S" m: O2 n$ L9 ?( o- @4 ?
patternID = prxparse(pattern);1 o2 t0 x1 y) M
end
( a( W6 q0 g t9 z" I4 {5 {首次观察到,创建一个patternID将保持整个数据步运行。寻找的模式是: “/href=”([^"]+)”/i’”.,这意味着我们正在寻找字符串“HREF =”“,然后再寻找任何字符串,是至少有一个字符长,不包含引号(“),并结束在引号(”)。在’我’ 目的的手段使用不区分大小写的方法,以配合我们的正则表达式。1 z/ S( @: x" Z
As a result, the Web crawler will find these types of strings:" v k2 {" q8 P# S# [4 F% |
href=”sgf/2010/papers.html” ' Q M \3 J% d8 N
href=”www.yahoo.com”
/ [, u f$ C$ u- y# H/ FHREF=”www.google.com”8 ~% ?' ~) I( q) ^+ j
hReF=”http://www.madio.net”
1 y2 R# o4 G* L+ |2 l% R9 z1 E# }现在正则表达式匹配的一个网站上的文字。 PRXNEXT需要五个参数:正则表达式我们要寻找,寻找开始寻找正则表达式的开始位置,结束位置停止正则表达式,一旦发现字符串中的位置,而字符串的长度,如果发现的位置将是0,如果没有找到字符串。 PRXNEXT也改变了开始的参数,使搜索重新开始后的最后一场比赛是发现。 U% ]5 [6 a3 \" Z( o
call prxnext(patternID, start, stop, text, position, length);2 Q8 Z$ ?+ l6 E5 V+ i* ]8 ?
代码中的循环,在网站上找到的所有环节显示的文本。% ?" L; t' c7 ]( F, U! [
do while (position ^= 0);
* C, q" H8 |" m$ Z6 xurl = substr(text, position+6, length-7);8 U+ E; g8 f2 C! s& V( N
output;
# Q8 B, N1 Q% j, {+ z/ D' w( Q- N- acall prxnext(patternID, start, stop, text, position, length);
; _3 U/ v( h% ~5 [4 e; h9 U! hend;
9 V/ t3 X8 B& H2 @: Q; V, Y* M5 irun;
3 d( Y9 E/ N( ^6 E1 n' s/ `! V/ n如果代码发现一个网址,它会检索唯一的URL的一部分,启动后的第一个引号。例如,如果代码中发现的HREF =“http://www.new-site.com”,那么它应该保持 http://www.new-site.com 。使用 substr到删除前的6个字符和最后一个字符的URL的其余部分输出的work._urls 数据集。现在,我们插入的URL代码只是以跟踪抓取到一个数据集名为 work.links_crawled 我们已经和确保我们不再次浏览有。' W1 i$ W1 x1 H
/* add the current link to the list of urls we have already crawled */ m. v9 W* I- h; I9 z; b
data work._old_link;
- e4 A+ k- k4 K4 murl = “&next_url”;
' a3 L- b) ?% }7 [run;
8 s2 A8 \6 ?3 C7 F! I9 m- Aproc append base=work.links_crawled data=work._old_link force;, B. e2 \" \: X, e
run;/ K/ Z, \/ O% n) n+ ^
下一步是在数据集 work._urls 的过程中发现的网址列表,以确保:
- P: T! P, s, X# j1。我们尚未抓取他们,换句话说URL是不是在 work.links_crawled)。4 W7 E1 t6 O# R7 \' V1 X. b
2。我们没有排队抓取的URL(网址换句话说,是不是在work.links_to_crawl )。
$ Z. l. |5 |- Y/* @) v1 V/ p- S4 i4 Z# F4 D
* only add urls that we have not already crawled
Z) S; m( i6 S; n1 `* or that are not queued up to be crawled
9 g5 n; Q) ]7 p& r9 e*
6 u [" W. p* q/ l: i/ \* O*/
5 I; i$ h1 J. a' a3 \$ Cproc sql noprint;
8 a: G0 F/ ~5 B1 Acreate table work._append as7 k" q" @8 Z9 \
select url
$ |0 w$ q2 K: G+ q/ afrom work._urls
, s% J1 B7 k6 o8 f- w: }where url not in (select url from work.links_crawled)
4 _. a' \4 Y2 q6 H) @! ]* z7 Q+ }5 ^and url not in (select url from work.links_to_crawl);
5 T k7 M" x& Y- F& squit;# |8 |% t; L. L* c* w& u4 [
然后,我们添加网址还没有被抓取,而不是已经排队 work.links_to_crawl数据集。
& p7 m' m7 V J- c; y/* add new links */, @: `( ?& N. `/ D
proc append base=work.links_to_crawl data=work._append force;+ l8 C/ g1 _. @$ x7 |
run;
- s& ?6 C+ J) a7 [& {) Q! ^% h: V; H此时的代码循环回到开始劫掠 work.links_to_crawl数据集的下一个URL。3 z0 B6 I, X2 ]; Y( Q
|
zan
|