- 在线时间
- 5024 小时
- 最后登录
- 2022-11-28
- 注册时间
- 2009-4-8
- 听众数
- 738
- 收听数
- 1
- 能力
- 23 分
- 体力
- 77519 点
- 威望
- 96 点
- 阅读权限
- 255
- 积分
- 27182
- 相册
- 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 ® 企业矿工™。) {/ F1 ]. ^' I) T
简介:互联网已经成为一个有用的信息来源。通常是Web上的数据,我们要使用内的SAS,所以我们需要找到一种方式来获得这个数据。最好的办法是使用一个网络爬虫。 SAS提供几个从Web爬行和提取信息的方法。您可以使用基本的SAS数据步骤中的代码,或SAS文本矿工的%TMFILTER宏。虽然目前无法使用,SAS搜索管道将是一个功能强大的Web爬行产品,并提供更多的工具,网络爬行。每种方法都有其优点和缺点,所以取决于你想实现抓取的,它是最好对其进行审查。
V5 Z4 e9 y% M2 e3 e$ F) N3 i3 X; f/ ^" f/ [6 T- F
首先,重要的是要了解网络爬虫是如何工作的。你应该熟悉数据步骤的代码,宏,和SAS过程PROC SQL,然后再继续。+ c% Y2 N% v7 K. @
网络爬虫概述:一个网络爬虫是一个程序,一个或多个起始地址作为“种子URL”,下载网站这些URL相关的网页,在网页中包含的任何超链接提取,并递归地继续这些超链接标识下载Web页。从概念上讲,网络爬虫是很简单的。
3 |& I! B& ]( w, p6 Z( u$ F一个Web 履带式有四项职责:
3 N s2 U. i ] N" r1。从候选人中选择一个网址。+ G5 K; [2 u; c* }: i; t! k
2。它下载相关的Web页。9 H2 g1 T& `: r. D( ~
3。它提取物在网页中的URL(超链接)。/ M% m6 t" V/ z8 k) Z: I
4。它补充说,未曾遇到的候选集的URL0 ~' i8 C+ T+ ]/ z5 ?
方法1:在WEB SAS数据步骤中的代码履带式+ {! N8 m, H/ e6 j( U. U- K4 _
首先创建一个网址的网站的Web crawler将开始列表。# p4 G# ^: Y' q; U% @( m4 l- ^
data work.links_to_crawl;
, h- m) D+ h: e& K8 ], @length url $256 ;
5 M1 H) ]$ \2 c6 Ginput url $;6 Q3 S4 z/ b" x. n" V6 w- F$ M
datalines;
* ]- O* J) C. j, U9 A! n+ b5 @http://www.yahoo.com
% @( K% X4 i" A$ B; Q) f/ `http://www.madio.net
) `" K+ R& Z8 G* `2 Jhttp://www.google.com
i! P* L5 R3 M; b8 `1 _- n8 j;& _8 k3 L6 |5 t; m3 R+ G
run
% v& E, Q; H$ W' U为了确保我们不抓取相同的URL一次以上,持有环节已创建一个数据抓取。
. s9 u/ Q3 T; `" c h- I当Web数据集将在开始时是空的,但一个网站的网址将被添加到数据集履带式完成抓取该网站。5 f# x7 _1 j' j; M. M, Z
data work.links_crawled; 7 a" q3 V: ~, H4 B% Z* [
length url $256;
3 ~ L( c8 p9 i: lrun;( U2 |% c. Z. W+ x
现在我们开始爬行!该代码需要我们的 work.links_to_crawl数据集的第一个URL。在第一观察“_N_式1”,网址是投入名为 next_url 宏变量,所有剩余的URL放回我们的种子URL数据集,使他们在未来的迭代。
d1 f# Q }# o8 ^# D6 s$ ^5 @1 }; w/* pop the next url off */
# V! H, O8 I1 m; h; ^%let next_url = ;1 u! E. G' [# C# I
data work.links_to_crawl;
" j& E/ c$ e/ d% X& Q7 [* W; C* w" sset work.links_to_crawl;
. ^( X6 f- `/ Y, V' `4 X2 v- G Cif _n_ eq 1 then call symput(“next_url”, url); v# e: L2 }% {! U8 D
else output;
# h3 S1 P8 _% D4 T# W: Nrun;
0 C0 q8 A4 l* F9 ]- C现在,从互联网上下载的网址。创建一个文件名称 _nexturl 。我们让SAS知道它是一个URL 而且可以发现,AT&next_url,这是我们的宏观变量,它包含的网址我们从拉 work.links_to_crawl数据集。
& V' x1 z8 |, S/ u3 i. O* ]/* crawl the url */
3 C, h9 M/ ]6 u- Xfilename _nexturl url “&next_url”
$ i# h& I- \' q7 @/ D6 n建立后的文件名的URL参考,确定一个地方把我们下载的文件。创建另一个文件名引用所谓 htmlfilm的条目,并在那里把从 url_file.html收集到的信息。
+ x2 W8 f4 a- i, v, r5 X m! Q/* put the file we crawled here */
' `; V) ~6 t6 ]" j7 rfilename htmlfile “url_file.html”" b: o- \% W) {0 K# }& R% S/ c
接下来,我们通过数据的循环,把它写htmlfilm的条目文件名参考,并寻找更多的网址添加到我们的 work.links_to_crawl数据集。3 E1 S2 { c3 W% H" `- D
/* find more urls */ S/ Y* h) \; J" q0 D) J9 E5 S/ r. ^
data work._urls(keep=url);
7 M/ x9 q1 {2 ~& h/ y# alength url $256 ;
+ |6 f& R" B Q6 bfile htmlfile;
1 |( f# y& Z; M" G' s V- w% Xinfile _nexturl length=len;
% s! r: B! v+ O( J* Ainput text $varying2000. len;
7 O* ^# {% l' x; z3 _/ O5 ~0 C* e iput text;4 P/ j/ Y7 ~& G% P
start = 1;! d+ ]9 Q0 }( i
stop = length(text);- r6 R. G7 R7 v7 w1 f" T
使用正则表达式一个网站的网址,以帮助搜索。正则表达式的匹配方法文本字符串,如字,词,或字符模式。 SAS已经提供了许多强大的字符串功能。然而,正则表达式通常会提供一个更简洁的方式,操纵和匹配的文本.
; E, Y! u s6 v* C; P# Jif _n_ = 1 then do;: M6 J3 i: q* ?; c/ w" x
retain patternID;7 g" F* L @8 V, A; a. w
pattern = ‘/href=”([^"]+)”/i’;
" T0 ]/ K, X# x# c6 qpatternID = prxparse(pattern);2 H( D/ e) P/ ]" J( b4 j8 L$ I
end: @$ F) {4 S0 L( S! Y
首次观察到,创建一个patternID将保持整个数据步运行。寻找的模式是: “/href=”([^"]+)”/i’”.,这意味着我们正在寻找字符串“HREF =”“,然后再寻找任何字符串,是至少有一个字符长,不包含引号(“),并结束在引号(”)。在’我’ 目的的手段使用不区分大小写的方法,以配合我们的正则表达式。2 Z# F9 k$ E6 P- L) V4 m) u% `
As a result, the Web crawler will find these types of strings:
: S7 r$ W# T% Whref=”sgf/2010/papers.html” 5 [$ [4 W0 s3 q$ P. _ k0 Q6 O
href=”www.yahoo.com”
0 Y% O2 z/ \6 j- g& W; LHREF=”www.google.com”
# l* _1 \& \0 ^; S# C* \hReF=”http://www.madio.net”; ^1 c: j ~+ A4 d, F8 s
现在正则表达式匹配的一个网站上的文字。 PRXNEXT需要五个参数:正则表达式我们要寻找,寻找开始寻找正则表达式的开始位置,结束位置停止正则表达式,一旦发现字符串中的位置,而字符串的长度,如果发现的位置将是0,如果没有找到字符串。 PRXNEXT也改变了开始的参数,使搜索重新开始后的最后一场比赛是发现。
2 y* N o; T3 \2 Kcall prxnext(patternID, start, stop, text, position, length);
: d& I( y' G: Y/ m% j& l代码中的循环,在网站上找到的所有环节显示的文本。
% t M/ k1 Y1 Y( b' G8 [do while (position ^= 0);* B8 `# e6 w: w, V
url = substr(text, position+6, length-7);
5 l4 [% F3 R* S& {$ youtput;' T4 ?- R' y( _0 T( x/ R
call prxnext(patternID, start, stop, text, position, length);7 C) i$ }( Z7 R3 e( o8 x% ^
end;
7 D$ i1 u: R* u" g/ ^& e2 b$ ~6 Wrun;
" ]! Q8 y6 L0 t6 ], \5 w: R9 X如果代码发现一个网址,它会检索唯一的URL的一部分,启动后的第一个引号。例如,如果代码中发现的HREF =“http://www.new-site.com”,那么它应该保持 http://www.new-site.com 。使用 substr到删除前的6个字符和最后一个字符的URL的其余部分输出的work._urls 数据集。现在,我们插入的URL代码只是以跟踪抓取到一个数据集名为 work.links_crawled 我们已经和确保我们不再次浏览有。+ m$ Q. U1 F9 E) r
/* add the current link to the list of urls we have already crawled */ * f& v7 S3 x% K- I
data work._old_link;
9 U$ n3 A8 G5 C5 ~0 r2 Murl = “&next_url”;1 b. A/ C2 t" J+ ~% a0 \
run;
; N5 b% T+ c4 ~+ S" g5 A' Xproc append base=work.links_crawled data=work._old_link force;
0 A: l9 d) a% `5 Urun;' }. Y4 E$ Y m _2 U/ c i
下一步是在数据集 work._urls 的过程中发现的网址列表,以确保:
) ~% R4 Y) y# ?& u3 b% M/ v4 S1。我们尚未抓取他们,换句话说URL是不是在 work.links_crawled)。
- Z7 Y5 Y4 y9 u! l; {" v" y2。我们没有排队抓取的URL(网址换句话说,是不是在work.links_to_crawl )。
& @5 d6 R# ^2 x: C, }& _. H/*2 |5 G1 S6 y. W8 v" E% b5 M
* only add urls that we have not already crawled: W0 r9 ]3 f& J
* or that are not queued up to be crawled
; t8 g; L( L5 ]! n9 a* C" e! j0 T*
: E: @) P7 t1 @% G*/
1 e! I i. h# ]1 ~& Xproc sql noprint;
; i! @. W% \% E; U" |% g7 K+ acreate table work._append as
# S. y/ ]: t& Z* Z3 o! @2 ]select url
- m0 s4 ?) F# D5 [& Jfrom work._urls
3 K7 p \; w+ D6 a! ]7 Y Vwhere url not in (select url from work.links_crawled)3 a! v/ |8 i& ^' j/ n% o% {
and url not in (select url from work.links_to_crawl);* G- W9 e# T1 X: X9 K
quit;
' d9 S3 h e6 O7 T2 b% C然后,我们添加网址还没有被抓取,而不是已经排队 work.links_to_crawl数据集。
3 q9 X2 [7 A+ L. c/* add new links */3 }6 J0 v& A" W1 k
proc append base=work.links_to_crawl data=work._append force;
4 r( C7 P7 ~0 x2 j" ?$ c6 e( j `run;- ]0 O) I1 k/ n0 w
此时的代码循环回到开始劫掠 work.links_to_crawl数据集的下一个URL。. R$ H! b& L. |6 D
|
zan
|