爬取今日頭條頭條號(hào)文章數(shù)據(jù)

0,背景介紹

最近想爬取一些今日頭條的文章瀏覽數(shù)據(jù)友瘤,分析哪些頭條號(hào)做的好翠肘,那些做的不好。

今日頭條

比如上圖的閱讀數(shù)辫秧,評(píng)論數(shù)以及文章標(biāo)題束倍,通過(guò)這些數(shù)據(jù)進(jìn)行分析。

于是展開(kāi)了艱難的爬蟲(chóng)探索之旅

第一目標(biāo)是爬取某個(gè)或某幾個(gè)頭條號(hào)的歷史瀏覽數(shù)據(jù)盟戏。

直接列出取得的結(jié)果吧

1绪妹,獲得url

http://www.toutiao.com/c/user/article/?page_type=1&user_id=3400026401&max_behot_time=0&count=20&as=A1B5382B95E4C02&cp=58B5747C80723E1

這一步非常關(guān)鍵,特意去請(qǐng)教了爬蟲(chóng)大神抓半,得出要用Charles或其他的工具來(lái)獲得數(shù)據(jù)存放的位置喂急,注意格嘁,頭條號(hào)的文章列表數(shù)據(jù)無(wú)法在HTML中直接定位到笛求。

只要將“3400026401”一串?dāng)?shù)字,替換成每個(gè)賬號(hào)的域名的數(shù)字糕簿,就可以爬取每個(gè)賬號(hào)的內(nèi)容了探入。

這種笨辦法只能一個(gè)個(gè)爬取,因?yàn)闀r(shí)間和基礎(chǔ)有限懂诗,計(jì)劃先把這條路走通了再說(shuō)蜂嗽。

還有一點(diǎn)就是,今日頭條有反爬蟲(chóng)機(jī)制殃恒,如果通過(guò)機(jī)器批量下載存在風(fēng)險(xiǎn)植旧,如何避過(guò)反爬蟲(chóng)機(jī)制又要花大量時(shí)間

2辱揭,復(fù)制json

將上述網(wǎng)址復(fù)制到瀏覽器中,既可以得到一大段json病附,長(zhǎng)成這樣问窃,第一次見(jiàn)json

json

用這個(gè)bejson工具,將原格式的json翻譯一下完沪,bejson

翻譯之后就可以看到中文了域庇,終于有點(diǎn)人類(lèi)語(yǔ)言的樣子了

3,用R解析json

首先要安裝rjson包覆积,提前將第2步翻譯之后的json文件復(fù)制放在一個(gè)地方听皿,我是放在了keji.json文件中,然后用fromJSON讀取文件宽档,代碼如下

install.packages("rjson")
library("rjson")
result <- fromJSON(file="keji.json" )

然后尉姨,看一下長(zhǎng)啥樣子

head(result)

樣子.png

里面存的東西非常多,可以看到文件是以列表格式存放的
主要分為這幾塊:

names(result)

我們只需要取data部分的數(shù)據(jù)就行雌贱,第一步只取標(biāo)題名稱(chēng)看看

讀取其中一部分?jǐn)?shù)據(jù)

result$data[[1]]$title

結(jié)果如下:


Paste_Image.png

4啊送,獲取數(shù)據(jù)
取出前20條數(shù)據(jù)

for (i in 1:20) {
x=result$data[[i]]$title
print(x)
}

運(yùn)行結(jié)果如下:

Paste_Image.png

5,分析數(shù)據(jù)

同樣的方法把評(píng)論和閱讀數(shù)弄出來(lái)

閱讀量
評(píng)論數(shù)

爬蟲(chóng)還得花時(shí)間好好用欣孤,
雖然還沒(méi)有達(dá)到理想的爬蟲(chóng)效果馋没,但是也取得了一部分進(jìn)展,下次接著更新降传。

