2022-05-10

R Básico

RStudio

Afinal, o que é o R?

Uma calculadora?

2+2
## [1] 4
4*10
## [1] 40
sqrt(16)
## [1] 4

Um software de estatística?

mean(c(2,3,5,8,9,5))
## [1] 5.333333
sd(c(2,3,5,8,9,5))
## [1] 2.73252
median(c(2,3,5,8,9,5))
## [1] 5

Pacotes

O desenvolvimento de pacotes é o grande trunfo do R

  • Grande quantidade de desenvolvedores (open-source)

  • Instalando e baixando pacotes (apenas na 1ª vez)

install.packages('ggplot2')
install.packages('dplyr')
  • Carregando pacotes (sempre que for usar)
library(ggplot2)
library(dplyr)

Websites com gráficos e mapas dinâmicos

Esta apresentação foi feita com R

Recomendações:

Tipos de objetos no R

  • Vector:
    • Uma coleção com elementos de um mesmo tipo
  • Matrix:
    • Um vetor bidimensional, com todos os elementos do mesmo tipo
  • List:
    • Numéricos, caracteres, complexos, lógicos, funções, expressões
  • Data frame:
    • Uma tabela. Cada coluna pode ter um tipo de dado diferente.

Tipos de Variáveis

  • Qualitativas:
    • Factor
    • Character
    • Date (um tipo especial de character)
    • Logical (TRUE ou FALSE)
  • Quantitativas
    • Numeric (real ou decimal)
    • Integer

Problema Gerador

A evolução da COVID no Brasil

Dados Disponíveis

Evolução da COVID-19 no RS (Tabela cv)

cod_mun nome_mun state date week cases deaths new_cases new_deaths
4204202 CHAPECÓ SC 2021-02-27 202108 24586 256 3907 71
4209102 JOINVILLE SC 2021-03-20 202111 73643 868 3892 70
4209102 JOINVILLE SC 2021-03-27 202112 76856 949 3213 81
4204202 CHAPECÓ SC 2021-03-06 202109 27361 335 2775 79
4205407 FLORIANÓPOLIS SC 2021-03-27 202112 68612 726 2394 69
4209102 JOINVILLE SC 2021-04-03 202113 78909 1025 2053 76
4205407 FLORIANÓPOLIS SC 2021-03-20 202111 66218 657 2032 79
4209102 JOINVILLE SC 2021-04-10 202114 80907 1107 1998 82
4205407 FLORIANÓPOLIS SC 2021-04-03 202113 70012 795 1400 69
4209102 JOINVILLE SC 2021-04-17 202115 82261 1182 1354 75

Dados Disponíveis

Variáveis sociodemográficas (Tabela muni)

cod_mun nome pop renda area
4207684 IPUAÇU 6795 1022.479 260.8927
leitos moradoresdom rgi nome_rgi
0 3.517143 420011 Xanxerê

Gerenciando os dados

Variáveis (colunas) e Casos (linhas)

Selecionando colunas

muni$nome
##   [1] "IPUAÇU"                       "SÃO DOMINGOS"                
##   [3] "ABELARDO LUZ"                 "SANTIAGO DO SUL"             
##   [5] "CORONEL MARTINS"              "ÁGUA DOCE"                   
##   [7] "SALTO VELOSO"                 "MACIEIRA"                    
##   [9] "TREZE TÍLIAS"                 "CATANDUVAS"                  
##  [11] "BOM RETIRO"                   "URUBICI"                     
##  [13] "ALFREDO WAGNER"               "RIO RUFINO"                  
##  [15] "SANTA ROSA DE LIMA"           "SÃO BONIFÁCIO"               
##  [17] "ANITÁPOLIS"                   "RIO FORTUNA"                 
##  [19] "ARABUTÃ"                      "ARARANGUÁ"                   
##  [21] "MELEIRO"                      "MARACAJÁ"                    
##  [23] "MORRO GRANDE"                 "BALNEÁRIO ARROIO DO SILVA"   
##  [25] "TURVO"                        "BOMBINHAS"                   
##  [27] "ITAPEMA"                      "CAMBORIÚ"                    
##  [29] "TIJUCAS"                      "PORTO BELO"                  
##  [31] "BALNEÁRIO CAMBORIÚ"           "BLUMENAU"                    
##  [33] "GASPAR"                       "SÃO JOÃO BATISTA"            
##  [35] "CANELINHA"                    "GUABIRUBA"                   
##  [37] "NOVA TRENTO"                  "BRUSQUE"                     
##  [39] "BOTUVERÁ"                     "CAÇADOR"                     
##  [41] "CALMON"                       "TIMBÓ GRANDE"                
##  [43] "CAIBI"                        "RIQUEZA"                     
##  [45] "SÃO BERNARDINO"               "CAMPO ERÊ"                   
##  [47] "CAMPOS NOVOS"                 "VARGEM"                      
##  [49] "CELSO RAMOS"                  "ANITA GARIBALDI"             
##  [51] "ABDON BATISTA"                "BELA VISTA DO TOLDO"         
##  [53] "CANOINHAS"                    "GUATAMBÚ"                    
##  [55] "PLANALTO ALEGRE"              "CAXAMBU DO SUL"              
##  [57] "CHAPECÓ"                      "CONCÓRDIA"                   
##  [59] "IÇARA"                        "COCAL DO SUL"                
##  [61] "CRICIÚMA"                     "SIDERÓPOLIS"                 
##  [63] "NOVA VENEZA"                  "FORQUILHINHA"                
##  [65] "CUNHA PORÃ"                   "CURITIBANOS"                 
##  [67] "SÃO CRISTOVÃO DO SUL"         "PONTE ALTA DO NORTE"         
##  [69] "PONTE ALTA"                   "BELMONTE"                    
##  [71] "DESCANSO"                     "FLOR DO SERTÃO"              
##  [73] "DIONÍSIO CERQUEIRA"           "OURO VERDE"                  
##  [75] "FAXINAL DOS GUEDES"           "GOVERNADOR CELSO RAMOS"      
##  [77] "FLORIANÓPOLIS"                "PRINCESA"                    
##  [79] "GUARUJÁ DO SUL"               "DONA EMMA"                   
##  [81] "JOSÉ BOITEUX"                 "PRESIDENTE GETÚLIO"          
##  [83] "APIÚNA"                       "IBIRAMA"                     
##  [85] "IMBITUBA"                     "PAULO LOPES"                 
##  [87] "GAROPABA"                     "SÃO MARTINHO"                
##  [89] "INDAIAL"                      "ASCURRA"                     
##  [91] "RODEIO"                       "IPIRA"                       
##  [93] "OURO"                         "PIRATUBA"                    
##  [95] "ZORTÉA"                       "CAPINZAL"                    
##  [97] "IPORÃ DO OESTE"               "IPUMIRIM"                    
##  [99] "IRANI"                        "VARGEM BONITA"               
## [101] "IRINEÓPOLIS"                  "PAIAL"                       
## [103] "ITÁ"                          "PENHA"                       
## [105] "NAVEGANTES"                   "BALNEÁRIO PIÇARRAS"          
## [107] "ILHOTA"                       "ITAJAÍ"                      
## [109] "ITAPIRANGA"                   "CHAPADÃO DO LAGEADO"         
## [111] "PETROLÂNDIA"                  "ITUPORANGA"                  
## [113] "JAGUARUNA"                    "SCHROEDER"                   
## [115] "CORUPÁ"                       "GUARAMIRIM"                  
## [117] "JARAGUÁ DO SUL"               "ERVAL VELHO"                 
## [119] "JOAÇABA"                      "HERVAL D'OESTE"              
## [121] "LACERDÓPOLIS"                 "LUZERNA"                     
## [123] "JABORÁ"                       "ITAPOÁ"                      
## [125] "ARAQUARI"                     "BALNEÁRIO BARRA DO SUL"      
## [127] "JOINVILLE"                    "GARUVA"                      
## [129] "SÃO FRANCISCO DO SUL"         "BOCAINA DO SUL"              
## [131] "SÃO JOSÉ DO CERRITO"          "CAPÃO ALTO"                  
## [133] "PAINEL"                       "LAGES"                       
## [135] "CAMPO BELO DO SUL"            "CERRO NEGRO"                 
## [137] "PALMEIRA"                     "CORREIA PINTO"               
## [139] "LAGUNA"                       "IMARUÍ"                      
## [141] "BOM JARDIM DA SERRA"          "SÃO LUDGERO"                 
## [143] "BRAÇO DO NORTE"               "TREVISO"                     
## [145] "LAURO MULLER"                 "ORLEANS"                     
## [147] "GRÃO PARÁ"                    "URUSSANGA"                   
## [149] "LINDÓIA DO SUL"               "MASSARANDUBA"                
## [151] "LUIZ ALVES"                   "BARRA VELHA"                 
## [153] "SÃO JOÃO DO ITAPERIÚ"         "ITAIÓPOLIS"                  
## [155] "MAFRA"                        "MONTE CASTELO"               
## [157] "MAJOR VIEIRA"                 "PAPANDUVA"                   
## [159] "TIGRINHOS"                    "MARAVILHA"                   
## [161] "IRACEMINHA"                   "SÃO MIGUEL DA BOA VISTA"     
## [163] "SANTA TEREZINHA DO PROGRESSO" "ROMELÂNDIA"                  
## [165] "BOM JESUS DO OESTE"           "IRATI"                       
## [167] "MODELO"                       "SERRA ALTA"                  
## [169] "SUL BRASIL"                   "SALTINHO"                    
## [171] "MONDAÍ"                       "MONTE CARLO"                 
## [173] "FRAIBURGO"                    "BRUNÓPOLIS"                  
## [175] "FREI ROGÉRIO"                 "MORRO DA FUMAÇA"             
## [177] "TREZE DE MAIO"                "SANGÃO"                      
## [179] "ÁGUAS FRIAS"                  "UNIÃO DO OESTE"              
## [181] "QUILOMBO"                     "NOVA ERECHIM"                
## [183] "NOVA ITABERABA"               "PALMA SOLA"                  
## [185] "PALMITOS"                     "ALTO BELA VISTA"             
## [187] "PRESIDENTE CASTELLO BRANCO"   "PERITIBA"                    
## [189] "PINHALZINHO"                  "JARDINÓPOLIS"                
## [191] "FORMOSA DO SUL"               "PASSOS MAIA"                 
## [193] "PONTE SERRADA"                "MATOS COSTA"                 
## [195] "PORTO UNIÃO"                  "RIO DO CAMPO"                
## [197] "AURORA"                       "RIO DO SUL"                  
## [199] "LONTRAS"                      "LAURENTINO"                  
## [201] "RIO NEGRINHO"                 "SALETE"                      
## [203] "WITMARSUM"                    "SANTA TEREZINHA"             
## [205] "VITOR MEIRELES"               "SANTA CECÍLIA"               
## [207] "LEBON RÉGIS"                  "ÁGUAS MORNAS"                
## [209] "SÃO PEDRO DE ALCÂNTARA"       "ANGELINA"                    
## [211] "SANTO AMARO DA IMPERATRIZ"    "RANCHO QUEIMADO"             
## [213] "MAJOR GERCINO"                "CAMPO ALEGRE"                
## [215] "SÃO BENTO DO SUL"             "ÁGUAS DE CHAPECÓ"            
## [217] "SÃO CARLOS"                   "SÃO JOÃO DO OESTE"           
## [219] "SÃO JOAQUIM"                  "URUPEMA"                     
## [221] "ANTÔNIO CARLOS"               "BIGUAÇU"                     
## [223] "SÃO JOSÉ"                     "PALHOÇA"                     
## [225] "SÃO JOSÉ DO CEDRO"            "ANCHIETA"                    
## [227] "NOVO HORIZONTE"               "GALVÃO"                      
## [229] "SÃO LOURENÇO DO OESTE"        "JUPIÁ"                       
## [231] "SÃO MIGUEL DO OESTE"          "BANDEIRANTE"                 
## [233] "BARRA BONITA"                 "PARAÍSO"                     
## [235] "GUARACIABA"                   "SAUDADES"                    
## [237] "CUNHATAÍ"                     "SEARA"                       
## [239] "SANTA ROSA DO SUL"            "TIMBÉ DO SUL"                
## [241] "SOMBRIO"                      "BALNEÁRIO GAIVOTA"           
## [243] "JACINTO MACHADO"              "ERMO"                        
## [245] "TAIÓ"                         "MIRIM DOCE"                  
## [247] "IBIAM"                        "IBICARÉ"                     
## [249] "PINHEIRO PRETO"               "TANGARÁ"                     
## [251] "DOUTOR PEDRINHO"              "POMERODE"                    
## [253] "BENEDITO NOVO"                "TIMBÓ"                       
## [255] "RIO DOS CEDROS"               "TRÊS BARRAS"                 
## [257] "OTACÍLIO COSTA"               "BRAÇO DO TROMBUDO"           
## [259] "AGRONÔMICA"                   "ATALANTA"                    
## [261] "AGROLÂNDIA"                   "POUSO REDONDO"               
## [263] "TROMBUDO CENTRAL"             "RIO DO OESTE"                
## [265] "PEDRAS GRANDES"               "CAPIVARI DE BAIXO"           
## [267] "ARMAZÉM"                      "GRAVATAL"                    
## [269] "TUBARÃO"                      "TUNÁPOLIS"                   
## [271] "SANTA HELENA"                 "VARGEÃO"                     
## [273] "PRESIDENTE NEREU"             "IMBUIA"                      
## [275] "VIDAL RAMOS"                  "LEOBERTO LEAL"               
## [277] "RIO DAS ANTAS"                "VIDEIRA"                     
## [279] "ARROIO TRINTA"                "IOMERÊ"                      
## [281] "XANXERÊ"                      "ENTRE RIOS"                  
## [283] "BOM JESUS"                    "XAVANTINA"                   
## [285] "ARVOREDO"                     "CORONEL FREITAS"             
## [287] "LAJEADO GRANDE"               "CORDILHEIRA ALTA"            
## [289] "MAREMA"                       "XAXIM"                       
## [291] "PRAIA GRANDE"                 "SÃO JOÃO DO SUL"             
## [293] "PASSO DE TORRES"
## Selecting by nome
nome
TREZE TÍLIAS
URUBICI
TURVO
VARGEM
ZORTÉA
VARGEM BONITA
URUSSANGA
UNIÃO DO OESTE
WITMARSUM
VITOR MEIRELES
URUPEMA
TROMBUDO CENTRAL
TUBARÃO
TUNÁPOLIS
VARGEÃO
VIDAL RAMOS
VIDEIRA
XANXERÊ
XAVANTINA
XAXIM

