- 在线时间
- 5024 小时
- 最后登录
- 2022-11-28
- 注册时间
- 2009-4-8
- 听众数
- 738
- 收听数
- 1
- 能力
- 23 分
- 体力
- 77815 点
- 威望
- 96 点
- 阅读权限
- 255
- 积分
- 27271
- 相册
- 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 ® 企业矿工™。
; C; v/ v4 X- [& A0 |/ S2 I简介:互联网已经成为一个有用的信息来源。通常是Web上的数据,我们要使用内的SAS,所以我们需要找到一种方式来获得这个数据。最好的办法是使用一个网络爬虫。 SAS提供几个从Web爬行和提取信息的方法。您可以使用基本的SAS数据步骤中的代码,或SAS文本矿工的%TMFILTER宏。虽然目前无法使用,SAS搜索管道将是一个功能强大的Web爬行产品,并提供更多的工具,网络爬行。每种方法都有其优点和缺点,所以取决于你想实现抓取的,它是最好对其进行审查。2 z% j5 L* T1 k# `$ F; U# v
; f/ t0 x; {, p
首先,重要的是要了解网络爬虫是如何工作的。你应该熟悉数据步骤的代码,宏,和SAS过程PROC SQL,然后再继续。: o. R$ E7 m/ N, ]' K
网络爬虫概述:一个网络爬虫是一个程序,一个或多个起始地址作为“种子URL”,下载网站这些URL相关的网页,在网页中包含的任何超链接提取,并递归地继续这些超链接标识下载Web页。从概念上讲,网络爬虫是很简单的。
6 M T2 F( h8 F5 H一个Web 履带式有四项职责:2 R: c1 q9 a2 ?* `. B( k6 S; `
1。从候选人中选择一个网址。) L4 x7 Q( w. }: L
2。它下载相关的Web页。( Y& D( V3 V$ s' b! g
3。它提取物在网页中的URL(超链接)。( |- ]* X" }/ B( B' Z1 }7 c
4。它补充说,未曾遇到的候选集的URL
Q; I* Y, \- d9 I$ t方法1:在WEB SAS数据步骤中的代码履带式
q% W! c$ V5 L5 m首先创建一个网址的网站的Web crawler将开始列表。& [* A5 {0 P# r, F; ?* q/ R
data work.links_to_crawl;
# h* }5 I+ R: Clength url $256 ;
% j; G+ U5 U- }input url $;3 ~4 d5 I, N/ O; l
datalines;
% S; f, A) F. C% ?http://www.yahoo.com
0 }6 H- x; t. U$ v1 i I4 ]0 Thttp://www.madio.net/ J5 v1 V8 P, ]* Q1 n* I/ z/ N! p
http://www.google.com6 l: l% B5 W% o' D- ?
;
( H# X7 z4 {2 s$ C p! urun
. ~" V& D0 n6 o1 `) R, F为了确保我们不抓取相同的URL一次以上,持有环节已创建一个数据抓取。% n' E( u% X; m- N2 k
当Web数据集将在开始时是空的,但一个网站的网址将被添加到数据集履带式完成抓取该网站。' o, D0 Y& _% w: S, b' r X' G
data work.links_crawled;
9 z* P4 |# c& f' A- Hlength url $256;
2 L! c7 E- U- L! y, b* w4 ^4 b" @6 xrun;: u0 G$ p1 P9 d" b% w# A$ K
现在我们开始爬行!该代码需要我们的 work.links_to_crawl数据集的第一个URL。在第一观察“_N_式1”,网址是投入名为 next_url 宏变量,所有剩余的URL放回我们的种子URL数据集,使他们在未来的迭代。
+ q7 d3 M) W/ d* L& J. n/ `0 B1 U/* pop the next url off */9 c& o; n4 O* j+ X
%let next_url = ;: b0 w0 s% i( x7 ^
data work.links_to_crawl;* G% E2 l- ?( C2 V8 i' {) |; P
set work.links_to_crawl;$ r' R0 a+ Q# t/ ?
if _n_ eq 1 then call symput(“next_url”, url);
/ a; t2 K1 T! ~+ nelse output;
$ Q3 F& t2 m. Z5 Crun;/ w/ P2 D9 f D! C1 N, i
现在,从互联网上下载的网址。创建一个文件名称 _nexturl 。我们让SAS知道它是一个URL 而且可以发现,AT&next_url,这是我们的宏观变量,它包含的网址我们从拉 work.links_to_crawl数据集。+ c/ @. d" C$ t0 { R+ F5 `
/* crawl the url */6 r1 o8 R( j0 [' P. s% a
filename _nexturl url “&next_url”% j# M5 l& U3 W3 ~/ J7 X
建立后的文件名的URL参考,确定一个地方把我们下载的文件。创建另一个文件名引用所谓 htmlfilm的条目,并在那里把从 url_file.html收集到的信息。- ~8 j& t/ r; G, o, E; I( \' o
/* put the file we crawled here */
X+ d+ b3 x# u4 I5 [) b, ^$ ?filename htmlfile “url_file.html”& R" |/ r' V8 D& g% B
接下来,我们通过数据的循环,把它写htmlfilm的条目文件名参考,并寻找更多的网址添加到我们的 work.links_to_crawl数据集。
; G2 @4 U6 L8 k! [7 l& [) Z/* find more urls */
! W) q: k5 {1 b9 v6 X" W$ Edata work._urls(keep=url);
" ~5 u) z% D/ b- vlength url $256 ;" V* { N1 |1 A# P% b, A$ F2 i" |
file htmlfile;' O9 g7 q; X3 b* p
infile _nexturl length=len;* w8 m |/ k# n; j! L4 \4 E
input text $varying2000. len;6 b& K, ~" F2 g0 W% n2 N! J
put text;
3 Y" E& e) t* q' u' p& \start = 1;
* I* P, E9 X0 D" i/ g7 Pstop = length(text);5 [ D& `4 j5 I9 D. t# N
使用正则表达式一个网站的网址,以帮助搜索。正则表达式的匹配方法文本字符串,如字,词,或字符模式。 SAS已经提供了许多强大的字符串功能。然而,正则表达式通常会提供一个更简洁的方式,操纵和匹配的文本." E+ h' r5 l% c# Z9 w+ F
if _n_ = 1 then do;
2 F& `8 ~# b! D; u G) s c8 }retain patternID;
Y+ q& X' p: x5 Q$ r) upattern = ‘/href=”([^"]+)”/i’;0 L- u0 y# H& G. O7 Z3 e1 Q" {
patternID = prxparse(pattern);
+ r; B( q' o* ~( I, b% Bend4 T; {( d& [/ G; [4 R- I
首次观察到,创建一个patternID将保持整个数据步运行。寻找的模式是: “/href=”([^"]+)”/i’”.,这意味着我们正在寻找字符串“HREF =”“,然后再寻找任何字符串,是至少有一个字符长,不包含引号(“),并结束在引号(”)。在’我’ 目的的手段使用不区分大小写的方法,以配合我们的正则表达式。
4 C. m1 b: M' ^5 _5 aAs a result, the Web crawler will find these types of strings:" j% V9 y. d# s5 O; ^8 }
href=”sgf/2010/papers.html” 6 }+ x9 O- J, t: {
href=”www.yahoo.com”
, ~% C3 Y, k3 x0 ]6 j$ A: ^3 nHREF=”www.google.com”
( t: |2 `! H) h* ~0 S) b2 NhReF=”http://www.madio.net”
4 m' ^. d, E. n现在正则表达式匹配的一个网站上的文字。 PRXNEXT需要五个参数:正则表达式我们要寻找,寻找开始寻找正则表达式的开始位置,结束位置停止正则表达式,一旦发现字符串中的位置,而字符串的长度,如果发现的位置将是0,如果没有找到字符串。 PRXNEXT也改变了开始的参数,使搜索重新开始后的最后一场比赛是发现。
Z2 U5 k1 g$ H* zcall prxnext(patternID, start, stop, text, position, length);
' Q' A$ ]) \3 ~5 K7 p x X代码中的循环,在网站上找到的所有环节显示的文本。
% k/ i$ ^4 g* c' Vdo while (position ^= 0);# H: @2 F1 ^% p( E' _( i; Z/ c- J3 p7 `
url = substr(text, position+6, length-7);. b2 a0 m! Q# ^. a
output;' c6 w; ?8 w2 P" Z% k9 I
call prxnext(patternID, start, stop, text, position, length);
' U' C" p5 r4 G" K" g/ u2 tend;7 }: y* k/ g9 F+ ~* |3 X S
run;
3 F/ `6 G H5 t6 Z" R, Q" [如果代码发现一个网址,它会检索唯一的URL的一部分,启动后的第一个引号。例如,如果代码中发现的HREF =“http://www.new-site.com”,那么它应该保持 http://www.new-site.com 。使用 substr到删除前的6个字符和最后一个字符的URL的其余部分输出的work._urls 数据集。现在,我们插入的URL代码只是以跟踪抓取到一个数据集名为 work.links_crawled 我们已经和确保我们不再次浏览有。0 H* D" F- L6 u2 W0 i
/* add the current link to the list of urls we have already crawled */
7 K4 C0 @/ E. q9 @5 C4 Vdata work._old_link;
. i8 e* X( z1 ~4 j: a9 M% O& h4 o" _url = “&next_url”;' q& s( n& ^1 ~! h' s
run;
1 ^; Y' j& g) {proc append base=work.links_crawled data=work._old_link force;' V# f& {. c; c9 l% z: [3 g
run; K0 Q1 g7 u! X3 O6 y( k
下一步是在数据集 work._urls 的过程中发现的网址列表,以确保:
! d% e6 q3 f+ [) ~. V9 d1。我们尚未抓取他们,换句话说URL是不是在 work.links_crawled)。
5 _; d( n/ h# l# ?) s2。我们没有排队抓取的URL(网址换句话说,是不是在work.links_to_crawl )。
* x* [" I* Q) u3 P4 [' d/*: |1 M G- M- ~* W
* only add urls that we have not already crawled# {3 C6 J1 O3 `& K
* or that are not queued up to be crawled
) K; [' r7 R! N+ l5 u9 {*
. l9 I5 C4 o. L*/
: d" F, ^8 z# b" {proc sql noprint;
. h/ Y) }, L8 Mcreate table work._append as
& s1 L! o" Z& N7 z8 F5 S6 {select url o+ Z- h7 l: Q7 R" H4 o
from work._urls
! R V2 w1 l( d" w5 L9 ~0 `where url not in (select url from work.links_crawled)& F8 o& E+ ~# Q5 q g" ^7 w
and url not in (select url from work.links_to_crawl);" r: K; z- _) L9 m" d
quit;
. O4 j# A8 b/ \7 s' B) x! B然后,我们添加网址还没有被抓取,而不是已经排队 work.links_to_crawl数据集。
S! T4 ]6 K$ M3 Y% K3 q' e$ L/* add new links */, h# q; [5 ?) F/ z2 X
proc append base=work.links_to_crawl data=work._append force;* s' d d" G7 V4 V9 `" M% O u
run;1 r8 d3 A8 Y) Y2 _8 @* f2 y5 i
此时的代码循环回到开始劫掠 work.links_to_crawl数据集的下一个URL。; b( r$ r' M7 R3 \
|
zan
|