最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末篷朵,一起剝皮案震驚了整個(gè)濱河市,隨后出現(xiàn)的幾起案子婆排,更是在濱河造成了極大的恐慌声旺,老刑警劉巖,帶你破解...
    沈念sama閱讀 221,406評(píng)論 6 515
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件段只,死亡現(xiàn)場(chǎng)離奇詭異腮猖,居然都是意外死亡,警方通過(guò)查閱死者的電腦和手機(jī)赞枕,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 94,395評(píng)論 3 398
  • 文/潘曉璐 我一進(jìn)店門(mén)澈缺,熙熙樓的掌柜王于貴愁眉苦臉地迎上來(lái),“玉大人炕婶,你說(shuō)我怎么就攤上這事姐赡。” “怎么了柠掂?”我有些...
    開(kāi)封第一講書(shū)人閱讀 167,815評(píng)論 0 360
  • 文/不壞的土叔 我叫張陵项滑,是天一觀的道長(zhǎng)。 經(jīng)常有香客問(wèn)我涯贞,道長(zhǎng)枪狂,這世上最難降的妖魔是什么危喉? 我笑而不...
    開(kāi)封第一講書(shū)人閱讀 59,537評(píng)論 1 296
  • 正文 為了忘掉前任,我火速辦了婚禮州疾,結(jié)果婚禮上姥饰,老公的妹妹穿的比我還像新娘。我一直安慰自己孝治,他們只是感情好列粪,可當(dāng)我...
    茶點(diǎn)故事閱讀 68,536評(píng)論 6 397
  • 文/花漫 我一把揭開(kāi)白布。 她就那樣靜靜地躺著谈飒,像睡著了一般岂座。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發(fā)上杭措,一...
    開(kāi)封第一講書(shū)人閱讀 52,184評(píng)論 1 308
  • 那天费什,我揣著相機(jī)與錄音,去河邊找鬼手素。 笑死鸳址,一個(gè)胖子當(dāng)著我的面吹牛,可吹牛的內(nèi)容都是我干的泉懦。 我是一名探鬼主播稿黍,決...
    沈念sama閱讀 40,776評(píng)論 3 421
  • 文/蒼蘭香墨 我猛地睜開(kāi)眼,長(zhǎng)吁一口氣:“原來(lái)是場(chǎng)噩夢(mèng)啊……” “哼崩哩!你這毒婦竟也來(lái)了巡球?” 一聲冷哼從身側(cè)響起,我...
    開(kāi)封第一講書(shū)人閱讀 39,668評(píng)論 0 276
  • 序言:老撾萬(wàn)榮一對(duì)情侶失蹤邓嘹,失蹤者是張志新(化名)和其女友劉穎酣栈,沒(méi)想到半個(gè)月后,有當(dāng)?shù)厝嗽跇?shù)林里發(fā)現(xiàn)了一具尸體汹押,經(jīng)...
    沈念sama閱讀 46,212評(píng)論 1 319
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡矿筝,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 38,299評(píng)論 3 340
  • 正文 我和宋清朗相戀三年,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了棚贾。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片窖维。...
    茶點(diǎn)故事閱讀 40,438評(píng)論 1 352
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡,死狀恐怖鸟悴,靈堂內(nèi)的尸體忽然破棺而出陈辱,到底是詐尸還是另有隱情奖年,我是刑警寧澤细诸,帶...
    沈念sama閱讀 36,128評(píng)論 5 349
  • 正文 年R本政府宣布,位于F島的核電站陋守,受9級(jí)特大地震影響震贵,放射性物質(zhì)發(fā)生泄漏利赋。R本人自食惡果不足惜,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 41,807評(píng)論 3 333
  • 文/蒙蒙 一猩系、第九天 我趴在偏房一處隱蔽的房頂上張望媚送。 院中可真熱鬧,春花似錦寇甸、人聲如沸。這莊子的主人今日做“春日...
    開(kāi)封第一講書(shū)人閱讀 32,279評(píng)論 0 24
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽(yáng)包蓝。三九已至,卻和暖如春绽淘,著一層夾襖步出監(jiān)牢的瞬間涵防,已是汗流浹背。 一陣腳步聲響...
    開(kāi)封第一講書(shū)人閱讀 33,395評(píng)論 1 272
  • 我被黑心中介騙來(lái)泰國(guó)打工沪铭, 沒(méi)想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留壮池,地道東北人。 一個(gè)月前我還...
    沈念sama閱讀 48,827評(píng)論 3 376
  • 正文 我出身青樓杀怠,卻偏偏與公主長(zhǎng)得像椰憋,于是被迫代替她去往敵國(guó)和親。 傳聞我的和親對(duì)象是個(gè)殘疾皇子赔退,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 45,446評(píng)論 2 359

推薦閱讀更多精彩內(nèi)容