Selecionando colunas

muni[7]
##     moradoresdom
## 1       3.517143
## 2       3.230500
## 3       3.418627
## 4       3.415000
## 5       3.424000
## 6       3.364375
## 7       3.128333
## 8       3.263333
## 9       3.169167
## 10      3.198462
## 11      3.273750
## 12      3.266667
## 13      3.152632
## 14      3.283333
## 15      3.416000
## 16      3.070000
## 17      3.030000
## 18      3.360000
## 19      3.175000
## 20      3.083571
## 21      3.243333
## 22      3.197000
## 23      3.286000
## 24      2.788065
## 25      3.209744
## 26      2.953191
## 27      2.855398
## 28      3.393291
## 29      3.124359
## 30      3.034324
## 31      2.614978
## 32      3.055912
## 33      3.170336
## 34      3.186667
## 35      3.345789
## 36      3.279565
## 37      3.171579
## 38      3.162605
## 39      3.018182
## 40      3.270000
## 41      3.941429
## 42      3.545000
## 43      3.327500
## 44      3.166429
## 45      3.405000
## 46      3.283500
## 47      3.104412
## 48      2.924444
## 49      3.345714
## 50      3.370000
## 51      3.132000
## 52      3.405000
## 53      3.260194
## 54      3.286667
## 55      2.797143
## 56      3.170000
## 57      3.112823
## 58      3.030966
## 59      3.101280
## 60      3.173902
## 61      3.096741
## 62      3.191923
## 63      3.193333
## 64      3.187609
## 65      3.087586
## 66      3.148961
## 67      2.877273
## 68      3.231111
## 69      3.197000
## 70      3.412500
## 71      3.358421
## 72      3.100000
## 73      3.122414
## 74      3.318000
## 75      3.283636
## 76      3.177391
## 77      2.784638
## 78      3.340000
## 79      3.055714
## 80      3.446000
## 81      3.791818
## 82      3.202857
## 83      3.175263
## 84      3.167059
## 85      2.968309
## 86      3.159167
## 87      2.937037
## 88      3.101765
## 89      3.141512
## 90      3.099231
## 91      3.040000
## 92      3.041000
## 93      3.212000
## 94      2.810000
## 95      2.935000
## 96      2.985152
## 97      3.353182
## 98      3.282500
## 99      3.290000
## 100     3.657273
## 101     3.350909
## 102     3.176000
## 103     2.970000
## 104     3.035849
## 105     3.194468
## 106     3.060526
## 107     3.227143
## 108     3.121645
## 109     3.117812
## 110     3.341429
## 111     3.230000
## 112     3.206623
## 113     2.823768
## 114     3.234091
## 115     3.195610
## 116     3.326071
## 117     3.166605
## 118     3.053333
## 119     2.981220
## 120     3.039737
## 121     3.356667
## 122     3.035455
## 123     3.220000
## 124     2.830286
## 125     3.411200
## 126     2.877143
## 127     3.169522
## 128     3.494828
## 129     3.063580
## 130     3.127143
## 131     3.108636
## 132     2.982000
## 133     3.130000
## 134     3.171262
## 135     3.130667
## 136     3.225556
## 137     3.080000
## 138     3.176818
## 139     2.926908
## 140     3.060606
## 141     3.294444
## 142     3.174722
## 143     3.253947
## 144     3.225000
## 145     3.107813
## 146     3.256854
## 147     3.309286
## 148     3.082444
## 149     3.423333
## 150     3.267000
## 151     3.357059
## 152     3.074878
## 153     3.358182
## 154     3.342692
## 155     3.190485
## 156     3.371667
## 157     3.227895
## 158     3.311892
## 159     2.997500
## 160     3.034600
## 161     3.278889
## 162     3.215000
## 163     3.372857
## 164     3.060000
## 165     3.046667
## 166     3.212500
## 167     3.158500
## 168     3.394444
## 169     3.315000
## 170     3.390000
## 171     3.117647
## 172     3.343000
## 173     3.239091
## 174     3.193333
## 175     3.360000
## 176     3.381633
## 177     3.335263
## 178     3.422381
## 179     3.375714
## 180     3.335000
## 181     3.406154
## 182     3.318667
## 183     3.346000
## 184     3.318000
## 185     3.008163
## 186     3.020000
## 187     3.258333
## 188     3.261429
## 189     3.206667
## 190     3.400000
## 191     3.596000
## 192     3.539167
## 193     3.327778
## 194     3.386000
## 195     3.203846
## 196     3.242500
## 197     3.185882
## 198     2.962906
## 199     3.127500
## 200     2.988250
## 201     3.360682
## 202     3.137500
## 203     3.412500
## 204     3.477500
## 205     3.558947
## 206     3.359259
## 207     3.447500
## 208     3.304000
## 209     2.748333
## 210     3.126667
## 211     3.210667
## 212     2.940000
## 213     3.115000
## 214     3.186222
## 215     3.146231
## 216     3.116154
## 217     3.230000
## 218     2.957619
## 219     3.075854
## 220     3.122500
## 221     3.310000
## 222     3.257625
## 223     2.973125
## 224     3.171095
## 225     3.250313
## 226     3.314167
## 227     3.443750
## 228     3.207778
## 229     3.201944
## 230     3.111667
## 231     2.977000
## 232     3.260000
## 233     3.215000
## 234     3.270000
## 235     3.242381
## 236     3.340500
## 237     3.454000
## 238     3.145294
## 239     3.022857
## 240     3.179000
## 241     3.200000
## 242     2.771429
## 243     3.117000
## 244     3.182500
## 245     3.121591
## 246     3.216667
## 247     3.328000
## 248     3.064286
## 249     3.322500
## 250     3.147200
## 251     3.429000
## 252     3.225833
## 253     3.292857
## 254     3.169434
## 255     3.160370
## 256     3.423333
## 257     3.114783
## 258     3.047500
## 259     3.364194
## 260     3.002308
## 261     3.161111
## 262     3.308095
## 263     3.073684
## 264     3.170476
## 265     3.036875
## 266     3.129615
## 267     3.188421
## 268     2.995217
## 269     2.997067
## 270     3.392500
## 271     3.314000
## 272     3.346923
## 273     3.333333
## 274     3.238571
## 275     3.231250
## 276     3.343077
## 277     3.276364
## 278     3.162155
## 279     3.110000
## 280     2.938333
## 281     3.208158
## 282     3.474000
## 283     3.120000
## 284     3.545000
## 285     3.697143
## 286     3.335357
## 287     3.440000
## 288     3.371250
## 289     3.735000
## 290     3.247692
## 291     2.835294
## 292     3.065000
## 293     3.047500

##Selecionando várias colunas

