Modelo de Probabilidad de los Campos de producción de los pozos petrolíferos en Brasil
Se importan los datos y se valida su estructura para el análisis estadístico.
setwd("C:/Users/majke/Downloads/Proyecto Estadistica/RMARKDOWN")
Datos <- read.csv("Pozos brasil 2.csv", header = TRUE, sep = ";", dec = ",", fileEncoding = "Latin1")
str(Datos)
## 'data.frame': 29575 obs. of 59 variables:
## $ POCO : chr "7-RO-123HP-RJS" "1-BP-7-RJS" "7-ARGO-4H-ESS" "7-ARGO-5H-ESS" ...
## $ CADASTRO : num 7.43e+10 7.43e+10 3.43e+10 3.43e+10 3.43e+10 ...
## $ OPERADOR : chr "Petrobras" "BP Energy" "Shell Brasil" "Shell Brasil" ...
## $ POCO_OPERADOR : chr "7RO123HPRJS" "ANU" "7ARGO4HESS" "7ARGO5HESS" ...
## $ ESTADO : chr "RJ" "RJ" "ES" "ES" ...
## $ BACIA : chr "Campos" "Campos" "Campos" "Campos" ...
## $ BLOCO : chr "" "C-M-473" "" "" ...
## $ SIG_CAMPO : chr "RO " "" "ARGO " "ARGO " ...
## $ CAMPO : chr "RONCADOR" "" "ARGONAUTA" "ARGONAUTA" ...
## $ TERRA_MAR : chr "M" "M" "M" "M" ...
## $ POCO_POS_ANP : chr "S" "S" "S" "S" ...
## $ TIPO : chr "Explotatório" "Exploratório" "Explotatório" "Explotatório" ...
## $ CATEGORIA : chr "Desenvolvimento" "Pioneiro" "Desenvolvimento" "Desenvolvimento" ...
## $ RECLASSIFICACAO : chr "PRODUTOR COMERCIAL DE PETRÓLEO" "PORTADOR DE PETRÓLEO" "ABANDONADO POR OUTRAS RAZÕES" "INDEFINIDO" ...
## $ SITUACAO : chr "PRODUTOR" "ABANDONADO POR LOGÍSTICA EXPLORATÓRIA" "ABANDONADO DEFINITIVAMENTE" "PRODUTOR" ...
## $ INICIO : chr "03/03/2012" "14/03/2012" "12/04/2012" "14/04/2012" ...
## $ TERMINO : chr "10/03/2013" "20/09/2012" "19/09/2012" "02/05/2013" ...
## $ CONCLUSAO : chr "10/03/2013" "19/10/2012" "28/09/2012" "13/05/2013" ...
## $ TITULARIDADE : chr "Público" "Público" "Público" "Público" ...
## $ LATITUDE_BASE_4C : chr "-21:57:45,630" "-23:06:09,622" "-21:08:06,801" "-21:08:12,535" ...
## $ LONGITUDE_BASE_4C : chr "-39:44:01,130" "-40:00:41,295" "-39:46:53,226" "-39:46:49,296" ...
## $ LATITUDE_BASE_DD : num -22 -23.1 -21.1 -21.1 -21.1 ...
## $ LONGITUDE_BASE_DD : num -39.7 -40 -39.8 -39.8 -39.8 ...
## $ DATUM_HORIZONTAL : chr "SIRGAS2000" "SIRGAS2000" "SIRGAS2000" "SIRGAS2000" ...
## $ TIPO_DE_COORDENADA_DE_BASE: chr "Definitiva" "Definitiva" "Definitiva" "Definitiva" ...
## $ DIRECAO : chr "Horizontal" "Vertical" "Horizontal" "Horizontal" ...
## $ PROFUNDIDADE_VERTICAL_M : num -3145 6900 2937 2934 2953 ...
## $ PROFUNDIDADE_SONDADOR_M : num 4050 6925 3809 4575 4570 ...
## $ PROFUNDIDADE_MEDIDA_M : num 4050 6925 3809 4575 4570 ...
## $ REFERENCIA_DE_PROFUNDIDADE: chr "MR" "MR" "MR" "MR" ...
## $ MESA_ROTATIVA : num 24 25 24.2 24.2 24.2 ...
## $ COTA_ALTIMETRICA_M : num 0 0 0 0 0 ...
## $ LAMINA_D_AGUA_M : num 1827 2730 1706 1705 1654 ...
## $ DATUM_VERTICAL : chr "NM" "NM" "NM" "NM" ...
## $ UNIDADE_ESTRATIGRAFICA : chr "" "" "" "" ...
## $ GEOLOGIA_GRUPO_FINAL : chr "Campos" "Lagoa Feia" "Campos" "Campos" ...
## $ GEOLOGIA_FORMACAO_FINAL : chr "Carapebus" "Macabu" "Ubatuba" "Ubatuba" ...
## $ GEOLOGIA_MEMBRO_FINAL : chr "" "" "" "" ...
## $ CDPE : chr "Existe" "Existe" "Existe" "" ...
## $ AGP : chr "" "" "" "" ...
## $ PC : chr "" "Existe" "" "" ...
## $ PAG : chr "" "" "" "" ...
## $ PERFIS_CONVENCIONAIS : chr "" "Existe" "" "" ...
## $ DURANTE_PERFURACAO : chr "Existe" "Existe" "Existe" "Existe" ...
## $ PERFIS_DIGITAIS : chr "" "" "" "" ...
## $ PERFIS_PROCESSADOS : chr "" "" "" "" ...
## $ PERFIS_ESPECIAIS : chr "" "" "" "" ...
## $ AMOSTRA_LATERAL : chr "" "Existe" "" "" ...
## $ SISMICA : chr "" "Existe" "" "" ...
## $ TABELA_TEMPO_PROFUNDIDADE : chr "" "" "" "" ...
## $ DADOS_DIRECIONAIS : chr "Existe" "Existe" "Existe" "Existe" ...
## $ TESTE_A_CABO : chr "Existe" "Existe" "" "" ...
## $ TESTE_DE_FORMACAO : chr "" "" "" "" ...
## $ CANHONEIO : chr "" "" "" "" ...
## $ TESTEMUNHO : chr "" "" "" "" ...
## $ GEOQUIMICA : chr "" "" "" "" ...
## $ SIG_SONDA : chr "SS-49" "DS4" "NB2" "NB2" ...
## $ NOM_SONDA : chr "SEDCO 707" "Deep Ocean Clarion" "Bully 2" "Bully 2" ...
## $ DHA_ATUALIZACAO : chr "28/1/18 5:00" "28/1/18 5:00" "28/1/18 5:00" "28/1/18 5:00" ...
Se obtiene la frecuencia absoluta de los pozos según su campo de producción.
Campo <- Datos$CAMPO
TDFCampo<- as.data.frame(table(Campo))
TDFCampo
## Campo Freq
## 1 4621
## 2 ABALONE 3
## 3 ACAJÁ-BURIZINHO 13
## 4 ACAUÃ 5
## 5 ACAUÃ LESTE 1
## 6 ÁGUA GRANDE 468
## 7 AGUILHADA 22
## 8 AGULHA 30
## 9 ALAGAMAR 1
## 10 ALBACORA 178
## 11 ALBACORA LESTE 105
## 12 ALBATROZ 2
## 13 ALTO ALEGRE 2
## 14 ALTO DO RODRIGUES 850
## 15 ANAMBÉ 17
## 16 ANDORINHA 9
## 17 ANEQUIM 6
## 18 ANGELIM 34
## 19 ANGICO 6
## 20 APRAIÚS 16
## 21 ARABAIANA 13
## 22 ARAÇARI 2
## 23 ARAÇÁS 379
## 24 ARAÇÁS LESTE 1
## 25 ARACUÃ 1
## 26 ARAPAÇU 1
## 27 ARARA AZUL 1
## 28 ARARACANGA 4
## 29 ARATU 28
## 30 ARATUM 10
## 31 ÁREA DO ALS032 1
## 32 AREA do BAS-37 (Licitado) 3
## 33 ÁREA DO BAS-48 1
## 34 AREA DO BAS-64 (Licitado) 3
## 35 ÁREA DO BAS-85 1
## 36 ÁREA DO BAS-86 1
## 37 ÁREA DO BAS104 1
## 38 ÁREA DO CES066 3
## 39 ÁREA DO PAS-011 15
## 40 ÁREA DO RJS-150 4
## 41 AREA DO RNS-36 1
## 42 ÁREA DO SES-092 (Licitado) 4
## 43 AREA DO SES-2 1
## 44 ARGONAUTA 37
## 45 ARRAIA 5
## 46 ARRIBAÇÃ 1
## 47 ARUARI 8
## 48 ASA BRANCA 14
## 49 ATALAIA SUL 21
## 50 ATAPU 5
## 51 ATLANTA 7
## 52 ATUM 33
## 53 AZULÃO 3
## 54 BADEJO 36
## 55 BAGRE 22
## 56 BAIXA DO ALGODÃO 79
## 57 BAIXA DO JUAZEIRO 6
## 58 BALEIA ANÃ 2
## 59 BALEIA FRANCA 4
## 60 BARRA BONITA 2
## 61 BARRA DO IPIRANGA 25
## 62 BARRACUDA 98
## 63 BARRINHA 3
## 64 BARRINHA LESTE 4
## 65 BARRINHA SUDOESTE 4
## 66 BAÚNA 13
## 67 BAUNA SUL 3
## 68 BEIJA-FLOR 1
## 69 BELA VISTA 6
## 70 Bem-te-vi 2
## 71 BENFICA 34
## 72 BERBIGÃO 3
## 73 BICUDO 44
## 74 BIGUÁ 7
## 75 BIJUPIRÁ 37
## 76 BIQUARA 1
## 77 BIRIBA 16
## 78 BOA ESPERANÇA 32
## 79 BOA VENTURA 1
## 80 BOA VISTA 71
## 81 BOM DESCANSO 1
## 82 BOM LUGAR 3
## 83 BONITO 56
## 84 BONSUCESSO 18
## 85 BREJINHO 100
## 86 BREJO GRANDE 45
## 87 BURACICA 484
## 88 BÚZIOS 20
## 89 CABOCLINHO 1
## 90 CABURÉ 1
## 91 CAÇÃO 15
## 92 CACHOEIRINHA 28
## 93 CACIMBAS 7
## 94 CAIOBA 41
## 95 CAIPE VELHO 1
## 96 CAMAÇARI 10
## 97 CAMARUPIM 1
## 98 CAMARUPIM NORTE 5
## 99 CAMBACICA 1
## 100 CAMORIM 120
## 101 CAMPO GRANDE 10
## 102 CANABRAVA 12
## 103 CANAPU 3
## 104 CANÁRIO 3
## 105 Canário da Terra 2
## 106 CANCÃ 39
## 107 CANDEIAS 252
## 108 CANGOÁ 7
## 109 CANTAGALO 4
## 110 CANTO DO AMARO 1823
## 111 CARACATU 2
## 112 CARAPANAÚBA 1
## 113 CARAPEBA 90
## 114 CARAPIA 1
## 115 CARAPICU 4
## 116 CARAPITANGA 3
## 117 CARATINGA 60
## 118 CARAÚNA 13
## 119 CARAVELA 5
## 120 CARCARÁ 1
## 121 CARDEAL 27
## 122 CARDEAL AMARELO 6
## 123 CARDEAL DO NORDESTE 2
## 124 CARMÓPOLIS 1986
## 125 CARMÓPOLIS NOROESTE 1
## 126 CARNAUBAIS 11
## 127 CARNAUBAIS VELHO 1
## 128 CASSARONGONGO 241
## 129 CASTANHAL 197
## 130 CAVALO-MARINHO 5
## 131 CAXAREU 1
## 132 CEXIS 102
## 133 CHAUÁ 1
## 134 CHERNE 63
## 135 CHOPIM 2
## 136 CIDADE DE ARACAJU 4
## 137 CIDADE DE ARACAJU (Licitado) 4
## 138 CIDADE DE CORURIPE 1
## 139 CIDADE DE ENTRE RIOS 31
## 140 CIDADE DE PIRAMBU 2
## 141 CIDADE DE SÃO MIGUEL DOS CAMPOS 39
## 142 CIDADE DE SEBASTIÃO FERREIRA 3
## 143 CIOBA 8
## 144 COLIBRI 4
## 145 CONCEIÇÃO 24
## 146 CONCEIÇÃO DA BARRA 8
## 147 CONCRIZ 1
## 148 CONGRO 32
## 149 COQUEIRO SECO 16
## 150 CORAL 6
## 151 CÓRREGO CEDRO NORTE 12
## 152 CÓRREGO CEDRO NORTE SUL 1
## 153 CÓRREGO DAS PEDRAS 13
## 154 CÓRREGO DOURADO 8
## 155 CÓRREGO GRANDE 4
## 156 CORRUIRA 2
## 157 CORVINA 24
## 158 CREJOÁ 2
## 159 CRISTO REDENTOR 1
## 160 CUPIÚBA 1
## 161 CURIMÃ 35
## 162 CURRAL DE FORA 2
## 163 DENTÃO 10
## 164 DIAS D'ÁVILA 2
## 165 DÓ-RÉ-MI 3
## 166 DOM JOÃO 273
## 167 DOM JOÃO MAR 655
## 168 DOURADO 41
## 169 ENCHOVA 56
## 170 ENCHOVA OESTE 37
## 171 ESPADA 13
## 172 ESPADARTE 64
## 173 ESTREITO 1706
## 174 ESTRELA DO MAR 4
## 175 FAZENDA ALEGRE 153
## 176 FAZENDA ALTO DAS PEDRAS 1
## 177 FAZENDA ALVORADA 151
## 178 FAZENDA AZEVEDO 16
## 179 FAZENDA AZEVEDO OESTE 3
## 180 FAZENDA BÁLSAMO 306
## 181 FAZENDA BELÉM 1002
## 182 FAZENDA BOA ESPERANÇA 84
## 183 FAZENDA BOA PAZ 1
## 184 FAZENDA BOA VISTA 1
## 185 FAZENDA CANAAN 9
## 186 FAZENDA CEDRO 43
## 187 FAZENDA CEDRO NORTE 42
## 188 FAZENDA CURRAL 15
## 189 FAZENDA FLORESTA 1
## 190 FAZENDA GAMELEIRA (Licitado) 3
## 191 FAZENDA GUINDASTE 4
## 192 FAZENDA IMBÉ 124
## 193 FAZENDA IMPÉRIO 1
## 194 FAZENDA JUNCO 3
## 195 FAZENDA MALAQUIAS 49
## 196 FAZENDA MAMOEIRO 1
## 197 FAZENDA MATINHA 3
## 198 FAZENDA NOVA 1
## 199 FAZENDA ONÇA 13
## 200 FAZENDA PANELAS 76
## 201 FAZENDA PAU BRASIL 9
## 202 FAZENDA POCINHO 549
## 203 FAZENDA QUEIMADAS 52
## 204 FAZENDA QUEIMADAS OESTE 1
## 205 FAZENDA RIACHUELO 1
## 206 FAZENDA RIO BRANCO 8
## 207 FAZENDA SANTA LUZIA 76
## 208 FAZENDA SANTA ROSA 3
## 209 FAZENDA SANTO ESTEVÃO 30
## 210 FAZENDA SÃO JORGE 53
## 211 FAZENDA SÃO RAFAEL 80
## 212 FAZENDA SORI 7
## 213 FOZ DO VAZA-BARRIS 2
## 214 FOZ DO VAZA BARRIS (Licitado) 1
## 215 FRADE 59
## 216 FURADO 178
## 217 GAIVOTA 8
## 218 GALO DE CAMPINA 16
## 219 GAMBOA 2
## 220 GARÇA BRANCA 1
## 221 GAROUPA 43
## 222 GAROUPINHA 10
## 223 GAVIÃO AZUL 4
## 224 GAVIÃO BRANCO 22
## 225 GAVIÃO BRANCO NORTE 3
## 226 GAVIÃO CABOCLO 2
## 227 GAVIÃO CABOCLO SUL 1
## 228 GAVIÃO REAL 31
## 229 GAVIÃO VERMELHO 7
## 230 GOLFINHO 82
## 231 GOMO 20
## 232 GRAÚNA 1
## 233 GUAIAMÁ 4
## 234 GUAIUBA 1
## 235 GUAJÁ 3
## 236 GUAMARÉ 110
## 237 GUAMARÉ SUDESTE 2
## 238 GUANAMBI 8
## 239 GUARÁ 2
## 240 GUARICEMA 92
## 241 GURIATÃ 1
## 242 GURIATÃ SUL 1
## 243 GURIRI 8
## 244 HARPIA 2
## 245 ICAPUÍ 12
## 246 IGARAPE CUIA 1
## 247 IGARAPÉ PUCÁ 2
## 248 ILHA DA CAÇUMBA 12
## 249 ILHA DE BIMBARRA 2
## 250 ILHA PEQUENA 23
## 251 INHAMBU 80
## 252 IRAÍ 15
## 253 IRAÚNA 4
## 254 IRERÊ 1
## 255 ITAPARICA 77
## 256 ITAPU 3
## 257 JAÇANÃ 13
## 258 JACARANDÁ 2
## 259 JACUÍPE 46
## 260 JACUMIRIM (Licitado) 3
## 261 JACUPEMBA 4
## 262 JACUTINGA 16
## 263 JANDAIA 65
## 264 Jandaia Sul 4
## 265 JANDUÍ 14
## 266 JAÓ 1
## 267 JAPIIM 2
## 268 JAPUAÇU 2
## 269 JEQUIÁ 13
## 270 JIRIBATUBA 3
## 271 JIRIBATUBA (Licitado) 8
## 272 JOÃO DE BARRO 11
## 273 JUAZEIRO 6
## 274 JUBARTE 132
## 275 JURITI 1
## 276 JURUÁ 8
## 277 LAGOA AROEIRA 20
## 278 LAGOA BONITA 4
## 279 LAGOA BRANCA 1
## 280 LAGOA DAS PIABAS 8
## 281 LAGOA DO DOUTOR 1
## 282 LAGOA DO DOUTOR (Licitado) 7
## 283 LAGOA DO PAULO 9
## 284 LAGOA DO PAULO NORTE 11
## 285 LAGOA DO PAULO SUL 4
## 286 LAGOA PACAS 3
## 287 LAGOA PARDA 89
## 288 LAGOA PARDA NORTE 30
## 289 LAGOA PARDA SUL 5
## 290 LAGOA PIABANHA 27
## 291 LAGOA SURUACA 69
## 292 LAGOA VERDE 4
## 293 LAGOSTA 6
## 294 LAMARÃO 19
## 295 LAPA 7
## 296 LEODÓRIO 2
## 297 LESTE DE POÇO XAVIER 23
## 298 LESTE DO URUCU 109
## 299 LINGUADO 43
## 300 LIVRAMENTO 66
## 301 LOBATO 19
## 302 LORENA 84
## 303 LULA 91
## 304 MAÇARICO 2
## 305 MACAU 31
## 306 Mãe-da-lua 1
## 307 MALHADO 18
## 308 MALOMBÊ 58
## 309 MANATI 11
## 310 MANDACARU 6
## 311 MAPELE 10
## 312 MARECHAL DEODORO 1
## 313 MARIMBÁ 52
## 314 MARIRICU 20
## 315 MARIRICU NORTE 5
## 316 MARIRICU OESTE 2
## 317 MARITACA 2
## 318 MARLIM 260
## 319 MARLIM LESTE 96
## 320 MARLIM SUL 255
## 321 MAROMBA 9
## 322 MASSAPÊ 51
## 323 MASSUÍ 24
## 324 MATA DE SÃO JOÃO 113
## 325 MATO GROSSO 112
## 326 MATO GROSSO NOROESTE 2
## 327 MERLUZA 9
## 328 MERO 1
## 329 MEXILHÃO 33
## 330 MIRANGA 619
## 331 MIRANGA LESTE 3
## 332 MIRANGA NORTE 19
## 333 MONTE ALEGRE 110
## 334 MORÉIA 22
## 335 MORRINHO 24
## 336 MORRO DO BARRO 5
## 337 MORRO DO BARRO (Licitado) 6
## 338 MOSQUEIRO 1
## 339 MOSQUITO 2
## 340 MOSQUITO NORTE 4
## 341 MOSSORÓ 112
## 342 MUTUM 1
## 343 NAMORADO 68
## 344 NATIVO OESTE 11
## 345 NORDESTE DE JURUÁ 3
## 346 NORDESTE DE NAMORADO 5
## 347 NOROESTE DO MORRO ROSADO 13
## 348 NORTE DE AREIA BRANCA 1
## 349 NORTE DE FAZENDA CARUAÇU 56
## 350 OESTE DE ATAPU 1
## 351 OESTE DE UBARANA 14
## 352 OLIVA 1
## 353 OSTRA 12
## 354 PA-1APL1ESS-BMC30 1
## 355 PA-1BRSA1025RN_POT-T-699 1
## 356 PA-1BRSA1240ES-1BRSA1241ES-4BRSA1176ES-E 2
## 357 PA-1BRSA1291DES_SEAL-T-420 1
## 358 PA-1BRSA1318ES-ES-T-486 1
## 359 PA-1BRSA532ASPS-BM-S-8 6
## 360 PA-1BRSA617SCS-BM-S-12 1
## 361 PA-1BRSA693RN-1BRSA697RN_POT-T-706 1
## 362 PA-1DEV15ESS-C-M-61 1
## 363 PA-1KPGL1DSPS-S-M-1101 4
## 364 PA-1REPF3DSPS_S-M-673_674_BM-S-48 1
## 365 PA-1SHEL23RJS-S-M-518 1
## 366 PA-3BRSA523ES-ET-T-381-ES-T-390 4
## 367 PAJEÚ 69
## 368 PAMPO 80
## 369 PAPA-TERRA 42
## 370 PARAMIRIM DO VENCIMENTO 10
## 371 PARATI 20
## 372 PARGO 39
## 373 PARIRI 2
## 374 PARU 5
## 375 PATATIVA 4
## 376 PATURI 6
## 377 PEDRA D'AGUA 1
## 378 PEDRA SENTADA 4
## 379 PEDRINHAS 5
## 380 PEREGRINO 70
## 381 PERIQUITO 7
## 382 PERIQUITO NORTE 1
## 383 PEROÁ 11
## 384 PESCADA 18
## 385 PIAÇABUÇU 25
## 386 PILAR 293
## 387 PINTASSILGO 20
## 388 PIRACUCÁ 6
## 389 PIRANEMA 20
## 390 PIRANEMA SUL 2
## 391 PIRAPITANGA 6
## 392 PIRAÚNA 25
## 393 PITANGA 1
## 394 PITIGUARI 2
## 395 POÇO VERDE 14
## 396 POÇO XAVIER 12
## 397 POJUCA 17
## 398 POJUCA NORTE 6
## 399 POLVO 48
## 400 PONTA DO MEL 43
## 401 PORTO CARÃO 32
## 402 POVOAÇÃO 2
## 403 PRJ-EO 2
## 404 PRJ-OC 4
## 405 PRJ-PM 1
## 406 QUERERÁ 25
## 407 QUIAMBINA 7
## 408 QUIXABA 1
## 409 QUIXABEIRINHA 1
## 410 RABO BRANCO 10
## 411 REDONDA 46
## 412 REDONDA PROFUNDO 72
## 413 REMANSO 117
## 414 RÊMORA 2
## 415 RIACHO AGUA BOA 1
## 416 RIACHO ALAZÃO 1
## 417 RIACHO DA BARRA 85
## 418 RIACHO DA FORQUILHA 57
## 419 RIACHO OURICURI 33
## 420 RIACHO SÃO PEDRO 9
## 421 RIACHO SESMARIA 1
## 422 RIACHO TAPUIO (Licitado) 1
## 423 RIACHO VELHO 1
## 424 RIACHUELO 724
## 425 RIO BARRA SECA 6
## 426 RIO DA SERRA 33
## 427 RIO DO BU 142
## 428 RIO DO CARMO 1
## 429 RIO DOCE 7
## 430 RIO DOS OVOS 22
## 431 RIO IBIRIBAS 3
## 432 RIO IPIRANGA 1
## 433 RIO ITARIRI 49
## 434 RIO ITAÚNAS 83
## 435 RIO ITAÚNAS LESTE 3
## 436 RIO JOANES 5
## 437 RIO MARIRICU 15
## 438 RIO MARIRICU SUL 1
## 439 RIO MOSSORÓ 8
## 440 RIO PIPIRI 3
## 441 RIO POJUCA 79
## 442 RIO PRETO 42
## 443 RIO PRETO OESTE 25
## 444 RIO PRETO SUL 28
## 445 RIO SAO FRANCISCO 2
## 446 RIO SÃO MATEUS 57
## 447 RIO SÃO MATEUS OESTE 8
## 448 RIO SAUÍPE 1
## 449 RIO SUBAÚMA 4
## 450 RIO UNA 1
## 451 RIO URUCU 116
## 452 ROLINHA 2
## 453 RONCADOR 187
## 454 SABIÁ 2
## 455 SABIÁ BICO-DE-OSSO 9
## 456 SABIÁ DA MATA 6
## 457 SAIRA 6
## 458 SALEMA 16
## 459 SALEMA BRANCA 2
## 460 SALGO 6
## 461 SALINA CRISTAL 236
## 462 SANHAÇU 4
## 463 SANTANA 44
## 464 SÃO DOMINGOS 19
## 465 SÃO JOÃO 11
## 466 SÃO MANOEL 1
## 467 SÃO MATEUS 90
## 468 SÃO MATEUS LESTE 6
## 469 SÃO MIGUEL 11
## 470 SÃO MIGUEL DOS CAMPOS 52
## 471 SÃO PEDRO 25
## 472 SAPINHOÁ 30
## 473 SARDINHA 11
## 474 SAUÍPE 8
## 475 SEBASTIÃO FERREIRA 1
## 476 SEMPRE VIVA 1
## 477 SEMPRE VIVA (Licitado) 1
## 478 SÉPIA 5
## 479 SERIEMA 6
## 480 SERRA 43
## 481 SERRA DO MEL 4
## 482 SERRA VERMELHA 10
## 483 SERRARIA 59
## 484 SESMARIA 53
## 485 SIBITE 4
## 486 SIRI 8
## 487 SIRIRIZINHO 626
## 488 SOCORRO 35
## 489 SOCORRO EXTENSÃO 12
## 490 SOLEDADE (Licitado) 8
## 491 SUDOESTE JURUÁ 2
## 492 SUDOESTE URUCU 5
## 493 SUL DE BERBIGÃO 1
## 494 SUL DE CORURIPE 4
## 495 SUL DE FAZENDA ALEGRE 1
## 496 SUL DE LULA 2
## 497 SUL DE SAPINHOÁ 2
## 498 SURURU 5
## 499 SUSSUARANA 22
## 500 TABUIAIÁ 8
## 501 TABULEIRO DOS MARTINS 60
## 502 TAINHA 2
## 503 TAMBAÚ 10
## 504 TAMBUATÁ 20
## 505 TANGARÁ 12
## 506 TAPIRANGA 1
## 507 TAPIRANGA NORTE 1
## 508 TAQUIPE 243
## 509 TARTARUGA 6
## 510 TARTARUGA VERDE 9
## 511 TATUI 3
## 512 TICO-TICO 1
## 513 TIÊ 8
## 514 TIGRE 19
## 515 TIZIU 1
## 516 TRAPIÁ 5
## 517 TRÊS MARIAS 17
## 518 TRILHA 14
## 519 TRINCA FERRO 2
## 520 TROVOADA 1
## 521 TUBARÃO 6
## 522 TUBARÃO AREIA 4
## 523 TUBARÃO AZUL 7
## 524 TUBARÃO GATO 1
## 525 TUBARÃO MARTELO 9
## 526 TUBARÃO TIGRE 5
## 527 TUCANO 5
## 528 UBARANA 137
## 529 UIRAPURU 2
## 530 UIRAPURU SUDOESTE 1
## 531 UPANEMA 40
## 532 URUGUÁ 27
## 533 URUTAU 4
## 534 VALE DO QUIRICÓ 2
## 535 VARGINHA 8
## 536 VÁRZEA REDONDA 2
## 537 VAZA BARRIS 1
## 538 VERMELHO 99
## 539 VIOLA 37
## 540 VOADOR 42
## 541 XARÉU 49
## 542 XERELETE 6
Agrupación
library(stringi)
TDFCampo$Campos<- stri_trans_general(
toupper(trimws(TDFCampo$Campo)),
"Latin-ASCII")
TDFCampo$Campo <- ifelse(
grepl("RIO", TDFCampo$Campo),
"Campos fluviales",
ifelse(grepl("LAGOA", TDFCampo$Campo), "Campos lacustres",
ifelse( grepl("MAR|MARLIM|PAPA-TERRA|PEREGRINO|JUBARTE|RONCADOR", TDFCampo$Campo), "Campos marinos",
ifelse( grepl("ILHA", TDFCampo$Campo),"Campos insulares",
ifelse(grepl("NORTE|SUL|LESTE|OESTE", TDFCampo$Campo), "Extensiones geograficas",
ifelse(grepl("LICITADO", TDFCampo$Campo),
"Campos licitados", "Otros campos"))))))
table(TDFCampo$Campos)
##
##
## 1
## ABALONE
## 1
## ACAJA-BURIZINHO
## 1
## ACAUA
## 1
## ACAUA LESTE
## 1
## AGUA GRANDE
## 1
## AGUILHADA
## 1
## AGULHA
## 1
## ALAGAMAR
## 1
## ALBACORA
## 1
## ALBACORA LESTE
## 1
## ALBATROZ
## 1
## ALTO ALEGRE
## 1
## ALTO DO RODRIGUES
## 1
## ANAMBE
## 1
## ANDORINHA
## 1
## ANEQUIM
## 1
## ANGELIM
## 1
## ANGICO
## 1
## APRAIUS
## 1
## ARABAIANA
## 1
## ARACARI
## 1
## ARACAS
## 1
## ARACAS LESTE
## 1
## ARACUA
## 1
## ARAPACU
## 1
## ARARA AZUL
## 1
## ARARACANGA
## 1
## ARATU
## 1
## ARATUM
## 1
## AREA DO ALS032
## 1
## AREA DO BAS-37 (LICITADO)
## 1
## AREA DO BAS-48
## 1
## AREA DO BAS-64 (LICITADO)
## 1
## AREA DO BAS-85
## 1
## AREA DO BAS-86
## 1
## AREA DO BAS104
## 1
## AREA DO CES066
## 1
## AREA DO PAS-011
## 1
## AREA DO RJS-150
## 1
## AREA DO RNS-36
## 1
## AREA DO SES-092 (LICITADO)
## 1
## AREA DO SES-2
## 1
## ARGONAUTA
## 1
## ARRAIA
## 1
## ARRIBACA
## 1
## ARUARI
## 1
## ASA BRANCA
## 1
## ATALAIA SUL
## 1
## ATAPU
## 1
## ATLANTA
## 1
## ATUM
## 1
## AZULAO
## 1
## BADEJO
## 1
## BAGRE
## 1
## BAIXA DO ALGODAO
## 1
## BAIXA DO JUAZEIRO
## 1
## BALEIA ANA
## 1
## BALEIA FRANCA
## 1
## BARRA BONITA
## 1
## BARRA DO IPIRANGA
## 1
## BARRACUDA
## 1
## BARRINHA
## 1
## BARRINHA LESTE
## 1
## BARRINHA SUDOESTE
## 1
## BAUNA
## 1
## BAUNA SUL
## 1
## BEIJA-FLOR
## 1
## BELA VISTA
## 1
## BEM-TE-VI
## 1
## BENFICA
## 1
## BERBIGAO
## 1
## BICUDO
## 1
## BIGUA
## 1
## BIJUPIRA
## 1
## BIQUARA
## 1
## BIRIBA
## 1
## BOA ESPERANCA
## 1
## BOA VENTURA
## 1
## BOA VISTA
## 1
## BOM DESCANSO
## 1
## BOM LUGAR
## 1
## BONITO
## 1
## BONSUCESSO
## 1
## BREJINHO
## 1
## BREJO GRANDE
## 1
## BURACICA
## 1
## BUZIOS
## 1
## CABOCLINHO
## 1
## CABURE
## 1
## CACAO
## 1
## CACHOEIRINHA
## 1
## CACIMBAS
## 1
## CAIOBA
## 1
## CAIPE VELHO
## 1
## CAMACARI
## 1
## CAMARUPIM
## 1
## CAMARUPIM NORTE
## 1
## CAMBACICA
## 1
## CAMORIM
## 1
## CAMPO GRANDE
## 1
## CANABRAVA
## 1
## CANAPU
## 1
## CANARIO
## 1
## CANARIO DA TERRA
## 1
## CANCA
## 1
## CANDEIAS
## 1
## CANGOA
## 1
## CANTAGALO
## 1
## CANTO DO AMARO
## 1
## CARACATU
## 1
## CARAPANAUBA
## 1
## CARAPEBA
## 1
## CARAPIA
## 1
## CARAPICU
## 1
## CARAPITANGA
## 1
## CARATINGA
## 1
## CARAUNA
## 1
## CARAVELA
## 1
## CARCARA
## 1
## CARDEAL
## 1
## CARDEAL AMARELO
## 1
## CARDEAL DO NORDESTE
## 1
## CARMOPOLIS
## 1
## CARMOPOLIS NOROESTE
## 1
## CARNAUBAIS
## 1
## CARNAUBAIS VELHO
## 1
## CASSARONGONGO
## 1
## CASTANHAL
## 1
## CAVALO-MARINHO
## 1
## CAXAREU
## 1
## CEXIS
## 1
## CHAUA
## 1
## CHERNE
## 1
## CHOPIM
## 1
## CIDADE DE ARACAJU
## 1
## CIDADE DE ARACAJU (LICITADO)
## 1
## CIDADE DE CORURIPE
## 1
## CIDADE DE ENTRE RIOS
## 1
## CIDADE DE PIRAMBU
## 1
## CIDADE DE SAO MIGUEL DOS CAMPOS
## 1
## CIDADE DE SEBASTIAO FERREIRA
## 1
## CIOBA
## 1
## COLIBRI
## 1
## CONCEICAO
## 1
## CONCEICAO DA BARRA
## 1
## CONCRIZ
## 1
## CONGRO
## 1
## COQUEIRO SECO
## 1
## CORAL
## 1
## CORREGO CEDRO NORTE
## 1
## CORREGO CEDRO NORTE SUL
## 1
## CORREGO DAS PEDRAS
## 1
## CORREGO DOURADO
## 1
## CORREGO GRANDE
## 1
## CORRUIRA
## 1
## CORVINA
## 1
## CREJOA
## 1
## CRISTO REDENTOR
## 1
## CUPIUBA
## 1
## CURIMA
## 1
## CURRAL DE FORA
## 1
## DENTAO
## 1
## DIAS D'AVILA
## 1
## DO-RE-MI
## 1
## DOM JOAO
## 1
## DOM JOAO MAR
## 1
## DOURADO
## 1
## ENCHOVA
## 1
## ENCHOVA OESTE
## 1
## ESPADA
## 1
## ESPADARTE
## 1
## ESTREITO
## 1
## ESTRELA DO MAR
## 1
## FAZENDA ALEGRE
## 1
## FAZENDA ALTO DAS PEDRAS
## 1
## FAZENDA ALVORADA
## 1
## FAZENDA AZEVEDO
## 1
## FAZENDA AZEVEDO OESTE
## 1
## FAZENDA BALSAMO
## 1
## FAZENDA BELEM
## 1
## FAZENDA BOA ESPERANCA
## 1
## FAZENDA BOA PAZ
## 1
## FAZENDA BOA VISTA
## 1
## FAZENDA CANAAN
## 1
## FAZENDA CEDRO
## 1
## FAZENDA CEDRO NORTE
## 1
## FAZENDA CURRAL
## 1
## FAZENDA FLORESTA
## 1
## FAZENDA GAMELEIRA (LICITADO)
## 1
## FAZENDA GUINDASTE
## 1
## FAZENDA IMBE
## 1
## FAZENDA IMPERIO
## 1
## FAZENDA JUNCO
## 1
## FAZENDA MALAQUIAS
## 1
## FAZENDA MAMOEIRO
## 1
## FAZENDA MATINHA
## 1
## FAZENDA NOVA
## 1
## FAZENDA ONCA
## 1
## FAZENDA PANELAS
## 1
## FAZENDA PAU BRASIL
## 1
## FAZENDA POCINHO
## 1
## FAZENDA QUEIMADAS
## 1
## FAZENDA QUEIMADAS OESTE
## 1
## FAZENDA RIACHUELO
## 1
## FAZENDA RIO BRANCO
## 1
## FAZENDA SANTA LUZIA
## 1
## FAZENDA SANTA ROSA
## 1
## FAZENDA SANTO ESTEVAO
## 1
## FAZENDA SAO JORGE
## 1
## FAZENDA SAO RAFAEL
## 1
## FAZENDA SORI
## 1
## FOZ DO VAZA-BARRIS
## 1
## FOZ DO VAZA BARRIS (LICITADO)
## 1
## FRADE
## 1
## FURADO
## 1
## GAIVOTA
## 1
## GALO DE CAMPINA
## 1
## GAMBOA
## 1
## GARCA BRANCA
## 1
## GAROUPA
## 1
## GAROUPINHA
## 1
## GAVIAO AZUL
## 1
## GAVIAO BRANCO
## 1
## GAVIAO BRANCO NORTE
## 1
## GAVIAO CABOCLO
## 1
## GAVIAO CABOCLO SUL
## 1
## GAVIAO REAL
## 1
## GAVIAO VERMELHO
## 1
## GOLFINHO
## 1
## GOMO
## 1
## GRAUNA
## 1
## GUAIAMA
## 1
## GUAIUBA
## 1
## GUAJA
## 1
## GUAMARE
## 1
## GUAMARE SUDESTE
## 1
## GUANAMBI
## 1
## GUARA
## 1
## GUARICEMA
## 1
## GURIATA
## 1
## GURIATA SUL
## 1
## GURIRI
## 1
## HARPIA
## 1
## ICAPUI
## 1
## IGARAPE CUIA
## 1
## IGARAPE PUCA
## 1
## ILHA DA CACUMBA
## 1
## ILHA DE BIMBARRA
## 1
## ILHA PEQUENA
## 1
## INHAMBU
## 1
## IRAI
## 1
## IRAUNA
## 1
## IRERE
## 1
## ITAPARICA
## 1
## ITAPU
## 1
## JACANA
## 1
## JACARANDA
## 1
## JACUIPE
## 1
## JACUMIRIM (LICITADO)
## 1
## JACUPEMBA
## 1
## JACUTINGA
## 1
## JANDAIA
## 1
## JANDAIA SUL
## 1
## JANDUI
## 1
## JAO
## 1
## JAPIIM
## 1
## JAPUACU
## 1
## JEQUIA
## 1
## JIRIBATUBA
## 1
## JIRIBATUBA (LICITADO)
## 1
## JOAO DE BARRO
## 1
## JUAZEIRO
## 1
## JUBARTE
## 1
## JURITI
## 1
## JURUA
## 1
## LAGOA AROEIRA
## 1
## LAGOA BONITA
## 1
## LAGOA BRANCA
## 1
## LAGOA DAS PIABAS
## 1
## LAGOA DO DOUTOR
## 1
## LAGOA DO DOUTOR (LICITADO)
## 1
## LAGOA DO PAULO
## 1
## LAGOA DO PAULO NORTE
## 1
## LAGOA DO PAULO SUL
## 1
## LAGOA PACAS
## 1
## LAGOA PARDA
## 1
## LAGOA PARDA NORTE
## 1
## LAGOA PARDA SUL
## 1
## LAGOA PIABANHA
## 1
## LAGOA SURUACA
## 1
## LAGOA VERDE
## 1
## LAGOSTA
## 1
## LAMARAO
## 1
## LAPA
## 1
## LEODORIO
## 1
## LESTE DE POCO XAVIER
## 1
## LESTE DO URUCU
## 1
## LINGUADO
## 1
## LIVRAMENTO
## 1
## LOBATO
## 1
## LORENA
## 1
## LULA
## 1
## MACARICO
## 1
## MACAU
## 1
## MAE-DA-LUA
## 1
## MALHADO
## 1
## MALOMBE
## 1
## MANATI
## 1
## MANDACARU
## 1
## MAPELE
## 1
## MARECHAL DEODORO
## 1
## MARIMBA
## 1
## MARIRICU
## 1
## MARIRICU NORTE
## 1
## MARIRICU OESTE
## 1
## MARITACA
## 1
## MARLIM
## 1
## MARLIM LESTE
## 1
## MARLIM SUL
## 1
## MAROMBA
## 1
## MASSAPE
## 1
## MASSUI
## 1
## MATA DE SAO JOAO
## 1
## MATO GROSSO
## 1
## MATO GROSSO NOROESTE
## 1
## MERLUZA
## 1
## MERO
## 1
## MEXILHAO
## 1
## MIRANGA
## 1
## MIRANGA LESTE
## 1
## MIRANGA NORTE
## 1
## MONTE ALEGRE
## 1
## MOREIA
## 1
## MORRINHO
## 1
## MORRO DO BARRO
## 1
## MORRO DO BARRO (LICITADO)
## 1
## MOSQUEIRO
## 1
## MOSQUITO
## 1
## MOSQUITO NORTE
## 1
## MOSSORO
## 1
## MUTUM
## 1
## NAMORADO
## 1
## NATIVO OESTE
## 1
## NORDESTE DE JURUA
## 1
## NORDESTE DE NAMORADO
## 1
## NOROESTE DO MORRO ROSADO
## 1
## NORTE DE AREIA BRANCA
## 1
## NORTE DE FAZENDA CARUACU
## 1
## OESTE DE ATAPU
## 1
## OESTE DE UBARANA
## 1
## OLIVA
## 1
## OSTRA
## 1
## PA-1APL1ESS-BMC30
## 1
## PA-1BRSA1025RN_POT-T-699
## 1
## PA-1BRSA1240ES-1BRSA1241ES-4BRSA1176ES-E
## 1
## PA-1BRSA1291DES_SEAL-T-420
## 1
## PA-1BRSA1318ES-ES-T-486
## 1
## PA-1BRSA532ASPS-BM-S-8
## 1
## PA-1BRSA617SCS-BM-S-12
## 1
## PA-1BRSA693RN-1BRSA697RN_POT-T-706
## 1
## PA-1DEV15ESS-C-M-61
## 1
## PA-1KPGL1DSPS-S-M-1101
## 1
## PA-1REPF3DSPS_S-M-673_674_BM-S-48
## 1
## PA-1SHEL23RJS-S-M-518
## 1
## PA-3BRSA523ES-ET-T-381-ES-T-390
## 1
## PAJEU
## 1
## PAMPO
## 1
## PAPA-TERRA
## 1
## PARAMIRIM DO VENCIMENTO
## 1
## PARATI
## 1
## PARGO
## 1
## PARIRI
## 1
## PARU
## 1
## PATATIVA
## 1
## PATURI
## 1
## PEDRA D'AGUA
## 1
## PEDRA SENTADA
## 1
## PEDRINHAS
## 1
## PEREGRINO
## 1
## PERIQUITO
## 1
## PERIQUITO NORTE
## 1
## PEROA
## 1
## PESCADA
## 1
## PIACABUCU
## 1
## PILAR
## 1
## PINTASSILGO
## 1
## PIRACUCA
## 1
## PIRANEMA
## 1
## PIRANEMA SUL
## 1
## PIRAPITANGA
## 1
## PIRAUNA
## 1
## PITANGA
## 1
## PITIGUARI
## 1
## POCO VERDE
## 1
## POCO XAVIER
## 1
## POJUCA
## 1
## POJUCA NORTE
## 1
## POLVO
## 1
## PONTA DO MEL
## 1
## PORTO CARAO
## 1
## POVOACAO
## 1
## PRJ-EO
## 1
## PRJ-OC
## 1
## PRJ-PM
## 1
## QUERERA
## 1
## QUIAMBINA
## 1
## QUIXABA
## 1
## QUIXABEIRINHA
## 1
## RABO BRANCO
## 1
## REDONDA
## 1
## REDONDA PROFUNDO
## 1
## REMANSO
## 1
## REMORA
## 1
## RIACHO AGUA BOA
## 1
## RIACHO ALAZAO
## 1
## RIACHO DA BARRA
## 1
## RIACHO DA FORQUILHA
## 1
## RIACHO OURICURI
## 1
## RIACHO SAO PEDRO
## 1
## RIACHO SESMARIA
## 1
## RIACHO TAPUIO (LICITADO)
## 1
## RIACHO VELHO
## 1
## RIACHUELO
## 1
## RIO BARRA SECA
## 1
## RIO DA SERRA
## 1
## RIO DO BU
## 1
## RIO DO CARMO
## 1
## RIO DOCE
## 1
## RIO DOS OVOS
## 1
## RIO IBIRIBAS
## 1
## RIO IPIRANGA
## 1
## RIO ITARIRI
## 1
## RIO ITAUNAS
## 1
## RIO ITAUNAS LESTE
## 1
## RIO JOANES
## 1
## RIO MARIRICU
## 1
## RIO MARIRICU SUL
## 1
## RIO MOSSORO
## 1
## RIO PIPIRI
## 1
## RIO POJUCA
## 1
## RIO PRETO
## 1
## RIO PRETO OESTE
## 1
## RIO PRETO SUL
## 1
## RIO SAO FRANCISCO
## 1
## RIO SAO MATEUS
## 1
## RIO SAO MATEUS OESTE
## 1
## RIO SAUIPE
## 1
## RIO SUBAUMA
## 1
## RIO UNA
## 1
## RIO URUCU
## 1
## ROLINHA
## 1
## RONCADOR
## 1
## SABIA
## 1
## SABIA BICO-DE-OSSO
## 1
## SABIA DA MATA
## 1
## SAIRA
## 1
## SALEMA
## 1
## SALEMA BRANCA
## 1
## SALGO
## 1
## SALINA CRISTAL
## 1
## SANHACU
## 1
## SANTANA
## 1
## SAO DOMINGOS
## 1
## SAO JOAO
## 1
## SAO MANOEL
## 1
## SAO MATEUS
## 1
## SAO MATEUS LESTE
## 1
## SAO MIGUEL
## 1
## SAO MIGUEL DOS CAMPOS
## 1
## SAO PEDRO
## 1
## SAPINHOA
## 1
## SARDINHA
## 1
## SAUIPE
## 1
## SEBASTIAO FERREIRA
## 1
## SEMPRE VIVA
## 1
## SEMPRE VIVA (LICITADO)
## 1
## SEPIA
## 1
## SERIEMA
## 1
## SERRA
## 1
## SERRA DO MEL
## 1
## SERRA VERMELHA
## 1
## SERRARIA
## 1
## SESMARIA
## 1
## SIBITE
## 1
## SIRI
## 1
## SIRIRIZINHO
## 1
## SOCORRO
## 1
## SOCORRO EXTENSAO
## 1
## SOLEDADE (LICITADO)
## 1
## SUDOESTE JURUA
## 1
## SUDOESTE URUCU
## 1
## SUL DE BERBIGAO
## 1
## SUL DE CORURIPE
## 1
## SUL DE FAZENDA ALEGRE
## 1
## SUL DE LULA
## 1
## SUL DE SAPINHOA
## 1
## SURURU
## 1
## SUSSUARANA
## 1
## TABUIAIA
## 1
## TABULEIRO DOS MARTINS
## 1
## TAINHA
## 1
## TAMBAU
## 1
## TAMBUATA
## 1
## TANGARA
## 1
## TAPIRANGA
## 1
## TAPIRANGA NORTE
## 1
## TAQUIPE
## 1
## TARTARUGA
## 1
## TARTARUGA VERDE
## 1
## TATUI
## 1
## TICO-TICO
## 1
## TIE
## 1
## TIGRE
## 1
## TIZIU
## 1
## TRAPIA
## 1
## TRES MARIAS
## 1
## TRILHA
## 1
## TRINCA FERRO
## 1
## TROVOADA
## 1
## TUBARAO
## 1
## TUBARAO AREIA
## 1
## TUBARAO AZUL
## 1
## TUBARAO GATO
## 1
## TUBARAO MARTELO
## 1
## TUBARAO TIGRE
## 1
## TUCANO
## 1
## UBARANA
## 1
## UIRAPURU
## 1
## UIRAPURU SUDOESTE
## 1
## UPANEMA
## 1
## URUGUA
## 1
## URUTAU
## 1
## VALE DO QUIRICO
## 1
## VARGINHA
## 1
## VARZEA REDONDA
## 1
## VAZA BARRIS
## 1
## VERMELHO
## 1
## VIOLA
## 1
## VOADOR
## 1
## XAREU
## 1
## XERELETE
## 1
Los campos se agrupan en categorías productivas según criterios semánticos del nombre.
TDFCampo$Freq <- as.numeric(as.character(TDFCampo$Freq))
library(dplyr)
##
## Adjuntando el paquete: 'dplyr'
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
TDFCampos <- Datos$TDFCampo
TDFCampos <- TDFCampo %>%
group_by(Campo) %>%
summarise(
ni = sum(Freq),
hi = round(sum(Freq) / sum(TDFCampo$Freq)*100, 4))
TDFCampos <- data.frame(TDFCampos)
Agregar totales
TDFCampos <- TDFCampos [, c("Campo", "ni", "hi")]
total_ni <- sum(TDFCampos$ni)
total_hi <- sum(TDFCampos$hi)
TDFCampos1 <- rbind(TDFCampos, data.frame( Campo = "Total",
ni = total_ni,
hi = total_hi))
print(TDFCampos1)
## Campo ni hi
## 1 Campos fluviales 790 2.6712
## 2 Campos insulares 130 0.4396
## 3 Campos lacustres 292 0.9873
## 4 Campos marinos 3904 13.2003
## 5 Extensiones geograficas 531 1.7954
## 6 Otros campos 23928 80.9062
## 7 Total 29575 100.0000
library(gt)
gt(TDFCampos1) %>%
tab_header(
title = md("**DISTRIBUCIÓN DE FRECUENCIAS DE POZOS PETROLEROS DE BRASIL**"),
subtitle = "Campos de Producción de los Pozos Petrolíferos") %>%
fmt_number(
columns = hi,
decimals = 2
) %>%
cols_align(align = "center", columns = everything()) %>%
tab_style(
style = list(cell_fill(color = "#2E4053"), cell_text(color = "white", weight = "bold")),
locations = cells_title()
) %>%
tab_style(
style = list(cell_fill(color = "#F2F3F4"), cell_text(weight = "bold", color = "#2E4053")),
locations = cells_column_labels()
) %>%
tab_options(
table.border.top.color = "#2E4053",
table.border.bottom.color = "#2E4053",
column_labels.border.bottom.color = "#2E4053",
data_row.padding = px(6))
| DISTRIBUCIÓN DE FRECUENCIAS DE POZOS PETROLEROS DE BRASIL | ||
| Campos de Producción de los Pozos Petrolíferos | ||
| Campo | ni | hi |
|---|---|---|
| Campos fluviales | 790 | 2.67 |
| Campos insulares | 130 | 0.44 |
| Campos lacustres | 292 | 0.99 |
| Campos marinos | 3904 | 13.20 |
| Extensiones geograficas | 531 | 1.80 |
| Otros campos | 23928 | 80.91 |
| Total | 29575 | 100.00 |
Se visualiza la cantidad de pozos por tipo de campo.
TDFCampos1 <- TDFCampos1[TDFCampos1$Campo != "Total", ]
par(mar = c(9, 4, 4, 2))
barplot(TDFCampos1$ni,
main = "Gráfica N°1: Distribución en cantidad de campos petroleros por grupo",
ylab = "Cantidad",
col = "#2E4053", names.arg = TDFCampos1$Campo,
las = 2, cex.names = 0.8, cex.axis = 0.8, cex.main = 1)
mtext("Campos", side = 1, line = 7)
Se representa el porcentaje de participación de cada grupo de campos.
par(mar = c(9, 4, 4, 2))
barplot(TDFCampos1$hi,
main = "Gráfica N°2: Distribución porcentual de campos petroleros por grupo",
ylab = "Porcentaje",
col = "#2E4053", names.arg = TDFCampos1$Campo,
las = 2, cex.names = 0.8, cex.axis = 0.8, cex.main = 1)
mtext("Campos", side = 1, line = 7)
Se construye la distribución de probabilidad empírica de los campos petroleros.
P_Campos <- TDFCampos1$ni / sum(TDFCampos1$ni)
par(mar = c(9, 4, 4, 2))
barplot(P_Campos,
main = "Gráfica N°3: Distribución de Probabilidad de los campos petroleros por grupo",
ylab = "Probabilidad",
col = "#2E4053", names.arg = TDFCampos1$Campo,
las = 2, cex.names = 0.8, cex.axis = 0.8, cex.main = 1)
mtext("Campos", side = 1, line = 7)
¿Cuál es la probabilidad de que un pozo petrolero seleccionado aleatoriamente pertenezca a un campo marino?
x <- round(
(TDFCampos1$ni[TDFCampos1$Campo == "Campos marinos"] /
sum(TDFCampos1$ni)) * 100, 1)
print(paste("La probabilidad es de:", x, "%"))
## [1] "La probabilidad es de: 13.2 %"
La probabilidad calculada indica que aproximadamente el 13,2 % de los pozos petroleros pertenecen a campos marinos, lo que evidencia una presencia relevante, aunque no mayoritaria, dentro de la producción petrolera brasileña.
Si se seleccionan 1000 pozos petroleros, ¿cuántos se espera que pertenezcan a campos marinos?
p <- x / 100
n <- 1000
cantidad_esperada <- n * p
Bloque_objetivo <- "Campos marinos"
cat("Para n =", n, "Pozos, cantidad esperada en", Bloque_objetivo, "=", round(cantidad_esperada, 2), "\n")
## Para n = 1000 Pozos, cantidad esperada en Campos marinos = 132
De acuerdo con el modelo probabilístico, para un total de 1000 pozos, se espera que 132 pozos corresponda a campos marinos, manteniendo la distribución observada en los datos reales