[R] 到底還有什麼可以吃！！！？？？以社會網絡分析（Social Network Analysis）觀察地溝油事件

原始大小：https://raw.githubusercontent.com/bryanyang0528/oil_food_sna/master/org_network.png

在進入本文前，先讓我們看部影片

        所謂地溝油（http://zh.wikipedia.org/wiki/地沟油）就是廢物利用將使用過的油再次回收精煉使用的技術，技術層級超英趕美，是世界糧食的救星 ，本文的產生即是為了紀念這歷史性的一刻．

        強冠的劣質豬油(全統香豬油)在市面上到處亂竄，許多知名大廠已經成為受害者(?)，造成人心惶惶，不知道該吃什麼。想說以圖示方式重新將資料做個整理。

        資料來源取自衛生福利部食品藥物管理署發佈的消息（問題產品清單-1030906），裡頭條列了各廠商進貨量以及使用的屎品（沒有打錯字），以下是圖例說明：

    1. 淡紅色圈圈：廠商進貨量，圈圈越大表示進貨量越大

    2. 淡藍色方塊：表示受影響的食物類別，方塊越大表示相關的產品越多（原始資料是提供產品名稱，為了整理方便，所以我自己將產品分類，分類的方式可以看（https://github.com/bryanyang0528/oil_food_sna/blob/master/detail.csv）

    3. 線條的數量表示品項數量～

       政府整理的名單真的太難懂了，看起來好像很多東西不能吃，但是圖表化之後比較知道什麼東西要注意哪些廠商，給各位跟我一樣不知道要吃什麼東西的人參考.

        整體看起來，廠商部分就是金利華和味全，金利華主要生產丸類比較好避開，味全主要生產肉鬆和肉醬類，要多注意一下．食物方面糕餅，餅皮，和調味醬都有多項產品中獎，小心別踩雷了．

        因為要符合igraph的格式，所以將資料切成兩塊：

1. Node的屬性，這邊指的就是各廠商的進貨量，以及食品的個案數https://github.com/bryanyang0528/oil_food_sna/blob/master/sup.csv
2. Edge的聯結方式，這邊很單純就是看哪個廠商製造什麼食品https://github.com/bryanyang0528/oil_food_sna/blob/master/edge.csv

這邊我都是直接在excel裡面做的，要注意就是每個Node和Edge中的Node數量要一致跑起來才不會有問題．CODE部分很單純

https://github.com/bryanyang0528/oil_food_sna/blob/master/oil_nsa.R，我就不多做解釋了