#Criando uma sequência
1:10
##  [1]  1  2  3  4  5  6  7  8  9 10
#Criando uma sequência com passos definidos
seq(from=1, to=10, by=2)
## [1] 1 3 5 7 9
#Selecionando uma sequência de colunas
muni[2:5]
##                             nome    pop     renda       area
## 1                         IPUAÇU   6795 1022.4793  260.89267
## 2                   SÃO DOMINGOS   9406 1451.3080  367.20265
## 3                   ABELARDO LUZ  17034  935.0404  953.05839
## 4                SANTIAGO DO SUL   1465 1147.6400   73.83577
## 5                CORONEL MARTINS   2458  754.2400  107.29859
## 6                      ÁGUA DOCE   6925 1105.8175 1314.26125
## 7                   SALTO VELOSO   4293 1144.3025  105.06768
## 8                       MACIEIRA   1806  947.6167  259.64086
## 9                   TREZE TÍLIAS   6331 1901.0692  186.63834
## 10                    CATANDUVAS   9528 1199.9023  197.29685
## 11                    BOM RETIRO   8901 1028.0500 1055.55306
## 12                       URUBICI  10678  993.8619 1017.63451
## 13                ALFREDO WAGNER   9356  925.1837  732.76764
## 14                    RIO RUFINO   2413  701.8933  282.50387
## 15            SANTA ROSA DE LIMA   2060 1274.5980  202.00683
## 16                 SÃO BONIFÁCIO   3001 1059.1517  460.36359
## 17                    ANITÁPOLIS   3214  710.5210  542.11975
## 18                   RIO FORTUNA   4439 2050.1030  302.86341
## 19                       ARABUTÃ   4180 1172.7570  133.29470
## 20                     ARARANGUÁ  60941 1180.7626  303.29912
## 21                       MELEIRO   6984 1099.4114  187.05653
## 22                      MARACAJÁ   6352 1056.8690   62.46344
## 23                  MORRO GRANDE   2890 1052.4020  258.18494
## 24     BALNEÁRIO ARROIO DO SILVA   9552 1287.4719   95.25919
## 25                         TURVO  11831 1266.9018  235.51417
## 26                     BOMBINHAS  14030 1383.7702   35.92343
## 27                       ITAPEMA  45693 1915.8504   57.80262
## 28                      CAMBORIÚ  62233 1237.6556  212.31967
## 29                       TIJUCAS  30732 1280.2533  279.57755
## 30                    PORTO BELO  16053 1760.3470   92.40751
## 31            BALNEÁRIO CAMBORIÚ 107421 2755.8748   46.24378
## 32                      BLUMENAU 307205 1653.6179  518.49663
## 33                        GASPAR  57845 1389.4611  386.77574
## 34              SÃO JOÃO BATISTA  26173 1114.0072  200.58253
## 35                     CANELINHA  10600 1007.3400  152.55999
## 36                     GUABIRUBA  18426 1253.2270  174.67820
## 37                   NOVA TRENTO  12158 1147.6100  402.89132
## 38                       BRUSQUE 105072 1518.0776  283.22301
## 39                      BOTUVERÁ   4459 1091.5891  296.18763
## 40                       CAÇADOR  70373 1282.8293  984.28550
## 41                        CALMON   3387  629.2786  638.17307
## 42                  TIMBÓ GRANDE   7146  710.2567  598.47872
## 43                         CAIBI   6150 1228.7608  174.83923
## 44                       RIQUEZA   4834  921.3129  191.90688
## 45                SÃO BERNARDINO   2674  727.5840  149.01984
## 46                     CAMPO ERÊ   9268  978.2110  479.09304
## 47                  CAMPOS NOVOS  32709 1142.3626 1719.37199
## 48                        VARGEM   2806  845.1411  350.15126
## 49                   CELSO RAMOS   2756  645.3443  208.27651
## 50               ANITA GARIBALDI   8603  649.7014  587.91831
## 51                 ABDON BATISTA   2646  892.8300  235.83153
## 52           BELA VISTA DO TOLDO   5987  662.9600  538.13326
## 53                     CANOINHAS  52448 1040.1089 1140.39361
## 54                      GUATAMBÚ   4678 1237.5500  205.87427
## 55               PLANALTO ALEGRE   2649 1255.2143   62.46097
## 56                CAXAMBU DO SUL   4407 1027.6000  140.70832
## 57                       CHAPECÓ 182216 1482.3753  626.05888
## 58                     CONCÓRDIA  68520 1342.7480  799.44897
## 59                         IÇARA  58688 1149.1354  228.92777
## 60                  COCAL DO SUL  15159 1214.2507   71.12963
## 61                      CRICIÚMA 190625 1766.5529  235.70142
## 62                   SIDERÓPOLIS  12982 1308.7338  261.66465
## 63                   NOVA VENEZA  13239 1166.8633  295.03549
## 64                  FORQUILHINHA  22474 1269.5957  183.13400
## 65                    CUNHA PORÃ  10573 1208.9197  217.91488
## 66                   CURITIBANOS  37500 1079.8860  948.73772
## 67          SÃO CRISTOVÃO DO SUL   4315  725.8027  351.10195
## 68           PONTE ALTA DO NORTE   3303  891.2567  399.23791
## 69                    PONTE ALTA   4892  912.3410  568.95787
## 70                      BELMONTE   2625  927.5450   92.86651
## 71                      DESCANSO   8621 1200.1453  287.39279
## 72                FLOR DO SERTÃO   1584  959.1825   58.73480
## 73            DIONÍSIO CERQUEIRA  14753  980.4110  379.23684
## 74                    OURO VERDE   2270  938.2580  189.22364
## 75            FAXINAL DOS GUEDES  10651 1514.5421  339.69885
## 76        GOVERNADOR CELSO RAMOS  12984 1088.1943  117.18509
## 77                 FLORIANÓPOLIS 418631 3014.3945  675.40761
## 78                      PRINCESA   2739 1255.3500   86.17996
## 79                GUARUJÁ DO SUL   4902 1024.5729  100.21879
## 80                     DONA EMMA   3709 1090.2410  181.17101
## 81                  JOSÉ BOITEUX   4719  856.8009  405.22880
## 82            PRESIDENTE GETÚLIO  14806 1150.2094  294.26488
## 83                        APIÚNA   9580 1071.9042  493.34221
## 84                       IBIRAMA  17299 1235.5068  247.34826
## 85                      IMBITUBA  39758 1252.0131  182.92927
## 86                   PAULO LOPES   6674 1108.3233  449.67905
## 87                      GAROPABA  18021 1275.9474  115.40476
## 88                  SÃO MARTINHO   3208 1138.5471  223.88862
## 89                       INDAIAL  54766 1328.3597  430.79040
## 90                       ASCURRA   7402 1058.3292  110.90126
## 91                        RODEIO  10880 1197.4436  129.93380
## 92                         IPIRA   4742  886.4850  154.56432
## 93                          OURO   7342 1328.5440  213.57498
## 94                      PIRATUBA   4775  960.0530  145.97605
## 95                        ZORTÉA   2979 1313.0325  189.71731
## 96                      CAPINZAL  20716 1209.4930  244.20037
## 97                IPORÃ DO OESTE   8389 1022.4405  199.30175
## 98                      IPUMIRIM   7213 1045.2438  247.71640
## 99                         IRANI   9511 1083.8100  325.73724
## 100                VARGEM BONITA   4784 1044.1164  298.49780
## 101                  IRINEÓPOLIS  10349  866.8755  589.55948
## 102                        PAIAL   1757  859.7980   85.75657
## 103                          ITÁ   6406 1234.3516  165.86834
## 104                        PENHA  25027 1241.2170   58.74760
## 105                   NAVEGANTES  60428 1170.2491  112.02968
## 106           BALNEÁRIO PIÇARRAS  17022 1600.9558   99.42377
## 107                       ILHOTA  12344 1092.2348  252.88322
## 108                       ITAJAÍ 182690 1657.1540  288.28661
## 109                   ITAPIRANGA  15369 1255.6284  283.03120
## 110          CHAPADÃO DO LAGEADO   2758  684.7471  124.75769
## 111                  PETROLÂNDIA   6128 1000.2817  305.87010
## 112                   ITUPORANGA  22142 1262.1612  336.92946
## 113                    JAGUARUNA  17270 1142.1614  328.34692
## 114                    SCHROEDER  15285 1334.1532  164.38170
## 115                       CORUPÁ  13820 1274.1212  402.78936
## 116                   GUARAMIRIM  35138 1243.3336  268.58491
## 117               JARAGUÁ DO SUL 142654 1624.7825  529.44742
## 118                  ERVAL VELHO   4344 1226.4317  207.35920
## 119                      JOAÇABA  26895 1936.7120  242.10964
## 120               HERVAL D'OESTE  21210 1203.7537  217.33123
## 121                 LACERDÓPOLIS   2199 1401.4200   68.89046
## 122                      LUZERNA   5584 1288.1655  118.38194
## 123                       JABORÁ   4041 1245.1050  182.15448
## 124                       ITAPOÁ  14662 1314.1894  248.41799
## 125                     ARAQUARI  24765  917.5836  383.98552
## 126       BALNEÁRIO BARRA DO SUL   8421 1147.9482  111.28073
## 127                    JOINVILLE 512893 1804.7436 1126.10487
## 128                       GARUVA  14686 1042.0345  501.96816
## 129         SÃO FRANCISCO DO SUL  42321 1415.5638  498.63692
## 130               BOCAINA DO SUL   3265  679.5471  512.84890
## 131          SÃO JOSÉ DO CERRITO   9204  631.6536  944.91665
## 132                   CAPÃO ALTO   2753  941.2930 1335.83646
## 133                       PAINEL   2353  931.2280  740.18523
## 134                        LAGES 156217 1369.0444 2631.50212
## 135            CAMPO BELO DO SUL   7413  670.2613 1027.65040
## 136                  CERRO NEGRO   3573  521.3778  417.33572
## 137                     PALMEIRA   2373  847.1920  289.29754
## 138                CORREIA PINTO  14606  965.1309  651.11752
## 139                       LAGUNA  51449 1352.8822  336.39380
## 140                       IMARUÍ  11659  690.2188  542.63259
## 141          BOM JARDIM DA SERRA   4380 1124.6089  935.87171
## 142                  SÃO LUDGERO  10929 1320.4917  107.66362
## 143               BRAÇO DO NORTE  28969 1286.7811  211.86409
## 144                      TREVISO   3518 1160.3650  157.08428
## 145                 LAURO MULLER  14348 1145.6641  270.78149
## 146                      ORLEANS  21385 1031.4910  548.79170
## 147                    GRÃO PARÁ   6206 1324.7079  338.15633
## 148                    URUSSANGA  20201 1334.2829  254.86889
## 149               LINDÓIA DO SUL   4635 1161.0667  188.63598
## 150                 MASSARANDUBA  14668 1312.9558  374.07778
## 151                   LUIZ ALVES  10364 1337.4876  259.88196
## 152                  BARRA VELHA  22324 1362.7754  140.35138
## 153         SÃO JOÃO DO ITAPERIÚ   3431 1229.8718  151.41984
## 154                   ITAIÓPOLIS  20270  920.4196 1295.43151
## 155                        MAFRA  52654 1220.9341 1404.03415
## 156                MONTE CASTELO   8322  596.2161  573.58462
## 157                 MAJOR VIEIRA   7447  766.3884  525.49530
## 158                    PAPANDUVA  17904  905.7711  747.86085
## 159                    TIGRINHOS   1754  707.0800   57.94410
## 160                    MARAVILHA  22048 1149.1770  171.28431
## 161                   IRACEMINHA   4247  829.9378  163.10496
## 162      SÃO MIGUEL DA BOA VISTA   1889 1163.6825   71.40493
## 163 SANTA TEREZINHA DO PROGRESSO   2895  795.4914  118.80453
## 164                   ROMELÂNDIA   5531 1052.2053  222.57341
## 165           BOM JESUS DO OESTE   2123 1075.7417   67.09356
## 166                        IRATI   2096  844.3850   78.27597
## 167                       MODELO   4019 1401.2325   91.10643
## 168                   SERRA ALTA   3261 1196.9567   92.34761
## 169                   SUL BRASIL   2757  932.8167  112.87106
## 170                     SALTINHO   3931  943.2737  156.53249
## 171                       MONDAÍ   9976 1066.7459  202.14504
## 172                  MONTE CARLO   9301  785.1690  193.52063
## 173                    FRAIBURGO  34474 1216.4529  547.84943
## 174                   BRUNÓPOLIS   2850  651.3867  337.04358
## 175                 FREI ROGÉRIO   2474  830.6800  159.21626
## 176              MORRO DA FUMAÇA  16098 1253.6392   83.11726
## 177                TREZE DE MAIO   6854 1208.7555  161.66879
## 178                       SANGÃO  10369 1008.7057   82.89177
## 179                  ÁGUAS FRIAS   2422 1024.7614   76.14040
## 180               UNIÃO DO OESTE   2910  951.7300   92.61667
## 181                     QUILOMBO  10196 1029.0096  280.25751
## 182                 NOVA ERECHIM   4274 2345.2680   64.89138
## 183               NOVA ITABERABA   4260 1033.9027  137.54795
## 184                   PALMA SOLA   7718  947.2715  330.10407
## 185                     PALMITOS  15979 1116.8388  352.50395
## 186              ALTO BELA VISTA   2005  896.9650  103.97949
## 187   PRESIDENTE CASTELLO BRANCO   1719 1407.6983   65.60480
## 188                     PERITIBA   2988 1169.3043   95.84270
## 189                  PINHALZINHO  16289 1305.0981  128.15916
## 190                 JARDINÓPOLIS   1761 1123.9500   67.68299
## 191               FORMOSA DO SUL   2599 1130.1020  100.10478
## 192                  PASSOS MAIA   4406  706.2783  619.15573
## 193                PONTE SERRADA  10943 1001.0815  564.48822
## 194                  MATOS COSTA   2835  766.5580  433.07303
## 195                  PORTO UNIÃO  33345 1296.2518  845.34079
## 196                 RIO DO CAMPO   6192 1361.9585  506.24892
## 197                       AURORA   5541 1361.4471  206.61257
## 198                   RIO DO SUL  60827 1655.1189  260.97035
## 199                      LONTRAS  10231 1014.9804  197.10962
## 200                   LAURENTINO   5958 1174.2967   79.58520
## 201                 RIO NEGRINHO  39816 1054.0952  907.31065
## 202                       SALETE   7352 1194.4654  179.34761
## 203                    WITMARSUM   3564  980.0287  151.98363
## 204              SANTA TEREZINHA   8750  752.0708  715.26334
## 205               VITOR MEIRELES   5198  822.2037  370.52091
## 206                SANTA CECÍLIA  15737  981.2233 1145.81075
## 207                  LEBON RÉGIS  11825  742.6100  941.48504
## 208                 ÁGUAS MORNAS   5530  946.5870  327.35585
## 209       SÃO PEDRO DE ALCÂNTARA   3382 1175.7933  140.01935
## 210                     ANGELINA   5203  973.4783  500.03820
## 211    SANTO AMARO DA IMPERATRIZ  19720 1397.5067  344.04800
## 212              RANCHO QUEIMADO   2726 1307.8350  286.28711
## 213                MAJOR GERCINO   3279  861.3260  306.17827
## 214                 CAMPO ALEGRE  11676  997.0196  499.07537
## 215             SÃO BENTO DO SUL  74676 1202.9685  501.63138
## 216             ÁGUAS DE CHAPECÓ   5968  903.6377  139.83230
## 217                   SÃO CARLOS  10226 1238.4206  161.29220
## 218            SÃO JOÃO DO OESTE   6035 1392.1581  163.30441
## 219                  SÃO JOAQUIM  24773  946.3554 1892.25557
## 220                      URUPEMA   2482  893.4950  350.03628
## 221               ANTÔNIO CARLOS   7446 1364.1675  233.57414
## 222                      BIGUAÇU  58051 1165.2016  367.89088
## 223                     SÃO JOSÉ 208955 1794.5582  150.45281
## 224                      PALHOÇA 136802 1306.8789  395.13264
## 225            SÃO JOSÉ DO CEDRO  13639 1245.5806  281.25255
## 226                     ANCHIETA   6362 1136.1325  231.99210
## 227               NOVO HORIZONTE   2738  901.6650  151.85239
## 228                       GALVÃO   3471 1167.3744  139.34097
## 229        SÃO LOURENÇO DO OESTE  21719 1116.0047  356.31598
## 230                        JUPIÁ   2146  955.8517   92.05500
## 231          SÃO MIGUEL DO OESTE  36210 1499.2622  234.03717
## 232                  BANDEIRANTE   2899  939.2600  147.91121
## 233                 BARRA BONITA   1874  864.5200   93.10862
## 234                      PARAÍSO   4023  783.0670  181.84318
## 235                   GUARACIABA  10483 1172.4005  330.56942
## 236                     SAUDADES   9011 1101.3005  206.59570
## 237                     CUNHATAÍ   1875 1782.4200   55.76823
## 238                        SEARA  16914 1624.8726  310.98096
## 239            SANTA ROSA DO SUL   8017  944.3636  151.03217
## 240                 TIMBÉ DO SUL   5283  967.1840  330.09159
## 241                      SOMBRIO  26525  979.7083  143.32767
## 242            BALNEÁRIO GAIVOTA   8170 1180.9929  145.76234
## 243              JACINTO MACHADO  10607  966.1350  431.38014
## 244                         ERMO   2030 1184.0075   63.44021
## 245                         TAIÓ  17055 1332.0641  692.88360
## 246                   MIRIM DOCE   2511  886.4533  335.72519
## 247                        IBIAM   1942 1005.8480  146.71495
## 248                      IBICARÉ   3363 1037.3843  155.79152
## 249               PINHEIRO PRETO   3132 1534.0508   61.46054
## 250                      TANGARÁ   8661 1102.9056  388.38339
## 251              DOUTOR PEDRINHO   3604  862.0550  374.62756
## 252                     POMERODE  27627 1317.5694  214.72678
## 253                BENEDITO NOVO  10318 1075.0710  388.79774
## 254                        TIMBÓ  36735 1416.3917  127.40488
## 255               RIO DOS CEDROS  10277 1087.6163  554.07781
## 256                  TRÊS BARRAS  18090  883.1836  437.55701
## 257               OTACÍLIO COSTA  16334 1136.6761  845.00926
## 258            BRAÇO DO TROMBUDO   3370 1090.9088   90.31908
## 259                   AGRONÔMICA   4898 1280.4403  129.91502
## 260                     ATALANTA   3287  958.9415   94.19214
## 261                   AGROLÂNDIA   9307 1154.3133  207.55375
## 262                POUSO REDONDO  14777 1089.8283  359.39205
## 263             TROMBUDO CENTRAL   6498 1222.8505  108.61734
## 264                 RIO DO OESTE   6985 1500.1519  247.80312
## 265               PEDRAS GRANDES   4094  846.1788  159.31254
## 266            CAPIVARI DE BAIXO  21667 1130.5515   53.33664
## 267                      ARMAZÉM   7732 1037.2274  173.57756
## 268                     GRAVATAL  10615 1124.3817  164.75212
## 269                      TUBARÃO  96880 1524.6933  301.75389
## 270                    TUNÁPOLIS   4627 1375.5162  133.29098
## 271                 SANTA HELENA   2382 1107.3940   81.22917
## 272                      VARGEÃO   3532 1062.9815  166.64796
## 273             PRESIDENTE NEREU   2266 1183.0867  225.66116
## 274                       IMBUIA   5691  982.9521  123.03709
## 275                  VIDAL RAMOS   6208 1100.5838  342.88717
## 276                LEOBERTO LEAL   3338  963.4954  291.21423
## 277                RIO DAS ANTAS   6133 1059.0991  318.00437
## 278                      VIDEIRA  46980 1397.9557  384.52043
## 279                ARROIO TRINTA   3498 1258.0450   94.30163
## 280                       IOMERÊ   2729 1274.5183  113.75367
## 281                      XANXERÊ  43713 1346.0947  377.76414
## 282                   ENTRE RIOS   3018  649.4020  104.54927
## 283                    BOM JESUS   2521 1127.6217   63.46903
## 284                    XAVANTINA   4142 1351.8338  216.68875
## 285                     ARVOREDO   2248 1076.9014   90.76933
## 286              CORONEL FREITAS  10201 1192.4279  233.96802
## 287               LAJEADO GRANDE   1490 2431.9933   65.28369
## 288             CORDILHEIRA ALTA   3767 1143.4725   82.85807
## 289                       MAREMA   2203 1173.6575  104.06706
## 290                        XAXIM  25699 1139.3831  293.27829
## 291                 PRAIA GRANDE   7232  713.1094  284.16277
## 292              SÃO JOÃO DO SUL   6990  805.7338  183.35561
## 293              PASSO DE TORRES   6586 1046.2169   95.11309

