- 在线时间
- 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 ® 企业矿工™。) v% U( o/ U: L% R" M
简介:互联网已经成为一个有用的信息来源。通常是Web上的数据,我们要使用内的SAS,所以我们需要找到一种方式来获得这个数据。最好的办法是使用一个网络爬虫。 SAS提供几个从Web爬行和提取信息的方法。您可以使用基本的SAS数据步骤中的代码,或SAS文本矿工的%TMFILTER宏。虽然目前无法使用,SAS搜索管道将是一个功能强大的Web爬行产品,并提供更多的工具,网络爬行。每种方法都有其优点和缺点,所以取决于你想实现抓取的,它是最好对其进行审查。
# [- w, F! n; b6 V7 I5 r4 F9 g' z, G `
首先,重要的是要了解网络爬虫是如何工作的。你应该熟悉数据步骤的代码,宏,和SAS过程PROC SQL,然后再继续。
* E8 C& J) X0 s/ p网络爬虫概述:一个网络爬虫是一个程序,一个或多个起始地址作为“种子URL”,下载网站这些URL相关的网页,在网页中包含的任何超链接提取,并递归地继续这些超链接标识下载Web页。从概念上讲,网络爬虫是很简单的。4 t4 U: E1 J8 F& S
一个Web 履带式有四项职责:+ p6 F' I; Z( I& |3 v7 U# v) R' _
1。从候选人中选择一个网址。 l' I& k$ b" q0 [1 l
2。它下载相关的Web页。
, c I' o3 J. O) j3。它提取物在网页中的URL(超链接)。
6 k) ^* W' g" p+ `' R2 n1 z4。它补充说,未曾遇到的候选集的URL
% U% \3 ?- e, d1 h方法1:在WEB SAS数据步骤中的代码履带式( h2 S3 e8 W0 H! i/ S, Y
首先创建一个网址的网站的Web crawler将开始列表。
# @, L* D. a8 i! B/ Q. l0 Sdata work.links_to_crawl;
% c% \! e. w- `( Nlength url $256 ;
- F% @. B6 N. E( E- t$ U tinput url $;3 g0 n( \. B2 c. W
datalines;1 t+ t5 J" B' i, X! v. v2 i
http://www.yahoo.com. q; y8 i( R* i3 ^* Z
http://www.madio.net+ {: v" Z7 e( v" V- G; n
http://www.google.com/ v* }" }* j7 c
;& l- A- R* C& w) l
run
6 G: Z3 p; [1 _: U( o为了确保我们不抓取相同的URL一次以上,持有环节已创建一个数据抓取。
& }2 L; N1 {0 j4 ~. i; d+ ^当Web数据集将在开始时是空的,但一个网站的网址将被添加到数据集履带式完成抓取该网站。
/ f4 R. R' a8 ^data work.links_crawled; - B, _& v* z% N: {: X" U: \- u
length url $256;# j7 ]- L/ G7 B, k7 f6 k7 X
run;. s6 ^1 r6 @. W
现在我们开始爬行!该代码需要我们的 work.links_to_crawl数据集的第一个URL。在第一观察“_N_式1”,网址是投入名为 next_url 宏变量,所有剩余的URL放回我们的种子URL数据集,使他们在未来的迭代。/ u, ]3 M/ D( f; b& p+ v" J$ g6 \8 I. C7 [
/* pop the next url off */
& I7 P9 A B) Y/ N( |. E%let next_url = ;$ z; N' ^6 T& F. r% h) r% t9 Z
data work.links_to_crawl;
+ @( c3 I9 D3 }9 b: [set work.links_to_crawl;
( a; |9 {+ A5 I% o/ F- n; bif _n_ eq 1 then call symput(“next_url”, url);
, h, w/ }# X2 z' |4 }else output;: A5 q* f( P/ K' U, ^( H8 t! C7 x
run;: X8 }8 y8 I0 `& S
现在,从互联网上下载的网址。创建一个文件名称 _nexturl 。我们让SAS知道它是一个URL 而且可以发现,AT&next_url,这是我们的宏观变量,它包含的网址我们从拉 work.links_to_crawl数据集。
" v+ v: g/ m/ S/* crawl the url */
5 i0 X( C/ U$ ^& i8 z* Dfilename _nexturl url “&next_url”2 D; t8 P4 U2 V- c
建立后的文件名的URL参考,确定一个地方把我们下载的文件。创建另一个文件名引用所谓 htmlfilm的条目,并在那里把从 url_file.html收集到的信息。; h" q3 R5 B- ` Q
/* put the file we crawled here */( h0 P U7 a8 Z7 A
filename htmlfile “url_file.html”* j3 \9 ]# ], M# `( r
接下来,我们通过数据的循环,把它写htmlfilm的条目文件名参考,并寻找更多的网址添加到我们的 work.links_to_crawl数据集。& [) ]* {3 i9 R, c. i5 t5 i
/* find more urls */
0 [5 R0 ?( n/ l1 ?& F8 g1 i. v# pdata work._urls(keep=url);
' X: p8 H) Z9 {8 p4 l: ~length url $256 ;
6 Y2 D0 K! c9 b2 D, T- p5 `. W% pfile htmlfile;( B& h3 }* ~& M8 I) [
infile _nexturl length=len;, v, t9 X& O/ V$ u2 f2 D: B
input text $varying2000. len;+ A0 k( D" `( W9 H
put text;& v% G. m% Y% m) d. z9 @, \
start = 1;
8 \) ?6 l/ g, O1 Qstop = length(text);+ I3 T; l8 h% t$ D% u0 ~7 A
使用正则表达式一个网站的网址,以帮助搜索。正则表达式的匹配方法文本字符串,如字,词,或字符模式。 SAS已经提供了许多强大的字符串功能。然而,正则表达式通常会提供一个更简洁的方式,操纵和匹配的文本.6 s" i: }* w9 t* W# ~7 p* D
if _n_ = 1 then do;
; x8 ^5 B* M2 R6 Z( b) b6 P D& fretain patternID;
; v$ ^' S% s+ i! p) h) d+ i" \pattern = ‘/href=”([^"]+)”/i’;
# o$ t7 E- ^( _" zpatternID = prxparse(pattern);
' B! X' V$ d6 ?- Qend
# H4 w9 J% W& G首次观察到,创建一个patternID将保持整个数据步运行。寻找的模式是: “/href=”([^"]+)”/i’”.,这意味着我们正在寻找字符串“HREF =”“,然后再寻找任何字符串,是至少有一个字符长,不包含引号(“),并结束在引号(”)。在’我’ 目的的手段使用不区分大小写的方法,以配合我们的正则表达式。: a- P6 D7 L5 a1 v4 h' p
As a result, the Web crawler will find these types of strings:
( \) t0 G3 u1 _1 bhref=”sgf/2010/papers.html”
9 p+ P5 v9 E9 m0 w2 v# Ihref=”www.yahoo.com”, v5 C- h- e, W, V) Q
HREF=”www.google.com”
2 I& s! d: Y* C7 A5 [hReF=”http://www.madio.net”
4 \- a3 T& i" G" s( Z7 v3 [4 z现在正则表达式匹配的一个网站上的文字。 PRXNEXT需要五个参数:正则表达式我们要寻找,寻找开始寻找正则表达式的开始位置,结束位置停止正则表达式,一旦发现字符串中的位置,而字符串的长度,如果发现的位置将是0,如果没有找到字符串。 PRXNEXT也改变了开始的参数,使搜索重新开始后的最后一场比赛是发现。) q- [) B) o- E7 @
call prxnext(patternID, start, stop, text, position, length);
0 A' r" q Z" Z0 J1 G4 b代码中的循环,在网站上找到的所有环节显示的文本。. q# o: T4 Y/ t; l. p
do while (position ^= 0);
/ |' v4 `2 f! h. ourl = substr(text, position+6, length-7); h4 u& u/ z9 F6 G5 @; q
output;+ y( z: n/ y% g" V
call prxnext(patternID, start, stop, text, position, length);
0 g5 f- \! C+ n7 A$ ^end;
3 k; G) [- A0 \7 G5 rrun;
. m5 G0 \( w4 D/ Z: W* R) k J) Q如果代码发现一个网址,它会检索唯一的URL的一部分,启动后的第一个引号。例如,如果代码中发现的HREF =“http://www.new-site.com”,那么它应该保持 http://www.new-site.com 。使用 substr到删除前的6个字符和最后一个字符的URL的其余部分输出的work._urls 数据集。现在,我们插入的URL代码只是以跟踪抓取到一个数据集名为 work.links_crawled 我们已经和确保我们不再次浏览有。& L7 W3 R1 c3 n3 v$ @1 b. ?
/* add the current link to the list of urls we have already crawled */
1 u5 s3 ] d% P, t" ydata work._old_link;7 Q3 X9 X) c2 O( v5 N! Y$ A) ~5 ~
url = “&next_url”;
1 y3 U) k0 E# P9 |run;; S' s6 ~( _7 F+ |6 E
proc append base=work.links_crawled data=work._old_link force;
# [ q5 K* x0 T! |+ ?6 wrun;
0 V3 [: f8 @9 T, f' M9 [- R下一步是在数据集 work._urls 的过程中发现的网址列表,以确保:
* Q1 |# a/ _% `/ D1。我们尚未抓取他们,换句话说URL是不是在 work.links_crawled)。4 ?: h4 Y: A5 _5 ?
2。我们没有排队抓取的URL(网址换句话说,是不是在work.links_to_crawl )。
/ X; D k: i# A" i/*0 j3 ?8 O/ b+ A/ O7 h- S
* only add urls that we have not already crawled
9 m. Z. e- q9 H+ R) A0 r0 A* or that are not queued up to be crawled# J( i* @* x. v- V
*! A( w9 H) _' a
*/( ?" w* ?# x" w! A
proc sql noprint;
9 U: h+ n N/ g8 bcreate table work._append as
$ v6 |, i" a- S, }* z6 Pselect url
( @$ _- S& b" z# g# pfrom work._urls
. `+ Q( x* X- u1 t+ X, O9 ?9 Fwhere url not in (select url from work.links_crawled): c+ P2 {+ \/ z- k$ J
and url not in (select url from work.links_to_crawl);
3 ]3 O, n" S6 yquit;
# _. o a. G |3 }) ]4 o( L然后,我们添加网址还没有被抓取,而不是已经排队 work.links_to_crawl数据集。1 Q* U& R' K" H' l- r1 V* F! d+ T( e1 S
/* add new links */
& i- ]$ Z! r m) h: sproc append base=work.links_to_crawl data=work._append force;
/ h" }, S) ?( |" T9 \# Erun;3 T" ?7 z! ~% x4 V
此时的代码循环回到开始劫掠 work.links_to_crawl数据集的下一个URL。
/ w) z) i( {% T* i \1 X& I( T8 K |
zan
|