[R-br] Gráfico de network para o comércio internacional entre países

Alexandre Loures alexandre.loures em ymail.com
Seg Abr 13 20:59:54 -03 2020


Boa noite, Listeiros!

Gostaria de fazer um gráfico de rede para o comércio internacional entre 
um grupo de países. Nesse sentido, estou tentando replicar o seguinte 
exemplo: 
http://beyondvalence.blogspot.com/2014/05/text-mining-7-term-network-analysis.html

Porém, no meu caso, possuo pares de países: ARE-JPN, AUS-JPN,...

Ademais, gostaria que cada node fosse proporcional ao volume 
comercializado pelo país (variável exports).

  dput (df)
structure(list(ido = c("ARE", "AUS", "CHN", "GBR", "GBR", "GBR",
"HKG", "IDN", "IRN", "JPN", "JPN", "KOR", "KOR", "MYS", "NGA",
"NLD", "NOR", "RUS", "RUS", "USA", "USA", "AUS", "AUS", "BEL",
"BEL", "BEL", "CHN", "CHN", "CHN", "DEU", "DEU", "DEU", "DEU",
"DEU", "DEU", "DEU", "GBR", "GBR", "GBR", "IRN", "MYS", "MYS",
"NLD", "POL", "RUS", "RUS", "SGP", "SGP", "SGP", "SGP", "USA"
), idd = c("JPN", "JPN", "KOR", "CHE", "DEU", "FRA", "USA", "JPN",
"JPN", "HKG", "SGP", "CHN", "JPN", "SGP", "USA", "FRA", "GBR",
"DEU", "ITA", "GBR", "KOR", "CHN", "JPN", "DEU", "FRA", "NLD",
"GBR", "RUS", "SGP", "AUT", "BEL", "ESP", "FRA", "NLD", "POL",
"USA", "ARE", "IRL", "USA", "ITA", "SGP", "USA", "BEL", "DEU",
"CHE", "TUR", "CHN", "HKG", "IDN", "MYS", "ARE"), exports = c(13112242813,
12600200044, 11292363934, 8415084770, 34788506146, 28475980395,
46984336771, 14415189665, 4968556482, 27183303751, 20820248756,
18454539579, 20466015819, 18045941449, 11499435728, 22555328417,
12375241280, 9231828795, 7254325411, 41578521231, 27901876438,
12302482046, 21703963590, 64547770665, 57659467585, 39244445982,
18976473583, 13211283269, 16632262456, 53765327000, 54292454000,
49796586000, 98354819000, 60942951000, 27729562000, 86050473000,
10567139812, 29981708162, 56706301526, 6191623821, 22078782553,
27815727284, 40914697144, 25222684658, 10781703404, 10841448818,
19757037697, 21522016786, 22102891530, 30384988869, 8476570775
)), class = "data.frame", row.names = c("1", "2", "3", "4", "5",
"6", "7", "8", "9", "10", "11", "12", "13", "14", "15", "16",
"17", "18", "19", "20", "21", "22", "23", "24", "25", "26", "27",
"28", "29", "30", "31", "32", "33", "34", "35", "36", "37", "38",
"39", "40", "41", "42", "43", "44", "45", "46", "47", "48", "49",
"50", "51"))

Desde já, muito obrigado pela atenção!

-- 
*Alexandre Loures*
Professor Substituto
Universidade Federal da Paraíba <https://ufpb.br>
Pós-graduação em Economia - PPGE 
<https://sigaa.ufpb.br/sigaa/public/programa/portal.jsf?lc=pt_BR&id=1875>
www.rodriguesloures.com
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20200413/cd2d1045/attachment.html>


Mais detalhes sobre a lista de discussão R-br