Selecionando colunas e linhas

Dentro dos colchetes, primeiro as linhas, depois as colunas [linhas,colunas]

muni[1:4,7:9]
##   moradoresdom    rgi nome_rgi
## 1     3.517143 420011  Xanxerê
## 2     3.230500 420011  Xanxerê
## 3     3.418627 420011  Xanxerê
## 4     3.415000 420007  Chapecó

Selecionando colunas e linhas

  • Selecionando variáveis pela sua posição (nº da coluna)
muni[1:2,c(1,6:9)]
##   cod_mun leitos moradoresdom    rgi nome_rgi
## 1 4207684      0     3.517143 420011  Xanxerê
## 2 4216107      0     3.230500 420011  Xanxerê
  • Selecionando variáveis pelo nome
muni[1:2,c('nome','pop')]
##           nome  pop
## 1       IPUAÇU 6795
## 2 SÃO DOMINGOS 9406

Fazendo um subset

Seleção por atributos

  • Lembrar que o R é “case sensitive”
subset(muni,muni$nome=='FLORIANÓPOLIS')
##    cod_mun          nome    pop    renda     area leitos moradoresdom    rgi
## 77 4205407 FLORIANÓPOLIS 418631 3014.395 675.4076    281     2.784638 420001
##         nome_rgi
## 77 Florianópolis

Dplyr: meu pacote favorito!

Reordenando uma tabela

  • População (maior para menor)
