net <- projections(
economiccomplexity_output$proximity$proximity_country,
economiccomplexity_output$proximity$proximity_product,
avg_links = 10,
tolerance = 0.1
)
# partial view of projections
n <- seq_len(5)
igraph::E(net$network_country)[n]
igraph::E(net$network_product)[n]
Run the code above in your browser using DataLab