Last active
          September 26, 2017 06:41 
        
      - 
      
- 
        Save suensummit/dcebbbcfd2477a12c9c8e5e7e2cfa408 to your computer and use it in GitHub Desktop. 
  
    
      This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
      Learn more about bidirectional Unicode characters
    
  
  
    
  | # Load data | |
| # ips <- read.csv("https://lookaside.fbsbx.com/file/ipdatas.csv?token=AWyvZbsOT-DxjUjUySQf4vqWu9VSj7WTKytXNHkow4054oYjLFN_7FW0FPNwDtmUbQXXzJyCm99cQoRV6c-xS-Clpc7ss0lw-C04A41hBtFP3Yy2d4sR_W31BNrLip_XcqyuJbOxhjC9xKBq32jQ8zfxnDO3OdbSdq4-SbOnWnMQSLcjWrx6hfqbKo1a3gVttSZLhKqna7TpJhOm8uKdUvde") | |
| ips <- read.csv("ipdatas.csv") | |
| # 如果已安裝則省略 | |
| # install.packages("maps") | |
| # install.packages("ggplot2") | |
| library(ggplot2) | |
| ggplot() + | |
| borders("world", colour = "gray20", fill = "gray50") + | |
| geom_point(data = ips, aes(x = Longitude, y = Latitude, color = CountryCode, alpha = 0.5), size = 5) | 
      
      
  Author
  
  
        
      
            suensummit
  
      
      
      commented 
        Sep 26, 2017 
      
    
  

  
    Sign up for free
    to join this conversation on GitHub.
    Already have an account?
    Sign in to comment