library(dplyr)
muni<-muni %>% arrange(-pop)
nome pop
JOINVILLE 512893
FLORIANÓPOLIS 418631
BLUMENAU 307205
SÃO JOSÉ 208955
CRICIÚMA 190625
ITAJAÍ 182690
CHAPECÓ 182216
LAGES 156217
JARAGUÁ DO SUL 142654
PALHOÇA 136802

Resumo da tabela

  • Sumário de variáveis
summary(muni[,3:7])
pop renda area leitos moradoresdom
Min. : 1465 Min. : 521.4 Min. : 35.92 Min. : 0.000 Min. :2.615
1st Qu.: 3518 1st Qu.: 958.9 1st Qu.: 139.34 1st Qu.: 0.000 1st Qu.:3.104
Median : 7413 Median :1127.6 Median : 233.57 Median : 0.000 Median :3.198
Mean : 21228 Mean :1143.4 Mean : 326.17 Mean : 5.399 Mean :3.205
3rd Qu.: 16289 3rd Qu.:1274.1 3rd Qu.: 383.99 3rd Qu.: 1.000 3rd Qu.:3.328
Max. :512893 Max. :3014.4 Max. :2631.50 Max. :281.000 Max. :3.941

Selecionando colunas

muni%>%select(nome, renda, pop)
nome renda pop
JOINVILLE 1804.7436 512893
FLORIANÓPOLIS 3014.3945 418631
BLUMENAU 1653.6179 307205
SÃO JOSÉ 1794.5582 208955
CRICIÚMA 1766.5529 190625
ITAJAÍ 1657.1540 182690
CHAPECÓ 1482.3753 182216
LAGES 1369.0444 156217
JARAGUÁ DO SUL 1624.7825 142654
PALHOÇA 1306.8789 136802
BALNEÁRIO CAMBORIÚ 2755.8748 107421
BRUSQUE 1518.0776 105072
TUBARÃO 1524.6933 96880
SÃO BENTO DO SUL 1202.9685 74676
CAÇADOR 1282.8293 70373
CONCÓRDIA 1342.7480 68520
CAMBORIÚ 1237.6556 62233
ARARANGUÁ 1180.7626 60941
RIO DO SUL 1655.1189 60827
NAVEGANTES 1170.2491 60428
IÇARA 1149.1354 58688
BIGUAÇU 1165.2016 58051
GASPAR 1389.4611 57845
INDAIAL 1328.3597 54766
MAFRA 1220.9341 52654
CANOINHAS 1040.1089 52448
LAGUNA 1352.8822 51449
VIDEIRA 1397.9557 46980
ITAPEMA 1915.8504 45693
XANXERÊ 1346.0947 43713
SÃO FRANCISCO DO SUL 1415.5638 42321
RIO NEGRINHO 1054.0952 39816
IMBITUBA 1252.0131 39758
CURITIBANOS 1079.8860 37500
TIMBÓ 1416.3917 36735
SÃO MIGUEL DO OESTE 1499.2622 36210
GUARAMIRIM 1243.3336 35138
FRAIBURGO 1216.4529 34474
PORTO UNIÃO 1296.2518 33345
CAMPOS NOVOS 1142.3626 32709
TIJUCAS 1280.2533 30732
BRAÇO DO NORTE 1286.7811 28969
POMERODE 1317.5694 27627
JOAÇABA 1936.7120 26895
SOMBRIO 979.7083 26525
SÃO JOÃO BATISTA 1114.0072 26173
XAXIM 1139.3831 25699
PENHA 1241.2170 25027
SÃO JOAQUIM 946.3554 24773
ARAQUARI 917.5836 24765
FORQUILHINHA 1269.5957 22474
BARRA VELHA 1362.7754 22324
ITUPORANGA 1262.1612 22142
MARAVILHA 1149.1770 22048
SÃO LOURENÇO DO OESTE 1116.0047 21719
CAPIVARI DE BAIXO 1130.5515 21667
ORLEANS 1031.4910 21385
HERVAL D’OESTE 1203.7537 21210
CAPINZAL 1209.4930 20716
ITAIÓPOLIS 920.4196 20270
URUSSANGA 1334.2829 20201
SANTO AMARO DA IMPERATRIZ 1397.5067 19720
GUABIRUBA 1253.2270 18426
TRÊS BARRAS 883.1836 18090
GAROPABA 1275.9474 18021
PAPANDUVA 905.7711 17904
IBIRAMA 1235.5068 17299
JAGUARUNA 1142.1614 17270
TAIÓ 1332.0641 17055
ABELARDO LUZ 935.0404 17034
BALNEÁRIO PIÇARRAS 1600.9558 17022
SEARA 1624.8726 16914
OTACÍLIO COSTA 1136.6761 16334
PINHALZINHO 1305.0981 16289
MORRO DA FUMAÇA 1253.6392 16098
PORTO BELO 1760.3470 16053
PALMITOS 1116.8388 15979
SANTA CECÍLIA 981.2233 15737
ITAPIRANGA 1255.6284 15369
SCHROEDER 1334.1532 15285
COCAL DO SUL 1214.2507 15159
PRESIDENTE GETÚLIO 1150.2094 14806
POUSO REDONDO 1089.8283 14777
DIONÍSIO CERQUEIRA 980.4110 14753
GARUVA 1042.0345 14686
MASSARANDUBA 1312.9558 14668
ITAPOÁ 1314.1894 14662
CORREIA PINTO 965.1309 14606
LAURO MULLER 1145.6641 14348
BOMBINHAS 1383.7702 14030
CORUPÁ 1274.1212 13820
SÃO JOSÉ DO CEDRO 1245.5806 13639
NOVA VENEZA 1166.8633 13239
GOVERNADOR CELSO RAMOS 1088.1943 12984
SIDERÓPOLIS 1308.7338 12982
ILHOTA 1092.2348 12344
NOVA TRENTO 1147.6100 12158
TURVO 1266.9018 11831
LEBON RÉGIS 742.6100 11825
CAMPO ALEGRE 997.0196 11676
IMARUÍ 690.2188 11659
PONTE SERRADA 1001.0815 10943
SÃO LUDGERO 1320.4917 10929
RODEIO 1197.4436 10880
URUBICI 993.8619 10678
FAXINAL DOS GUEDES 1514.5421 10651
GRAVATAL 1124.3817 10615
JACINTO MACHADO 966.1350 10607
CANELINHA 1007.3400 10600
CUNHA PORÃ 1208.9197 10573
GUARACIABA 1172.4005 10483
SANGÃO 1008.7057 10369
LUIZ ALVES 1337.4876 10364
IRINEÓPOLIS 866.8755 10349
BENEDITO NOVO 1075.0710 10318
RIO DOS CEDROS 1087.6163 10277
LONTRAS 1014.9804 10231
SÃO CARLOS 1238.4206 10226
CORONEL FREITAS 1192.4279 10201
QUILOMBO 1029.0096 10196
MONDAÍ 1066.7459 9976
APIÚNA 1071.9042 9580
BALNEÁRIO ARROIO DO SILVA 1287.4719 9552
CATANDUVAS 1199.9023 9528
IRANI 1083.8100 9511
SÃO DOMINGOS 1451.3080 9406
ALFREDO WAGNER 925.1837 9356
AGROLÂNDIA 1154.3133 9307
MONTE CARLO 785.1690 9301
CAMPO ERÊ 978.2110 9268
SÃO JOSÉ DO CERRITO 631.6536 9204
SAUDADES 1101.3005 9011
BOM RETIRO 1028.0500 8901
SANTA TEREZINHA 752.0708 8750
TANGARÁ 1102.9056 8661
DESCANSO 1200.1453 8621
ANITA GARIBALDI 649.7014 8603
BALNEÁRIO BARRA DO SUL 1147.9482 8421
IPORÃ DO OESTE 1022.4405 8389
MONTE CASTELO 596.2161 8322
BALNEÁRIO GAIVOTA 1180.9929 8170
SANTA ROSA DO SUL 944.3636 8017
ARMAZÉM 1037.2274 7732
PALMA SOLA 947.2715 7718
MAJOR VIEIRA 766.3884 7447
ANTÔNIO CARLOS 1364.1675 7446
CAMPO BELO DO SUL 670.2613 7413
ASCURRA 1058.3292 7402
SALETE 1194.4654 7352
OURO 1328.5440 7342
PRAIA GRANDE 713.1094 7232
IPUMIRIM 1045.2438 7213
TIMBÓ GRANDE 710.2567 7146
SÃO JOÃO DO SUL 805.7338 6990
RIO DO OESTE 1500.1519 6985
MELEIRO 1099.4114 6984
ÁGUA DOCE 1105.8175 6925
TREZE DE MAIO 1208.7555 6854
IPUAÇU 1022.4793 6795
PAULO LOPES 1108.3233 6674
PASSO DE TORRES 1046.2169 6586
TROMBUDO CENTRAL 1222.8505 6498
ITÁ 1234.3516 6406
ANCHIETA 1136.1325 6362
MARACAJÁ 1056.8690 6352
TREZE TÍLIAS 1901.0692 6331
VIDAL RAMOS 1100.5838 6208
GRÃO PARÁ 1324.7079 6206
RIO DO CAMPO 1361.9585 6192
CAIBI 1228.7608 6150
RIO DAS ANTAS 1059.0991 6133
PETROLÂNDIA 1000.2817 6128
SÃO JOÃO DO OESTE 1392.1581 6035
BELA VISTA DO TOLDO 662.9600 5987
ÁGUAS DE CHAPECÓ 903.6377 5968
LAURENTINO 1174.2967 5958
IMBUIA 982.9521 5691
LUZERNA 1288.1655 5584
AURORA 1361.4471 5541
ROMELÂNDIA 1052.2053 5531
ÁGUAS MORNAS 946.5870 5530
TIMBÉ DO SUL 967.1840 5283
ANGELINA 973.4783 5203
VITOR MEIRELES 822.2037 5198
GUARUJÁ DO SUL 1024.5729 4902
AGRONÔMICA 1280.4403 4898
PONTE ALTA 912.3410 4892
RIQUEZA 921.3129 4834
VARGEM BONITA 1044.1164 4784
PIRATUBA 960.0530 4775
IPIRA 886.4850 4742
JOSÉ BOITEUX 856.8009 4719
GUATAMBÚ 1237.5500 4678
LINDÓIA DO SUL 1161.0667 4635
TUNÁPOLIS 1375.5162 4627
BOTUVERÁ 1091.5891 4459
RIO FORTUNA 2050.1030 4439
CAXAMBU DO SUL 1027.6000 4407
PASSOS MAIA 706.2783 4406
BOM JARDIM DA SERRA 1124.6089 4380
ERVAL VELHO 1226.4317 4344
SÃO CRISTOVÃO DO SUL 725.8027 4315
SALTO VELOSO 1144.3025 4293
NOVA ERECHIM 2345.2680 4274
NOVA ITABERABA 1033.9027 4260
IRACEMINHA 829.9378 4247
ARABUTÃ 1172.7570 4180
XAVANTINA 1351.8338 4142
PEDRAS GRANDES 846.1788 4094
JABORÁ 1245.1050 4041
PARAÍSO 783.0670 4023
MODELO 1401.2325 4019
SALTINHO 943.2737 3931
CORDILHEIRA ALTA 1143.4725 3767
DONA EMMA 1090.2410 3709
DOUTOR PEDRINHO 862.0550 3604
CERRO NEGRO 521.3778 3573
WITMARSUM 980.0287 3564
VARGEÃO 1062.9815 3532
TREVISO 1160.3650 3518
ARROIO TRINTA 1258.0450 3498
GALVÃO 1167.3744 3471
SÃO JOÃO DO ITAPERIÚ 1229.8718 3431
CALMON 629.2786 3387
SÃO PEDRO DE ALCÂNTARA 1175.7933 3382
BRAÇO DO TROMBUDO 1090.9088 3370
IBICARÉ 1037.3843 3363
LEOBERTO LEAL 963.4954 3338
PONTE ALTA DO NORTE 891.2567 3303
ATALANTA 958.9415 3287
MAJOR GERCINO 861.3260 3279
BOCAINA DO SUL 679.5471 3265
SERRA ALTA 1196.9567 3261
ANITÁPOLIS 710.5210 3214
SÃO MARTINHO 1138.5471 3208
PINHEIRO PRETO 1534.0508 3132
ENTRE RIOS 649.4020 3018
SÃO BONIFÁCIO 1059.1517 3001
PERITIBA 1169.3043 2988
ZORTÉA 1313.0325 2979
UNIÃO DO OESTE 951.7300 2910
BANDEIRANTE 939.2600 2899
SANTA TEREZINHA DO PROGRESSO 795.4914 2895
MORRO GRANDE 1052.4020 2890
BRUNÓPOLIS 651.3867 2850
MATOS COSTA 766.5580 2835
VARGEM 845.1411 2806
CHAPADÃO DO LAGEADO 684.7471 2758
SUL BRASIL 932.8167 2757
CELSO RAMOS 645.3443 2756
CAPÃO ALTO 941.2930 2753
PRINCESA 1255.3500 2739
NOVO HORIZONTE 901.6650 2738
IOMERÊ 1274.5183 2729
RANCHO QUEIMADO 1307.8350 2726
SÃO BERNARDINO 727.5840 2674
PLANALTO ALEGRE 1255.2143 2649
ABDON BATISTA 892.8300 2646
BELMONTE 927.5450 2625
FORMOSA DO SUL 1130.1020 2599
BOM JESUS 1127.6217 2521
MIRIM DOCE 886.4533 2511
URUPEMA 893.4950 2482
FREI ROGÉRIO 830.6800 2474
CORONEL MARTINS 754.2400 2458
ÁGUAS FRIAS 1024.7614 2422
RIO RUFINO 701.8933 2413
SANTA HELENA 1107.3940 2382
PALMEIRA 847.1920 2373
PAINEL 931.2280 2353
OURO VERDE 938.2580 2270
PRESIDENTE NEREU 1183.0867 2266
ARVOREDO 1076.9014 2248
MAREMA 1173.6575 2203
LACERDÓPOLIS 1401.4200 2199
JUPIÁ 955.8517 2146
BOM JESUS DO OESTE 1075.7417 2123
IRATI 844.3850 2096
SANTA ROSA DE LIMA 1274.5980 2060
ERMO 1184.0075 2030
ALTO BELA VISTA 896.9650 2005
IBIAM 1005.8480 1942
SÃO MIGUEL DA BOA VISTA 1163.6825 1889
CUNHATAÍ 1782.4200 1875
BARRA BONITA 864.5200 1874
MACIEIRA 947.6167 1806
JARDINÓPOLIS 1123.9500 1761
PAIAL 859.7980 1757
TIGRINHOS 707.0800 1754
PRESIDENTE CASTELLO BRANCO 1407.6983 1719
FLOR DO SERTÃO 959.1825 1584
LAJEADO GRANDE 2431.9933 1490
SANTIAGO DO SUL 1147.6400 1465

Selecionando colunas (por exclusão)

muni%>%select(-rgi, -nome_rgi, -area, -moradoresdom)
cod_mun nome pop renda leitos
4209102 JOINVILLE 512893 1804.7436 222
4205407 FLORIANÓPOLIS 418631 3014.3945 281
4202404 BLUMENAU 307205 1653.6179 111
4216602 SÃO JOSÉ 208955 1794.5582 88
4204608 CRICIÚMA 190625 1766.5529 82
4208203 ITAJAÍ 182690 1657.1540 67
4204202 CHAPECÓ 182216 1482.3753 47
4209300 LAGES 156217 1369.0444 54
4208906 JARAGUÁ DO SUL 142654 1624.7825 58
4211900 PALHOÇA 136802 1306.8789 2
4202008 BALNEÁRIO CAMBORIÚ 107421 2755.8748 49
4202909 BRUSQUE 105072 1518.0776 26
4218707 TUBARÃO 96880 1524.6933 65
4215802 SÃO BENTO DO SUL 74676 1202.9685 10
4203006 CAÇADOR 70373 1282.8293 20
4204301 CONCÓRDIA 68520 1342.7480 32
4203204 CAMBORIÚ 62233 1237.6556 0
4201406 ARARANGUÁ 60941 1180.7626 10
4214805 RIO DO SUL 60827 1655.1189 40
4211306 NAVEGANTES 60428 1170.2491 0
4207007 IÇARA 58688 1149.1354 10
4202305 BIGUAÇU 58051 1165.2016 0
4205902 GASPAR 57845 1389.4611 0
4207502 INDAIAL 54766 1328.3597 8
4210100 MAFRA 52654 1220.9341 37
4203808 CANOINHAS 52448 1040.1089 12
4209409 LAGUNA 51449 1352.8822 2
4219309 VIDEIRA 46980 1397.9557 23
4208302 ITAPEMA 45693 1915.8504 0
4219507 XANXERÊ 43713 1346.0947 29
4216206 SÃO FRANCISCO DO SUL 42321 1415.5638 0
4215000 RIO NEGRINHO 39816 1054.0952 12
4207304 IMBITUBA 39758 1252.0131 1
4204806 CURITIBANOS 37500 1079.8860 34
4218202 TIMBÓ 36735 1416.3917 10
4217204 SÃO MIGUEL DO OESTE 36210 1499.2622 11
4206504 GUARAMIRIM 35138 1243.3336 0
4205506 FRAIBURGO 34474 1216.4529 0
4213609 PORTO UNIÃO 33345 1296.2518 8
4203600 CAMPOS NOVOS 32709 1142.3626 1
4218004 TIJUCAS 30732 1280.2533 0
4202800 BRAÇO DO NORTE 28969 1286.7811 0
4213203 POMERODE 27627 1317.5694 0
4209003 JOAÇABA 26895 1936.7120 10
4217709 SOMBRIO 26525 979.7083 1
4216305 SÃO JOÃO BATISTA 26173 1114.0072 0
4219705 XAXIM 25699 1139.3831 2
4212502 PENHA 25027 1241.2170 0
4216503 SÃO JOAQUIM 24773 946.3554 3
4201307 ARAQUARI 24765 917.5836 0
4205456 FORQUILHINHA 22474 1269.5957 0
4202107 BARRA VELHA 22324 1362.7754 0
4208500 ITUPORANGA 22142 1262.1612 10
4210506 MARAVILHA 22048 1149.1770 12
4216909 SÃO LOURENÇO DO OESTE 21719 1116.0047 2
4203956 CAPIVARI DE BAIXO 21667 1130.5515 0
4211702 ORLEANS 21385 1031.4910 0
4206702 HERVAL D’OESTE 21210 1203.7537 0
4203907 CAPINZAL 20716 1209.4930 0
4208104 ITAIÓPOLIS 20270 920.4196 0
4219002 URUSSANGA 20201 1334.2829 0
4215703 SANTO AMARO DA IMPERATRIZ 19720 1397.5067 1
4206306 GUABIRUBA 18426 1253.2270 0
4218301 TRÊS BARRAS 18090 883.1836 1
4205704 GAROPABA 18021 1275.9474 0
4212205 PAPANDUVA 17904 905.7711 0
4206900 IBIRAMA 17299 1235.5068 15
4208807 JAGUARUNA 17270 1142.1614 1
4217808 TAIÓ 17055 1332.0641 1
4200101 ABELARDO LUZ 17034 935.0404 0
4212809 BALNEÁRIO PIÇARRAS 17022 1600.9558 0
4217501 SEARA 16914 1624.8726 1
4211751 OTACÍLIO COSTA 16334 1136.6761 0
4212908 PINHALZINHO 16289 1305.0981 1
4211207 MORRO DA FUMAÇA 16098 1253.6392 2
4213500 PORTO BELO 16053 1760.3470 0
4212106 PALMITOS 15979 1116.8388 2
4215505 SANTA CECÍLIA 15737 981.2233 1
4208401 ITAPIRANGA 15369 1255.6284 2
4217402 SCHROEDER 15285 1334.1532 0
4204251 COCAL DO SUL 15159 1214.2507 0
4214003 PRESIDENTE GETÚLIO 14806 1150.2094 0
4213708 POUSO REDONDO 14777 1089.8283 0
4205001 DIONÍSIO CERQUEIRA 14753 980.4110 2
4205803 GARUVA 14686 1042.0345 1
4210605 MASSARANDUBA 14668 1312.9558 0
4208450 ITAPOÁ 14662 1314.1894 0
4204558 CORREIA PINTO 14606 965.1309 0
4209607 LAURO MULLER 14348 1145.6641 1
4202453 BOMBINHAS 14030 1383.7702 0
4204509 CORUPÁ 13820 1274.1212 0
4216701 SÃO JOSÉ DO CEDRO 13639 1245.5806 1
4211603 NOVA VENEZA 13239 1166.8633 0
4206009 GOVERNADOR CELSO RAMOS 12984 1088.1943 0
4217600 SIDERÓPOLIS 12982 1308.7338 0
4207106 ILHOTA 12344 1092.2348 0
4211504 NOVA TRENTO 12158 1147.6100 0
4218806 TURVO 11831 1266.9018 0
4209706 LEBON RÉGIS 11825 742.6100 0
4203303 CAMPO ALEGRE 11676 997.0196 0
4207205 IMARUÍ 11659 690.2188 0
4213401 PONTE SERRADA 10943 1001.0815 2
4217006 SÃO LUDGERO 10929 1320.4917 0
4215109 RODEIO 10880 1197.4436 0
4218905 URUBICI 10678 993.8619 0
4205308 FAXINAL DOS GUEDES 10651 1514.5421 1
4206207 GRAVATAL 10615 1124.3817 0
4208708 JACINTO MACHADO 10607 966.1350 0
4203709 CANELINHA 10600 1007.3400 0
4204707 CUNHA PORÃ 10573 1208.9197 1
4206405 GUARACIABA 10483 1172.4005 0
4215455 SANGÃO 10369 1008.7057 0
4210001 LUIZ ALVES 10364 1337.4876 2
4207908 IRINEÓPOLIS 10349 866.8755 3
4202206 BENEDITO NOVO 10318 1075.0710 0
4214706 RIO DOS CEDROS 10277 1087.6163 0
4209904 LONTRAS 10231 1014.9804 0
4216008 SÃO CARLOS 10226 1238.4206 3
4204400 CORONEL FREITAS 10201 1192.4279 0
4214201 QUILOMBO 10196 1029.0096 0
4211009 MONDAÍ 9976 1066.7459 1
4201257 APIÚNA 9580 1071.9042 0
4201950 BALNEÁRIO ARROIO DO SILVA 9552 1287.4719 0
4204004 CATANDUVAS 9528 1199.9023 0
4207809 IRANI 9511 1083.8100 1
4216107 SÃO DOMINGOS 9406 1451.3080 0
4200705 ALFREDO WAGNER 9356 925.1837 1
4200200 AGROLÂNDIA 9307 1154.3133 0
4211058 MONTE CARLO 9301 785.1690 1
4203501 CAMPO ERÊ 9268 978.2110 2
4216800 SÃO JOSÉ DO CERRITO 9204 631.6536 0
4217303 SAUDADES 9011 1101.3005 1
4202602 BOM RETIRO 8901 1028.0500 0
4215679 SANTA TEREZINHA 8750 752.0708 0
4217907 TANGARÁ 8661 1102.9056 1
4204905 DESCANSO 8621 1200.1453 1
4201000 ANITA GARIBALDI 8603 649.7014 0
4202057 BALNEÁRIO BARRA DO SUL 8421 1147.9482 0
4207650 IPORÃ DO OESTE 8389 1022.4405 1
4211108 MONTE CASTELO 8322 596.2161 0
4202073 BALNEÁRIO GAIVOTA 8170 1180.9929 0
4215653 SANTA ROSA DO SUL 8017 944.3636 0
4201505 ARMAZÉM 7732 1037.2274 0
4212007 PALMA SOLA 7718 947.2715 1
4210308 MAJOR VIEIRA 7447 766.3884 1
4201208 ANTÔNIO CARLOS 7446 1364.1675 0
4203402 CAMPO BELO DO SUL 7413 670.2613 0
4201703 ASCURRA 7402 1058.3292 0
4215307 SALETE 7352 1194.4654 1
4211801 OURO 7342 1328.5440 0
4213807 PRAIA GRANDE 7232 713.1094 0
4207700 IPUMIRIM 7213 1045.2438 1
4218251 TIMBÓ GRANDE 7146 710.2567 0
4216404 SÃO JOÃO DO SUL 6990 805.7338 0
4214607 RIO DO OESTE 6985 1500.1519 0
4210803 MELEIRO 6984 1099.4114 0
4200408 ÁGUA DOCE 6925 1105.8175 1
4218400 TREZE DE MAIO 6854 1208.7555 0
4207684 IPUAÇU 6795 1022.4793 0
4212304 PAULO LOPES 6674 1108.3233 0
4212254 PASSO DE TORRES 6586 1046.2169 0
4218608 TROMBUDO CENTRAL 6498 1222.8505 1
4208005 ITÁ 6406 1234.3516 1
4200804 ANCHIETA 6362 1136.1325 0
4210407 MARACAJÁ 6352 1056.8690 0
4218509 TREZE TÍLIAS 6331 1901.0692 0
4219200 VIDAL RAMOS 6208 1100.5838 1
4206108 GRÃO PARÁ 6206 1324.7079 0
4214508 RIO DO CAMPO 6192 1361.9585 2
4203105 CAIBI 6150 1228.7608 1
4214409 RIO DAS ANTAS 6133 1059.0991 0
4212700 PETROLÂNDIA 6128 1000.2817 0
4216255 SÃO JOÃO DO OESTE 6035 1392.1581 1
4202131 BELA VISTA DO TOLDO 5987 662.9600 0
4200507 ÁGUAS DE CHAPECÓ 5968 903.6377 0
4209508 LAURENTINO 5958 1174.2967 0
4207403 IMBUIA 5691 982.9521 0
4210035 LUZERNA 5584 1288.1655 0
4201901 AURORA 5541 1361.4471 0
4215208 ROMELÂNDIA 5531 1052.2053 0
4200606 ÁGUAS MORNAS 5530 946.5870 0
4218103 TIMBÉ DO SUL 5283 967.1840 0
4200903 ANGELINA 5203 973.4783 0
4219358 VITOR MEIRELES 5198 822.2037 0
4206603 GUARUJÁ DO SUL 4902 1024.5729 1
4200309 AGRONÔMICA 4898 1280.4403 0
4213302 PONTE ALTA 4892 912.3410 0
4215075 RIQUEZA 4834 921.3129 0
4219176 VARGEM BONITA 4784 1044.1164 0
4213104 PIRATUBA 4775 960.0530 0
4207601 IPIRA 4742 886.4850 2
4209151 JOSÉ BOITEUX 4719 856.8009 0
4206652 GUATAMBÚ 4678 1237.5500 0
4209854 LINDÓIA DO SUL 4635 1161.0667 1
4218756 TUNÁPOLIS 4627 1375.5162 1
4202701 BOTUVERÁ 4459 1091.5891 0
4214904 RIO FORTUNA 4439 2050.1030 0
4204103 CAXAMBU DO SUL 4407 1027.6000 1
4212270 PASSOS MAIA 4406 706.2783 0
4202503 BOM JARDIM DA SERRA 4380 1124.6089 0
4205209 ERVAL VELHO 4344 1226.4317 0
4216057 SÃO CRISTOVÃO DO SUL 4315 725.8027 0
4215406 SALTO VELOSO 4293 1144.3025 0
4211405 NOVA ERECHIM 4274 2345.2680 1
4211454 NOVA ITABERABA 4260 1033.9027 0
4207759 IRACEMINHA 4247 829.9378 0
4201273 ARABUTÃ 4180 1172.7570 1
4219606 XAVANTINA 4142 1351.8338 1
4212403 PEDRAS GRANDES 4094 846.1788 0
4208609 JABORÁ 4041 1245.1050 0
4212239 PARAÍSO 4023 783.0670 0
4210902 MODELO 4019 1401.2325 1
4215356 SALTINHO 3931 943.2737 0
4204350 CORDILHEIRA ALTA 3767 1143.4725 0
4205100 DONA EMMA 3709 1090.2410 0
4205159 DOUTOR PEDRINHO 3604 862.0550 0
4204178 CERRO NEGRO 3573 521.3778 0
4219408 WITMARSUM 3564 980.0287 0
4219101 VARGEÃO 3532 1062.9815 1
4218350 TREVISO 3518 1160.3650 0
4201604 ARROIO TRINTA 3498 1258.0450 0
4205605 GALVÃO 3471 1167.3744 0
4216354 SÃO JOÃO DO ITAPERIÚ 3431 1229.8718 0
4203154 CALMON 3387 629.2786 0
4217253 SÃO PEDRO DE ALCÂNTARA 3382 1175.7933 0
4202859 BRAÇO DO TROMBUDO 3370 1090.9088 0
4206801 IBICARÉ 3363 1037.3843 0
4209805 LEOBERTO LEAL 3338 963.4954 0
4213351 PONTE ALTA DO NORTE 3303 891.2567 0
4201802 ATALANTA 3287 958.9415 0
4210209 MAJOR GERCINO 3279 861.3260 0
4202438 BOCAINA DO SUL 3265 679.5471 0
4217550 SERRA ALTA 3261 1196.9567 0
4201109 ANITÁPOLIS 3214 710.5210 1
4217105 SÃO MARTINHO 3208 1138.5471 0
4213005 PINHEIRO PRETO 3132 1534.0508 0
4205175 ENTRE RIOS 3018 649.4020 0
4215901 SÃO BONIFÁCIO 3001 1059.1517 0
4212601 PERITIBA 2988 1169.3043 1
4219853 ZORTÉA 2979 1313.0325 0
4218855 UNIÃO DO OESTE 2910 951.7300 0
4202081 BANDEIRANTE 2899 939.2600 0
4215687 SANTA TEREZINHA DO PROGRESSO 2895 795.4914 0
4211256 MORRO GRANDE 2890 1052.4020 0
4202875 BRUNÓPOLIS 2850 651.3867 0
4210704 MATOS COSTA 2835 766.5580 0
4219150 VARGEM 2806 845.1411 0
4204194 CHAPADÃO DO LAGEADO 2758 684.7471 0
4217758 SUL BRASIL 2757 932.8167 0
4204152 CELSO RAMOS 2756 645.3443 0
4203253 CAPÃO ALTO 2753 941.2930 0
4214151 PRINCESA 2739 1255.3500 0
4211652 NOVO HORIZONTE 2738 901.6650 0
4207577 IOMERÊ 2729 1274.5183 0
4214300 RANCHO QUEIMADO 2726 1307.8350 0
4215752 SÃO BERNARDINO 2674 727.5840 0
4213153 PLANALTO ALEGRE 2649 1255.2143 0
4200051 ABDON BATISTA 2646 892.8300 0
4202156 BELMONTE 2625 927.5450 0
4205431 FORMOSA DO SUL 2599 1130.1020 0
4202537 BOM JESUS 2521 1127.6217 0
4210852 MIRIM DOCE 2511 886.4533 0
4218954 URUPEMA 2482 893.4950 0
4205555 FREI ROGÉRIO 2474 830.6800 0
4204459 CORONEL MARTINS 2458 754.2400 0
4200556 ÁGUAS FRIAS 2422 1024.7614 0
4215059 RIO RUFINO 2413 701.8933 0
4215554 SANTA HELENA 2382 1107.3940 0
4212056 PALMEIRA 2373 847.1920 0
4211892 PAINEL 2353 931.2280 0
4211850 OURO VERDE 2270 938.2580 0
4214102 PRESIDENTE NEREU 2266 1183.0867 0
4201653 ARVOREDO 2248 1076.9014 0
4210555 MAREMA 2203 1173.6575 0
4209201 LACERDÓPOLIS 2199 1401.4200 0
4209177 JUPIÁ 2146 955.8517 0
4202578 BOM JESUS DO OESTE 2123 1075.7417 0
4207858 IRATI 2096 844.3850 0
4215604 SANTA ROSA DE LIMA 2060 1274.5980 0
4205191 ERMO 2030 1184.0075 0
4200754 ALTO BELA VISTA 2005 896.9650 0
4206751 IBIAM 1942 1005.8480 0
4217154 SÃO MIGUEL DA BOA VISTA 1889 1163.6825 0
4204756 CUNHATAÍ 1875 1782.4200 0
4202099 BARRA BONITA 1874 864.5200 0
4210050 MACIEIRA 1806 947.6167 0
4208955 JARDINÓPOLIS 1761 1123.9500 0
4211876 PAIAL 1757 859.7980 0
4217956 TIGRINHOS 1754 707.0800 0
4213906 PRESIDENTE CASTELLO BRANCO 1719 1407.6983 0
4205357 FLOR DO SERTÃO 1584 959.1825 0
4209458 LAJEADO GRANDE 1490 2431.9933 0
4215695 SANTIAGO DO SUL 1465 1147.6400 0

Filtrando uma tabela

muni%>%filter(pop>=50000)
cod_mun nome pop renda area leitos moradoresdom rgi nome_rgi
4209102 JOINVILLE 512893 1804.744 1126.10487 222 3.169522 420016 Joinville
4205407 FLORIANÓPOLIS 418631 3014.395 675.40761 281 2.784638 420001 Florianópolis
4202404 BLUMENAU 307205 1653.618 518.49663 111 3.055912 420019 Blumenau
4216602 SÃO JOSÉ 208955 1794.558 150.45281 88 2.973125 420001 Florianópolis
4204608 CRICIÚMA 190625 1766.553 235.70142 82 3.096741 420002 Criciúma
4208203 ITAJAÍ 182690 1657.154 288.28661 67 3.121645 420020 Itajaí
4204202 CHAPECÓ 182216 1482.375 626.05888 47 3.112823 420007 Chapecó
4209300 LAGES 156217 1369.044 2631.50212 54 3.171262 420005 Lages
4208906 JARAGUÁ DO SUL 142654 1624.782 529.44742 58 3.166605 420016 Joinville
4211900 PALHOÇA 136802 1306.879 395.13264 2 3.171095 420001 Florianópolis
4202008 BALNEÁRIO CAMBORIÚ 107421 2755.875 46.24378 49 2.614978 420020 Itajaí
4202909 BRUSQUE 105072 1518.078 283.22301 26 3.162605 420021 Brusque
4218707 TUBARÃO 96880 1524.693 301.75389 65 2.997067 420003 Tubarão
4215802 SÃO BENTO DO SUL 74676 1202.968 501.63138 10 3.146231 420018 São Bento do Sul - Rio Negrinho
4203006 CAÇADOR 70373 1282.829 984.28550 20 3.270000 420014 Caçador
4204301 CONCÓRDIA 68520 1342.748 799.44897 32 3.030966 420010 Concórdia
4203204 CAMBORIÚ 62233 1237.656 212.31967 0 3.393291 420020 Itajaí
4201406 ARARANGUÁ 60941 1180.763 303.29912 10 3.083571 420004 Araranguá
4214805 RIO DO SUL 60827 1655.119 260.97035 40 2.962906 420022 Rio do Sul
4211306 NAVEGANTES 60428 1170.249 112.02968 0 3.194468 420020 Itajaí
4207007 IÇARA 58688 1149.135 228.92777 10 3.101281 420002 Criciúma
4202305 BIGUAÇU 58051 1165.202 367.89088 0 3.257625 420001 Florianópolis
4205902 GASPAR 57845 1389.461 386.77574 0 3.170336 420019 Blumenau
4207502 INDAIAL 54766 1328.360 430.79040 8 3.141512 420019 Blumenau
4210100 MAFRA 52654 1220.934 1404.03415 37 3.190485 420017 Mafra
4203808 CANOINHAS 52448 1040.109 1140.39361 12 3.260194 420017 Mafra
4209409 LAGUNA 51449 1352.882 336.39380 2 2.926908 420003 Tubarão

Filtrando uma tabela

  • Criar uma tabela (cv_today) apenas com o registro mais atual de casos e mortes de COVID
cv_today=cv%>%filter(date==max(date)) 
#Prefiro usar o <- ao invés do =
cv_today<-cv%>%filter(date==max(date))
#Verificando o nº de linhas de cada tabela
nrow(cv)
## [1] 29208
nrow(cv_today)
## [1] 293

Junção de tabelas (Join)

  • A junção de tabelas é uma tarefa usual em BD e análise de dados
  • Usa uma coluna comum (chave-primária) para “puxar” dados de outra tabela
  • left_join, join, right_join, full_join.
  • https://www.guru99.com/r-dplyr-tutorial.html
ncol(cv_today)
cv_today<-left_join(x=cv_today,y=muni,by="cod_mun")
ncol(cv_today)
head(cv_today)
## [1] 17
##  [1] "cod_mun"      "nome_mun"     "state"        "date"         "week"        
##  [6] "cases"        "deaths"       "new_cases"    "new_deaths"   "nome"        
## [11] "pop"          "renda"        "area"         "leitos"       "moradoresdom"
## [16] "rgi"          "nome_rgi"

Agregando variáveis

#Soma
sum(cv_today$pop)
## [1] 6219867
#Média
mean(cv_today$renda)
## [1] 1143.357
#Mediana
median(cv_today$moradoresdom)
## [1] 3.198462
#Desvio Padrão
sd(cv_today$pop)
## [1] 50424.7

Sumarisando com o dplyr

cv_today%>%summarise(rendamedia=mean(renda),
                 pop=sum(pop),
                 n=n())
##   rendamedia     pop   n
## 1   1143.357 6219867 293

Sumarisando em grupos

cv_today%>%
  group_by(nome_rgi)%>%
  summarise(rendamedia=mean(renda), 
            pop=sum(pop), 
            n=n(),
            cases=sum(cases),
            deaths=sum(deaths))
nome_rgi rendamedia pop n cases deaths
Araranguá 1048.4906 177100 14 43966 708
Blumenau 1212.5045 548583 12 138461 1429
Brusque 1141.8824 180167 7 54083 561
Caçador 846.5249 97372 6 11130 400
Chapecó 1213.9582 363643 32 97651 1384
Concórdia 1165.4463 133608 12 32734 392
Criciúma 1237.7480 391607 12 99315 1360
Curitibanos 860.0392 66179 6 12843 284
Florianópolis 1286.2197 959454 17 251434 2823
Ibirama - Presidente Getúlio 1022.4984 49295 6 7767 117
Itajaí 1558.6325 594017 12 173824 2605
Ituporanga 999.0369 46265 6 9237 133
Joaçaba - Herval d’Oeste 1220.3681 167158 18 46616 515
Joinville 1305.1068 842744 12 246191 3318
Lages 885.7617 285213 18 63064 937
Mafra 915.9109 226816 10 36522 596
Maravilha 984.1630 49460 8 11850 135
Rio do Sul 1189.0222 175805 17 33594 428
São Bento do Sul - Rio Negrinho 1084.6944 126168 3 23129 375
São Lourenço do Oeste 974.4485 42016 6 7041 114
São Miguel do Oeste 1107.0022 160765 20 29918 355
Tubarão 1216.3116 294400 16 76556 1211
Videira 1177.8347 121143 10 31039 398
Xanxerê 1066.2432 120889 13 27108 467

ggplot

Gráficos bonitos e customizáveis

Distribuição de uma variável

  • Com o básico do R
hist(muni$renda)

Distribuição de uma variável

  • Com o ggplot
ggplot(muni,aes(x=renda))+geom_histogram()

Distribuição de uma variável

  • Alterando o número de classes
ggplot(muni,aes(x=renda))+geom_histogram(bins=100)

Modificando a aparência do gráfico

  • Título do Gráfico
  • Títulos dos eixos
  • Fundo branco
  • Cor das barras
ggplot(muni,aes(x=renda))+
  ggtitle('Renda Domiciliar Média por Município')+ #título do gráfico
  geom_histogram(bins=50,fill='pink')+#barras em cor de rosa
  theme_bw()+ #fundo branco
  xlab('Renda Média (R$)')+ #título do eixo x
  ylab('Nº de Municípios') #título do eixo y

Modificando a aparência do gráfico

O que significa o “aes”?

  • Aesthetic Mapping: Significa “alguma coisa que você pode ver”
    • Color (cor de borda)
    • Fill (cor de preenchimento)
    • Linetype (linhas)
    • Shape (points)
    • Size
  • Neste caso, queremos mostrar as Regiões Intermediárias com cores diferentes
ggplot(muni,aes(x=renda,fill=nome_rgi))+
  ggtitle('Renda Domiciliar Média por Município')+ #título do gráfico
  geom_histogram(bins=50)+
  theme_bw()+ #fundo branco
  xlim(c(500,2100))+
  xlab('Renda Média (R$)')+ #título do eixo x
  ylab('Nº de Municípios') #título do eixo y

O que significa o “aes”?

Outra opção são os subplots (facets)

ggplot(muni,aes(x=renda))+
  ggtitle('Renda Domiciliar Média por Município')+ #título do gráfico
  geom_histogram(bins=50)+
  facet_wrap(~nome_rgi) # o til (~) sempre significa "por" alguma coisa

Média, mediana, moda

Distribuição de uma variável

  • Um gráfico de densidades pode ser uma alternativa
ggplot(muni,aes(x=renda))+geom_density()

Distribuição de uma variável

  • Modificando a suavização (Band Width - bw)
ggplot(muni,aes(x=renda))+geom_density(bw=25)

Distribuição de uma variável

  • Mostrando a distribuição por uma variável categórica
ggplot(muni,aes(x=renda,color=nome_rgi,fill=nome_rgi))+
  geom_density(bw=50, alpha=.5)+
  theme_bw()

Distribuição de uma variável

ggplot(muni,aes(x=renda))+geom_density()+
  facet_wrap(~nome_rgi,scales='free_y')

Boxplot (meu gráfico favorito!)

ggplot(muni,aes(x=nome_rgi,y=renda))+geom_boxplot()+
  coord_flip()

Reordenando fatores (Factors)

  • Vamos reordenar as RGI pela renda média
library(forcats)
muni$nome_rgi<-as.factor(muni$nome_rgi)
muni<-muni%>%mutate(nome_rgi=fct_reorder(nome_rgi,renda))

Boxplot (reordenado)

ggplot(muni,aes(x=nome_rgi,y=renda))+geom_boxplot()+
  coord_flip()

Dispersograma (scatterplot)

ggplot(cv_today,aes(x=pop,y=cases))+
  geom_point()

Dispersograma e linha de tendência

ggplot(cv_today,aes(x=pop,y=cases))+
  geom_point()+
  geom_smooth()

Regressão linear

library(ggpubr)
ggplot(cv_today,aes(x=pop,y=cases))+
  geom_point()+
  geom_smooth(method='lm')+
  stat_regline_equation(label.y = 150000, aes(label = ..eq.label..)) +
  stat_regline_equation(label.y = 140000, aes(label = ..rr.label..))

Gráficos de série temporal

  • Agregando óbitos por dia
cv_day<-cv%>%group_by(date)%>%summarise(deaths=sum(new_deaths, na.rm=T))
head(cv_day)
date deaths
2020-03-14 0
2020-03-21 0
2020-03-28 1
2020-04-04 9
2020-04-11 11
2020-04-18 11

Gráficos de série temporal

ggplot(cv_day,aes(x=date,y=deaths))+geom_line()

Gerenciando datas

cv_day$year=format(cv_day$date,'%Y')
ggplot(cv_day%>%filter(date<'2022-01-01'),aes(x=date,y=deaths))+
  geom_line()+
  facet_wrap(~year,ncol=1,scale='free_x')