link='https://docs.google.com/spreadsheets/d/e/2PACX-1vRZCI3sFAsmXdsqhKltY4RpQQIWv4buPuLjJG6nzU5tSx6WCaJ7AvV575TWnZDHzhelMn6xm6wkrfBi/pub?gid=1054555045&single=true&output=csv'
idhSM=read.csv(link, stringsAsFactors = F)str(idhSM)## 'data.frame': 1834 obs. of 12 variables:
## $ ubiReg : int 10000 10000 10000 10000 10000 10000 10000 10000 10000 10000 ...
## $ ubiProv : int 10200 10200 10200 10200 10200 10200 10300 10300 10300 10300 ...
## $ ubiDis : int 10202 10201 10203 10204 10205 10206 10302 10303 10304 10305 ...
## $ depa : chr "AMAZONAS" "AMAZONAS" "AMAZONAS" "AMAZONAS" ...
## $ prov : chr "BAGUA" "BAGUA" "BAGUA" "BAGUA" ...
## $ dist : chr "ARAMANGO" "BAGUA" "COPALLIN" "EL PARCO" ...
## $ pobla : int 11587 26067 6501 1443 23820 8020 349 282 922 883 ...
## $ esperanza : num 76.8 74.7 78 77.4 77.4 ...
## $ accesoedu : num 5.38 8.33 5.77 6.24 5.78 8.33 5.76 6.75 4.83 5.04 ...
## $ percapitaf: num 405 662 452 551 209 ...
## $ PPK : int 1823 4949 1490 604 6282 2342 135 92 234 283 ...
## $ FP : int 3072 5809 1321 400 2059 2765 118 162 189 155 ...3hipótesis: 1. PPK tuvo más apoyo que FP mientras mejor acceso a la educación. 2. PPK tuvo más apoyo que FP mientras mayor era a la esperanza de vida. 3. PPK tuvo menos apoyo que FP mientras mayores ingresos.
No olvide controlar sus modelos inferenciales multivariados.
Usando la data, responda:
PPK ganó le ganó a FP en todas las provincias? Existe correlación entre la ventaja que le sacó PPK a FP y nivel de ingresos? Qué coeficiente usó? Se cumple la hipotesis 1? que nos puedes informar sobre esa hipotesis? Se cumple la hipotesis 2? que nos puedes informar sobre esa hipotesis? Se cumple la hipotesis 3? que nos puedes informar sobre esa hipotesis?
idhSM=idhSM[complete.cases(idhSM),]summary(idhSM)## ubiReg ubiProv ubiDis depa
## Min. : 10000 Min. : 10100 Min. : 10101 Length:1834
## 1st Qu.: 50000 1st Qu.: 50200 1st Qu.: 50205 Class :character
## Median :100000 Median :100450 Median :100452 Mode :character
## Mean :106390 Mean :106929 Mean :106937
## 3rd Qu.:150000 3rd Qu.:150800 3rd Qu.:150808
## Max. :250000 Max. :250400 Max. :250401
## prov dist pobla esperanza
## Length:1834 Length:1834 Min. : 181 Min. :51.72
## Class :character Class :character 1st Qu.: 1915 1st Qu.:70.02
## Mode :character Mode :character Median : 4564 Median :73.39
## Mean : 16432 Mean :72.67
## 3rd Qu.: 11485 3rd Qu.:76.45
## Max. :1025929 Max. :83.52
## accesoedu percapitaf PPK FP
## Min. : 2.030 Min. : 100.0 Min. : 0.0 Min. : 0.0
## 1st Qu.: 5.240 1st Qu.: 201.7 1st Qu.: 378.2 1st Qu.: 413.2
## Median : 6.500 Median : 317.8 Median : 945.5 Median : 929.5
## Mean : 6.825 Mean : 392.4 Mean : 4562.7 Mean : 4529.7
## 3rd Qu.: 8.178 3rd Qu.: 511.9 3rd Qu.: 2279.8 3rd Qu.: 2443.5
## Max. :14.250 Max. :1596.1 Max. :264607.0 Max. :318615.0names(idhSM)## [1] "ubiReg" "ubiProv" "ubiDis" "depa" "prov"
## [6] "dist" "pobla" "esperanza" "accesoedu" "percapitaf"
## [11] "PPK" "FP"idhSM$pobla=as.numeric(idhSM$pobla)
idhSM[,c(11,12)]=lapply(idhSM[,c(11,12)],as.numeric)
idhSM[,c(1:6)]=lapply(idhSM[,c(1:6)],as.factor)str(idhSM)## 'data.frame': 1834 obs. of 12 variables:
## $ ubiReg : Factor w/ 25 levels "10000","20000",..: 1 1 1 1 1 1 1 1 1 1 ...
## $ ubiProv : Factor w/ 195 levels "10100","10200",..: 2 2 2 2 2 2 3 3 3 3 ...
## $ ubiDis : Factor w/ 1834 levels "10101","10102",..: 23 22 24 25 26 27 29 30 31 32 ...
## $ depa : Factor w/ 25 levels "AMAZONAS","ANCASH",..: 1 1 1 1 1 1 1 1 1 1 ...
## $ prov : Factor w/ 195 levels "ABANCAY","ACOBAMBA",..: 19 19 19 19 19 19 24 24 24 24 ...
## $ dist : Factor w/ 1684 levels "ABANCAY","ABELARDO PARDO LEZAMETA",..: 83 117 411 476 645 730 324 358 421 437 ...
## $ pobla : num 11587 26067 6501 1443 23820 ...
## $ esperanza : num 76.8 74.7 78 77.4 77.4 ...
## $ accesoedu : num 5.38 8.33 5.77 6.24 5.78 8.33 5.76 6.75 4.83 5.04 ...
## $ percapitaf: num 405 662 452 551 209 ...
## $ PPK : num 1823 4949 1490 604 6282 ...
## $ FP : num 3072 5809 1321 400 2059 ...library(ggpubr)## Loading required package: ggplot2## Loading required package: magrittrp1=ggscatter(idhSM,
x = "percapitaf", y = "PPK",
cor.coef = TRUE,
cor.method = "pearson")
p1
Ha=formula(percapitaf ~ PPK)
aggregate(Ha, data=idhSM,median) ## PPK percapitaf
## 1 0 189.90
## 2 17 194.90
## 3 25 146.70
## 4 30 150.70
## 5 32 346.50
## 6 36 255.40
## 7 44 393.60
## 8 50 450.40
## 9 52 408.10
## 10 53 395.30
## 11 55 519.60
## 12 59 278.05
## 13 61 443.05
## 14 62 170.10
## 15 63 302.90
## 16 65 208.25
## 17 66 360.30
## 18 67 132.90
## 19 70 185.80
## 20 71 966.40
## 21 72 143.50
## 22 73 333.20
## 23 75 546.80
## 24 76 444.90
## 25 78 257.05
## 26 79 215.75
## 27 80 358.90
## 28 81 239.05
## 29 82 336.30
## 30 83 341.30
## 31 84 307.95
## 32 87 594.50
## 33 89 130.80
## 34 92 517.10
## 35 93 174.10
## 36 95 303.20
## 37 96 431.55
## 38 98 243.80
## 39 99 405.40
## 40 101 399.30
## 41 102 287.40
## 42 105 387.80
## 43 109 184.60
## 44 111 255.70
## 45 112 200.15
## 46 114 283.35
## 47 116 169.95
## 48 118 234.10
## 49 119 181.50
## 50 122 214.60
## 51 123 150.05
## 52 124 288.40
## 53 125 278.35
## 54 126 306.40
## 55 128 258.60
## 56 129 294.55
## 57 131 131.70
## 58 132 182.20
## 59 133 232.30
## 60 134 432.60
## 61 135 368.60
## 62 136 237.40
## 63 137 332.55
## 64 138 350.70
## 65 139 291.40
## 66 140 963.20
## 67 142 237.65
## 68 145 251.20
## 69 146 361.10
## 70 147 149.50
## 71 148 323.10
## 72 149 321.90
## 73 150 237.80
## 74 152 278.20
## 75 154 234.75
## 76 156 296.20
## 77 157 258.40
## 78 158 314.20
## 79 160 400.10
## 80 161 278.20
## 81 162 659.85
## 82 163 150.20
## 83 164 299.40
## 84 165 460.80
## 85 166 143.70
## 86 167 304.20
## 87 168 713.20
## 88 169 109.40
## 89 170 226.60
## 90 171 178.10
## 91 172 382.10
## 92 175 137.70
## 93 177 332.00
## 94 178 167.80
## 95 179 148.10
## 96 180 344.10
## 97 181 206.10
## 98 182 161.80
## 99 184 247.40
## 100 185 357.90
## 101 186 291.40
## 102 187 191.40
## 103 188 469.20
## 104 189 303.80
## 105 190 248.70
## 106 191 244.45
## 107 192 581.70
## 108 195 321.00
## 109 197 237.30
## 110 198 178.20
## 111 199 237.45
## 112 200 241.00
## 113 201 388.80
## 114 202 477.95
## 115 203 177.00
## 116 204 243.90
## 117 205 341.30
## 118 206 479.50
## 119 207 269.40
## 120 209 322.00
## 121 210 222.00
## 122 211 410.00
## 123 212 375.10
## 124 213 364.60
## 125 215 201.20
## 126 217 278.50
## 127 218 361.90
## 128 219 282.10
## 129 222 365.00
## 130 223 361.60
## 131 225 289.20
## 132 226 285.35
## 133 227 251.10
## 134 228 346.10
## 135 229 280.70
## 136 230 224.10
## 137 231 274.10
## 138 234 216.45
## 139 235 186.40
## 140 236 277.90
## 141 237 436.60
## 142 238 217.65
## 143 239 101.20
## 144 240 187.60
## 145 241 252.45
## 146 242 294.80
## 147 243 281.90
## 148 244 309.30
## 149 246 322.45
## 150 250 287.10
## 151 252 144.70
## 152 253 366.20
## 153 254 146.80
## 154 256 484.10
## 155 257 275.90
## 156 258 593.40
## 157 259 503.90
## 158 260 143.50
## 159 261 199.60
## 160 262 205.80
## 161 263 384.70
## 162 264 308.90
## 163 266 150.50
## 164 267 149.50
## 165 268 258.40
## 166 269 184.70
## 167 270 271.20
## 168 271 150.90
## 169 272 452.20
## 170 274 234.60
## 171 275 375.60
## 172 277 281.50
## 173 278 216.15
## 174 279 233.40
## 175 280 245.20
## 176 283 387.10
## 177 284 176.40
## 178 285 743.40
## 179 286 189.90
## 180 288 177.90
## 181 290 478.00
## 182 291 408.20
## 183 292 105.80
## 184 293 156.00
## 185 295 227.30
## 186 296 245.30
## 187 297 407.50
## 188 298 144.00
## 189 299 225.90
## 190 301 173.55
## 191 303 242.30
## 192 304 346.80
## 193 305 269.20
## 194 307 116.10
## 195 308 432.30
## 196 309 307.80
## 197 311 530.80
## 198 312 152.55
## 199 313 138.80
## 200 314 436.55
## 201 316 400.80
## 202 317 375.60
## 203 318 228.30
## 204 319 201.45
## 205 320 915.20
## 206 321 304.80
## 207 322 207.70
## 208 324 206.65
## 209 326 219.50
## 210 328 386.30
## 211 329 265.45
## 212 331 234.35
## 213 332 383.40
## 214 333 199.60
## 215 335 106.90
## 216 336 234.00
## 217 339 199.20
## 218 340 248.40
## 219 341 390.50
## 220 342 265.00
## 221 343 335.40
## 222 345 228.60
## 223 346 322.60
## 224 347 160.80
## 225 351 220.25
## 226 352 197.90
## 227 353 355.55
## 228 354 327.70
## 229 355 302.20
## 230 357 496.90
## 231 359 308.90
## 232 360 228.65
## 233 361 260.20
## 234 362 315.80
## 235 363 514.20
## 236 364 141.95
## 237 366 384.80
## 238 367 362.15
## 239 369 451.05
## 240 370 206.95
## 241 371 311.60
## 242 372 819.45
## 243 373 132.10
## 244 375 362.30
## 245 376 203.60
## 246 378 648.00
## 247 379 167.00
## 248 380 1211.70
## 249 381 462.60
## 250 382 108.80
## 251 383 405.60
## 252 384 195.20
## 253 385 113.10
## 254 386 276.55
## 255 387 482.65
## 256 389 196.80
## 257 390 181.05
## 258 391 277.50
## 259 392 373.50
## 260 393 173.70
## 261 394 319.65
## 262 397 236.10
## 263 399 136.20
## 264 400 165.05
## 265 401 195.45
## 266 404 276.90
## 267 405 414.90
## 268 407 299.45
## 269 408 433.60
## 270 410 171.60
## 271 411 357.05
## 272 412 153.45
## 273 413 410.50
## 274 415 458.00
## 275 416 283.80
## 276 417 256.35
## 277 418 207.30
## 278 419 504.80
## 279 420 211.70
## 280 421 286.20
## 281 422 322.40
## 282 424 260.60
## 283 427 1347.40
## 284 428 247.20
## 285 429 751.50
## 286 430 209.50
## 287 431 356.80
## 288 432 694.30
## 289 433 294.30
## 290 435 605.20
## 291 437 104.40
## 292 438 291.90
## 293 440 275.60
## 294 441 163.10
## 295 442 335.00
## 296 443 561.15
## 297 444 380.20
## 298 445 247.30
## 299 446 873.30
## 300 449 422.80
## 301 454 187.30
## 302 455 293.10
## 303 458 189.10
## 304 459 268.10
## 305 460 232.60
## 306 461 447.80
## 307 462 209.50
## 308 464 205.80
## 309 465 611.25
## 310 466 264.10
## 311 470 407.15
## 312 477 132.80
## 313 479 215.20
## 314 481 303.40
## 315 482 141.55
## 316 483 153.30
## 317 484 128.40
## 318 486 175.85
## 319 492 272.85
## 320 494 307.60
## 321 495 469.45
## 322 499 272.10
## 323 500 154.00
## 324 503 222.85
## 325 504 192.30
## 326 505 343.20
## 327 506 127.45
## 328 507 423.05
## 329 508 137.00
## 330 510 172.10
## 331 511 325.50
## 332 512 236.40
## 333 513 224.00
## 334 514 420.10
## 335 522 274.70
## 336 524 136.80
## 337 525 330.20
## 338 527 125.30
## 339 529 177.70
## 340 531 288.10
## 341 533 440.60
## 342 535 370.25
## 343 537 189.00
## 344 541 401.00
## 345 542 204.00
## 346 543 153.10
## 347 544 236.40
## 348 545 345.90
## 349 548 253.00
## 350 549 248.55
## 351 552 287.45
## 352 553 377.60
## 353 554 150.10
## 354 557 273.75
## 355 560 393.70
## 356 561 344.20
## 357 563 186.40
## 358 564 357.85
## 359 565 332.10
## 360 568 210.00
## 361 570 308.60
## 362 571 727.20
## 363 574 405.30
## 364 575 499.15
## 365 578 116.80
## 366 581 417.65
## 367 583 377.10
## 368 584 153.30
## 369 585 427.15
## 370 586 207.50
## 371 587 377.10
## 372 588 325.90
## 373 590 179.80
## 374 591 712.50
## 375 592 232.40
## 376 593 241.80
## 377 594 193.85
## 378 595 158.80
## 379 596 404.10
## 380 599 391.80
## 381 600 161.00
## 382 602 467.80
## 383 603 204.00
## 384 604 551.40
## 385 609 297.50
## 386 611 276.75
## 387 613 374.40
## 388 614 413.50
## 389 615 140.40
## 390 616 156.10
## 391 617 324.25
## 392 618 577.00
## 393 619 439.30
## 394 620 244.60
## 395 621 656.80
## 396 622 548.80
## 397 625 672.80
## 398 626 244.50
## 399 628 142.70
## 400 630 362.10
## 401 631 189.90
## 402 639 392.00
## 403 640 298.70
## 404 643 290.00
## 405 644 382.60
## 406 646 331.40
## 407 648 254.10
## 408 650 104.30
## 409 651 177.30
## 410 654 232.00
## 411 657 294.45
## 412 658 449.75
## 413 663 325.95
## 414 664 320.70
## 415 666 421.10
## 416 668 464.50
## 417 669 104.70
## 418 670 253.40
## 419 671 553.80
## 420 672 464.00
## 421 673 100.00
## 422 675 229.10
## 423 676 396.70
## 424 678 162.80
## 425 679 380.50
## 426 682 420.55
## 427 684 142.00
## 428 686 476.10
## 429 688 698.90
## 430 689 266.10
## 431 691 241.50
## 432 693 520.40
## 433 694 254.50
## 434 696 396.50
## 435 697 552.75
## 436 698 420.80
## 437 699 196.50
## 438 700 415.20
## 439 701 274.60
## 440 702 349.60
## 441 703 721.40
## 442 707 621.90
## 443 710 287.00
## 444 711 312.20
## 445 715 164.20
## 446 716 201.30
## 447 718 298.80
## 448 719 147.60
## 449 720 347.40
## 450 724 700.00
## 451 726 305.10
## 452 728 171.00
## 453 729 437.60
## 454 730 114.80
## 455 731 185.10
## 456 735 115.10
## 457 736 441.30
## 458 737 353.00
## 459 740 484.00
## 460 742 184.70
## 461 744 132.85
## 462 745 174.70
## 463 746 563.20
## 464 747 428.10
## 465 749 515.30
## 466 750 316.50
## 467 751 110.80
## 468 752 392.45
## 469 753 164.30
## 470 754 102.80
## 471 756 382.80
## 472 757 547.60
## 473 758 403.40
## 474 759 142.60
## 475 764 320.30
## 476 767 392.50
## 477 768 382.90
## 478 769 263.30
## 479 776 212.30
## 480 777 556.70
## 481 779 366.30
## 482 780 341.30
## 483 785 282.20
## 484 786 290.95
## 485 787 1509.20
## 486 789 107.40
## 487 791 287.80
## 488 796 112.80
## 489 800 255.30
## 490 801 175.10
## 491 802 566.50
## 492 803 117.80
## 493 804 824.40
## 494 810 123.80
## 495 811 234.10
## 496 814 205.90
## 497 820 567.50
## 498 821 134.60
## 499 822 402.70
## 500 823 390.00
## 501 825 554.30
## 502 829 291.10
## 503 830 243.90
## 504 834 316.10
## 505 835 349.20
## 506 838 152.10
## 507 839 202.50
## 508 840 196.60
## 509 842 366.80
## 510 843 103.30
## 511 844 218.70
## 512 847 333.40
## 513 848 258.50
## 514 853 272.20
## 515 856 251.50
## 516 857 272.45
## 517 858 341.60
## 518 860 219.40
## 519 861 297.55
## 520 862 478.75
## 521 863 102.60
## 522 864 293.75
## 523 866 389.10
## 524 869 333.60
## 525 871 344.15
## 526 873 101.00
## 527 875 215.30
## 528 879 228.50
## 529 880 710.30
## 530 883 701.10
## 531 886 308.70
## 532 887 205.80
## 533 889 106.80
## 534 896 633.20
## 535 899 303.55
## 536 901 407.70
## 537 906 103.70
## 538 908 236.55
## 539 909 481.25
## 540 913 105.60
## 541 915 205.30
## 542 918 421.40
## 543 920 367.80
## 544 923 415.30
## 545 932 761.70
## 546 933 358.40
## 547 934 317.20
## 548 935 173.50
## 549 937 589.30
## 550 938 309.90
## 551 939 559.60
## 552 945 288.70
## 553 946 227.40
## 554 947 617.30
## 555 949 459.20
## 556 952 220.90
## 557 955 138.00
## 558 958 420.80
## 559 964 226.60
## 560 965 156.10
## 561 968 1045.10
## 562 969 257.80
## 563 974 375.80
## 564 979 229.70
## 565 983 851.90
## 566 984 546.40
## 567 985 574.40
## 568 986 747.00
## 569 987 186.40
## 570 990 360.20
## 571 991 201.50
## 572 993 451.95
## 573 996 255.20
## 574 998 182.60
## 575 1006 149.70
## 576 1009 368.80
## 577 1011 210.85
## 578 1015 435.40
## 579 1018 514.10
## 580 1019 260.30
## 581 1020 150.35
## 582 1024 122.00
## 583 1027 143.55
## 584 1029 285.00
## 585 1030 162.40
## 586 1031 572.20
## 587 1032 271.60
## 588 1034 107.40
## 589 1036 277.80
## 590 1039 114.00
## 591 1044 538.00
## 592 1045 173.30
## 593 1048 133.30
## 594 1051 321.20
## 595 1052 200.00
## 596 1053 195.00
## 597 1054 102.50
## 598 1055 157.10
## 599 1059 250.70
## 600 1060 236.50
## 601 1062 183.70
## 602 1063 366.10
## 603 1065 268.40
## 604 1067 161.90
## 605 1068 213.40
## 606 1070 501.00
## 607 1071 197.70
## 608 1074 275.10
## 609 1075 244.70
## 610 1080 210.70
## 611 1081 234.60
## 612 1084 583.20
## 613 1085 195.80
## 614 1086 317.70
## 615 1092 110.30
## 616 1093 517.60
## 617 1095 468.50
## 618 1096 225.10
## 619 1098 305.20
## 620 1099 727.70
## 621 1100 106.60
## 622 1102 1093.50
## 623 1104 155.50
## 624 1107 207.90
## 625 1112 171.40
## 626 1116 136.05
## 627 1119 338.30
## 628 1120 330.10
## 629 1122 223.40
## 630 1125 148.10
## 631 1128 253.40
## 632 1129 297.20
## 633 1130 166.40
## 634 1131 175.10
## 635 1132 155.20
## 636 1133 482.50
## 637 1135 384.50
## 638 1139 324.20
## 639 1143 470.10
## 640 1148 194.00
## 641 1151 477.80
## 642 1157 364.50
## 643 1159 745.00
## 644 1160 379.45
## 645 1164 102.40
## 646 1165 528.50
## 647 1166 833.20
## 648 1167 103.80
## 649 1168 173.60
## 650 1170 357.70
## 651 1171 466.30
## 652 1173 148.95
## 653 1174 178.90
## 654 1175 205.20
## 655 1176 181.60
## 656 1178 313.70
## 657 1182 176.30
## 658 1191 181.00
## 659 1193 104.70
## 660 1196 584.55
## 661 1197 138.60
## 662 1200 148.60
## 663 1201 253.30
## 664 1206 1141.00
## 665 1210 170.30
## 666 1211 564.80
## 667 1212 368.75
## 668 1213 228.50
## 669 1221 198.00
## 670 1223 342.60
## 671 1225 220.70
## 672 1226 108.90
## 673 1227 346.60
## 674 1228 599.70
## 675 1231 329.30
## 676 1233 162.10
## 677 1236 451.90
## 678 1237 258.70
## 679 1241 481.60
## 680 1246 228.45
## 681 1251 474.80
## 682 1254 433.80
## 683 1256 313.00
## 684 1257 292.20
## 685 1258 252.20
## 686 1261 203.40
## 687 1264 370.90
## 688 1266 382.30
## 689 1267 554.15
## 690 1268 619.70
## 691 1271 688.55
## 692 1273 302.90
## 693 1277 677.00
## 694 1279 391.80
## 695 1282 384.20
## 696 1283 247.70
## 697 1286 241.70
## 698 1287 368.65
## 699 1291 332.70
## 700 1297 262.40
## 701 1300 277.80
## 702 1301 340.20
## 703 1302 200.40
## 704 1303 422.50
## 705 1304 210.80
## 706 1306 519.60
## 707 1309 200.70
## 708 1311 159.70
## 709 1312 250.00
## 710 1314 257.50
## 711 1326 108.80
## 712 1327 408.70
## 713 1330 436.00
## 714 1341 200.50
## 715 1343 414.50
## 716 1347 408.10
## 717 1348 816.40
## 718 1353 155.90
## 719 1368 700.60
## 720 1371 245.20
## 721 1375 314.50
## 722 1376 587.90
## 723 1379 553.25
## 724 1380 236.60
## 725 1382 583.60
## 726 1384 562.80
## 727 1385 363.70
## 728 1386 344.20
## 729 1387 499.50
## 730 1389 151.90
## 731 1394 182.20
## 732 1395 236.40
## 733 1399 131.10
## 734 1407 700.00
## 735 1409 341.90
## 736 1422 609.30
## 737 1423 116.00
## 738 1424 194.65
## 739 1426 103.90
## 740 1429 241.35
## 741 1436 349.30
## 742 1446 269.40
## 743 1451 1196.60
## 744 1452 421.10
## 745 1459 636.40
## 746 1467 121.30
## 747 1469 326.20
## 748 1473 174.90
## 749 1484 468.40
## 750 1485 437.40
## 751 1487 186.20
## 752 1490 452.50
## 753 1494 178.65
## 754 1496 226.20
## 755 1502 315.40
## 756 1503 305.40
## 757 1504 194.90
## 758 1512 436.20
## 759 1513 369.20
## 760 1515 512.00
## 761 1516 261.90
## 762 1523 238.80
## 763 1524 343.80
## 764 1528 240.10
## 765 1531 339.40
## 766 1532 112.20
## 767 1533 763.80
## 768 1541 299.00
## 769 1542 247.40
## 770 1546 195.20
## 771 1549 513.60
## 772 1552 111.70
## 773 1556 217.30
## 774 1557 664.70
## 775 1559 890.50
## 776 1566 320.55
## 777 1571 303.75
## 778 1573 521.00
## 779 1589 474.50
## 780 1592 396.40
## 781 1593 435.50
## 782 1594 134.20
## 783 1595 192.10
## 784 1597 214.30
## 785 1604 354.20
## 786 1608 275.20
## 787 1609 604.70
## 788 1610 133.00
## 789 1611 558.80
## 790 1613 122.00
## 791 1616 402.00
## 792 1617 101.30
## 793 1619 451.20
## 794 1620 122.10
## 795 1621 710.70
## 796 1622 1109.20
## 797 1623 154.30
## 798 1624 239.10
## 799 1627 290.70
## 800 1629 874.30
## 801 1630 670.10
## 802 1634 537.90
## 803 1636 276.70
## 804 1639 246.60
## 805 1643 244.10
## 806 1647 744.40
## 807 1649 215.60
## 808 1652 213.10
## 809 1655 616.80
## 810 1659 200.50
## 811 1666 193.10
## 812 1668 438.30
## 813 1671 253.50
## 814 1674 552.90
## 815 1677 125.40
## 816 1682 137.20
## 817 1693 163.90
## 818 1702 118.50
## 819 1706 293.40
## 820 1715 190.80
## 821 1723 392.10
## 822 1727 519.70
## 823 1730 247.60
## 824 1731 241.10
## 825 1732 129.60
## 826 1736 467.40
## 827 1737 339.30
## 828 1741 145.80
## 829 1742 360.60
## 830 1744 156.20
## 831 1749 532.20
## 832 1753 419.90
## 833 1755 102.10
## 834 1757 120.40
## 835 1758 217.00
## 836 1763 770.30
## 837 1765 140.60
## 838 1772 349.50
## 839 1775 303.60
## 840 1782 370.60
## 841 1785 151.30
## 842 1786 503.70
## 843 1793 316.55
## 844 1797 102.50
## 845 1803 102.50
## 846 1805 200.20
## 847 1817 291.80
## 848 1823 261.30
## 849 1832 270.20
## 850 1833 489.80
## 851 1839 604.70
## 852 1841 614.10
## 853 1846 160.70
## 854 1848 361.30
## 855 1854 404.00
## 856 1858 131.20
## 857 1860 381.80
## 858 1863 121.20
## 859 1868 470.80
## 860 1875 191.50
## 861 1876 123.80
## 862 1882 637.20
## 863 1898 511.60
## 864 1900 497.30
## 865 1902 833.10
## 866 1906 193.70
## 867 1907 187.60
## 868 1912 226.00
## 869 1913 512.10
## 870 1931 250.30
## 871 1942 211.90
## 872 1944 808.00
## 873 1945 315.00
## 874 1950 298.80
## 875 1953 363.10
## 876 1954 196.50
## 877 1970 196.10
## 878 1971 339.90
## 879 1978 263.70
## 880 1980 114.60
## 881 1981 369.30
## 882 1986 270.30
## 883 1988 112.30
## 884 1990 561.30
## 885 1993 748.50
## 886 1998 244.00
## 887 2000 478.90
## 888 2005 525.80
## 889 2006 102.90
## 890 2011 215.90
## 891 2015 183.00
## 892 2018 771.70
## 893 2026 206.90
## 894 2028 180.80
## 895 2035 484.60
## 896 2041 264.80
## 897 2042 110.30
## 898 2043 366.10
## 899 2045 407.10
## 900 2052 370.30
## 901 2053 205.70
## 902 2056 525.30
## 903 2064 225.60
## 904 2067 254.10
## 905 2072 829.40
## 906 2078 358.10
## 907 2080 636.20
## 908 2083 286.70
## 909 2084 218.60
## 910 2085 933.80
## 911 2095 125.10
## 912 2106 765.80
## 913 2109 220.00
## 914 2110 106.50
## 915 2113 260.40
## 916 2114 222.40
## 917 2128 515.70
## 918 2129 296.00
## 919 2143 183.40
## 920 2147 338.80
## 921 2154 127.40
## 922 2157 121.40
## 923 2163 241.00
## 924 2175 152.50
## 925 2177 285.90
## 926 2183 274.30
## 927 2185 181.30
## 928 2191 618.00
## 929 2192 169.40
## 930 2193 924.40
## 931 2210 253.70
## 932 2221 1594.90
## 933 2224 307.60
## 934 2233 178.40
## 935 2242 314.00
## 936 2246 716.80
## 937 2258 419.50
## 938 2263 198.90
## 939 2270 806.60
## 940 2271 663.10
## 941 2272 303.00
## 942 2275 683.30
## 943 2276 301.10
## 944 2279 675.70
## 945 2280 354.90
## 946 2289 109.10
## 947 2291 211.10
## 948 2299 715.90
## 949 2302 149.70
## 950 2303 239.30
## 951 2304 237.20
## 952 2305 257.60
## 953 2310 1055.30
## 954 2311 123.00
## 955 2322 230.60
## 956 2324 532.90
## 957 2327 279.80
## 958 2342 691.30
## 959 2353 113.40
## 960 2357 404.00
## 961 2364 170.80
## 962 2372 826.70
## 963 2374 283.80
## 964 2389 727.30
## 965 2390 335.90
## 966 2393 120.50
## 967 2394 236.40
## 968 2397 226.00
## 969 2401 138.10
## 970 2413 194.80
## 971 2418 213.90
## 972 2421 405.30
## 973 2468 137.90
## 974 2481 436.10
## 975 2483 223.60
## 976 2505 403.50
## 977 2507 355.90
## 978 2512 398.00
## 979 2514 292.20
## 980 2520 713.70
## 981 2523 156.00
## 982 2533 423.50
## 983 2534 158.90
## 984 2540 151.90
## 985 2548 217.00
## 986 2552 181.15
## 987 2558 396.80
## 988 2569 208.80
## 989 2571 820.70
## 990 2572 237.50
## 991 2579 273.40
## 992 2585 508.30
## 993 2589 286.00
## 994 2649 116.00
## 995 2655 652.10
## 996 2656 624.40
## 997 2665 774.70
## 998 2678 227.80
## 999 2680 623.90
## 1000 2694 660.90
## 1001 2707 390.30
## 1002 2714 391.20
## 1003 2727 327.90
## 1004 2735 400.50
## 1005 2736 770.90
## 1006 2759 168.60
## 1007 2762 717.20
## 1008 2792 331.20
## 1009 2794 159.80
## 1010 2805 361.20
## 1011 2816 350.40
## 1012 2828 232.40
## 1013 2830 304.00
## 1014 2834 301.70
## 1015 2843 279.70
## 1016 2851 527.50
## 1017 2854 348.50
## 1018 2860 429.90
## 1019 2864 704.80
## 1020 2867 246.80
## 1021 2872 175.50
## 1022 2880 175.00
## 1023 2882 450.80
## 1024 2890 111.60
## 1025 2902 838.10
## 1026 2916 138.70
## 1027 2930 287.00
## 1028 2947 816.00
## 1029 2948 361.30
## 1030 2950 281.75
## 1031 2963 369.90
## 1032 2979 353.80
## 1033 2988 291.00
## 1034 3012 523.90
## 1035 3014 328.20
## 1036 3026 690.70
## 1037 3034 101.30
## 1038 3037 370.90
## 1039 3045 529.30
## 1040 3046 1595.20
## 1041 3050 274.80
## 1042 3051 554.40
## 1043 3060 318.30
## 1044 3065 140.60
## 1045 3072 449.00
## 1046 3079 596.90
## 1047 3110 358.30
## 1048 3135 451.30
## 1049 3141 262.40
## 1050 3177 158.40
## 1051 3179 399.00
## 1052 3184 294.70
## 1053 3185 383.00
## 1054 3193 250.30
## 1055 3197 738.60
## 1056 3220 361.70
## 1057 3239 158.30
## 1058 3242 513.00
## 1059 3255 1009.90
## 1060 3263 421.60
## 1061 3295 382.25
## 1062 3309 168.70
## 1063 3311 575.80
## 1064 3331 573.70
## 1065 3338 263.10
## 1066 3360 314.10
## 1067 3366 233.30
## 1068 3391 794.80
## 1069 3400 104.60
## 1070 3416 187.70
## 1071 3423 739.50
## 1072 3425 101.50
## 1073 3451 184.30
## 1074 3456 267.00
## 1075 3482 666.30
## 1076 3483 221.00
## 1077 3485 158.00
## 1078 3537 618.70
## 1079 3579 577.10
## 1080 3582 389.90
## 1081 3597 432.60
## 1082 3609 129.50
## 1083 3622 236.50
## 1084 3636 205.10
## 1085 3652 238.30
## 1086 3653 479.50
## 1087 3662 334.70
## 1088 3667 386.70
## 1089 3702 358.60
## 1090 3718 193.40
## 1091 3721 325.20
## 1092 3722 668.80
## 1093 3734 487.10
## 1094 3742 476.50
## 1095 3746 906.40
## 1096 3751 709.90
## 1097 3769 361.00
## 1098 3787 451.70
## 1099 3794 547.80
## 1100 3796 382.40
## 1101 3797 1484.90
## 1102 3807 512.70
## 1103 3832 210.30
## 1104 3854 669.00
## 1105 3859 118.60
## 1106 3879 1171.20
## 1107 3919 265.70
## 1108 3924 564.90
## 1109 3925 132.10
## 1110 3932 764.60
## 1111 3938 855.00
## 1112 3950 350.80
## 1113 3968 498.10
## 1114 3986 282.20
## 1115 3992 315.40
## 1116 4007 752.70
## 1117 4018 666.60
## 1118 4032 437.50
## 1119 4045 280.90
## 1120 4090 565.50
## 1121 4100 851.40
## 1122 4114 900.50
## 1123 4151 278.10
## 1124 4155 525.80
## 1125 4157 1424.30
## 1126 4170 922.40
## 1127 4185 455.40
## 1128 4211 352.70
## 1129 4236 471.00
## 1130 4244 260.30
## 1131 4287 125.10
## 1132 4323 232.60
## 1133 4332 615.30
## 1134 4352 580.70
## 1135 4413 724.10
## 1136 4447 782.50
## 1137 4467 600.70
## 1138 4474 644.55
## 1139 4476 412.70
## 1140 4488 527.30
## 1141 4491 388.00
## 1142 4493 636.30
## 1143 4509 102.50
## 1144 4522 902.60
## 1145 4554 162.20
## 1146 4600 255.90
## 1147 4623 264.90
## 1148 4647 188.70
## 1149 4729 728.00
## 1150 4748 671.90
## 1151 4782 451.50
## 1152 4790 529.90
## 1153 4800 416.70
## 1154 4807 364.60
## 1155 4820 728.90
## 1156 4857 235.40
## 1157 4907 674.90
## 1158 4935 169.50
## 1159 4949 662.00
## 1160 4967 454.50
## 1161 4993 701.10
## 1162 4995 420.40
## 1163 5017 102.50
## 1164 5019 312.90
## 1165 5027 472.10
## 1166 5077 422.40
## 1167 5102 466.15
## 1168 5157 469.30
## 1169 5190 854.60
## 1170 5198 158.70
## 1171 5258 721.60
## 1172 5294 679.70
## 1173 5318 528.70
## 1174 5364 394.50
## 1175 5425 238.00
## 1176 5427 317.80
## 1177 5453 407.80
## 1178 5454 201.40
## 1179 5469 446.50
## 1180 5610 800.30
## 1181 5623 456.90
## 1182 5663 507.80
## 1183 5689 628.60
## 1184 5782 255.90
## 1185 5838 664.50
## 1186 5868 746.70
## 1187 5938 298.30
## 1188 5990 616.60
## 1189 6003 648.40
## 1190 6080 342.00
## 1191 6110 217.60
## 1192 6137 227.90
## 1193 6163 205.70
## 1194 6164 509.90
## 1195 6178 117.60
## 1196 6203 532.40
## 1197 6223 762.30
## 1198 6282 209.40
## 1199 6299 811.30
## 1200 6364 785.10
## 1201 6521 732.40
## 1202 6589 454.50
## 1203 6601 467.20
## 1204 6606 435.80
## 1205 6723 721.00
## 1206 6741 749.50
## 1207 6747 609.70
## 1208 6775 585.10
## 1209 6783 628.10
## 1210 6804 252.00
## 1211 6812 720.10
## 1212 6843 305.90
## 1213 6942 752.00
## 1214 6992 607.30
## 1215 6998 142.70
## 1216 7048 451.40
## 1217 7051 864.00
## 1218 7115 348.80
## 1219 7208 855.00
## 1220 7222 866.60
## 1221 7234 559.20
## 1222 7377 375.50
## 1223 7442 1001.60
## 1224 7449 771.90
## 1225 7496 206.20
## 1226 7499 573.50
## 1227 7524 825.20
## 1228 7547 392.40
## 1229 7557 466.20
## 1230 7634 188.90
## 1231 7655 638.40
## 1232 7685 776.60
## 1233 7742 857.00
## 1234 7769 610.20
## 1235 7790 344.30
## 1236 7961 808.60
## 1237 7972 670.20
## 1238 7994 727.10
## 1239 8019 752.70
## 1240 8122 691.80
## 1241 8218 711.00
## 1242 8257 298.00
## 1243 8314 551.20
## 1244 8330 308.50
## 1245 8352 792.70
## 1246 8379 367.20
## 1247 8418 798.50
## 1248 8469 650.50
## 1249 8600 657.70
## 1250 8635 767.50
## 1251 8741 656.80
## 1252 9153 512.80
## 1253 9171 757.30
## 1254 9416 470.50
## 1255 9692 670.70
## 1256 9733 456.30
## 1257 9824 428.40
## 1258 9893 571.50
## 1259 9984 442.30
## 1260 9985 939.00
## 1261 10555 624.40
## 1262 10557 619.60
## 1263 11231 456.70
## 1264 11232 874.60
## 1265 11259 724.50
## 1266 11298 625.20
## 1267 11315 636.30
## 1268 11420 360.20
## 1269 11505 724.60
## 1270 11624 617.50
## 1271 12439 724.40
## 1272 12544 533.10
## 1273 12702 687.70
## 1274 13267 663.00
## 1275 13274 840.40
## 1276 13291 909.00
## 1277 13351 838.10
## 1278 13859 698.00
## 1279 14028 437.60
## 1280 14214 941.40
## 1281 14304 606.10
## 1282 14466 474.90
## 1283 14611 372.50
## 1284 14922 1107.80
## 1285 15213 439.70
## 1286 15358 724.20
## 1287 15720 437.70
## 1288 15743 547.10
## 1289 15798 833.20
## 1290 16110 541.40
## 1291 16364 671.70
## 1292 16517 905.70
## 1293 16777 325.10
## 1294 17038 857.60
## 1295 17093 1336.10
## 1296 17502 739.20
## 1297 17826 767.80
## 1298 18216 554.80
## 1299 18246 642.10
## 1300 18955 529.30
## 1301 19094 1053.00
## 1302 19169 730.50
## 1303 19403 943.20
## 1304 19446 586.80
## 1305 19489 633.20
## 1306 19654 733.50
## 1307 19999 809.40
## 1308 20220 1453.70
## 1309 21092 439.00
## 1310 21487 290.00
## 1311 22250 1440.60
## 1312 22421 559.70
## 1313 22519 783.20
## 1314 22700 663.50
## 1315 22740 695.10
## 1316 23021 739.40
## 1317 23932 1151.30
## 1318 24520 993.50
## 1319 24863 565.70
## 1320 24962 632.50
## 1321 25262 793.10
## 1322 26061 727.80
## 1323 26511 1268.50
## 1324 27149 834.90
## 1325 27399 1133.70
## 1326 27655 894.10
## 1327 28238 822.00
## 1328 28572 822.50
## 1329 28647 1164.70
## 1330 29324 614.30
## 1331 29711 727.80
## 1332 29880 983.60
## 1333 31154 577.60
## 1334 31207 654.30
## 1335 31906 1199.40
## 1336 32469 605.90
## 1337 34110 781.00
## 1338 34618 1109.40
## 1339 34744 1433.00
## 1340 34900 868.90
## 1341 35107 646.50
## 1342 37094 488.60
## 1343 37648 795.70
## 1344 38407 1178.10
## 1345 38567 921.20
## 1346 39257 666.10
## 1347 40256 854.40
## 1348 40537 1418.70
## 1349 42854 1534.40
## 1350 45499 908.50
## 1351 46008 1403.80
## 1352 46592 1339.00
## 1353 48078 810.00
## 1354 48537 955.20
## 1355 50106 972.90
## 1356 51170 1156.90
## 1357 51529 1336.60
## 1358 52144 857.70
## 1359 52452 1415.90
## 1360 53000 786.30
## 1361 54633 845.10
## 1362 54876 965.90
## 1363 57043 767.30
## 1364 60734 1442.00
## 1365 61512 767.40
## 1366 61636 869.40
## 1367 63350 771.20
## 1368 63533 655.10
## 1369 64527 978.30
## 1370 66402 783.60
## 1371 68552 798.50
## 1372 69063 1149.10
## 1373 69232 1396.60
## 1374 70424 1446.30
## 1375 70765 837.30
## 1376 71903 1050.10
## 1377 71976 1589.10
## 1378 80163 1080.80
## 1379 82307 1557.50
## 1380 82749 683.00
## 1381 95963 1133.30
## 1382 98775 757.50
## 1383 105090 911.80
## 1384 106839 877.80
## 1385 119432 1113.40
## 1386 122420 1033.40
## 1387 131477 1083.60
## 1388 140089 1186.80
## 1389 144519 922.60
## 1390 148929 860.70
## 1391 160178 1324.30
## 1392 161284 981.70
## 1393 209170 1044.30
## 1394 264607 957.90p2=ggscatter(idhSM,
x = "percapitaf", y = "FP",
cor.coef = TRUE,
cor.method = "pearson")
p2
En todos los casos aparece el coeficiente de Pearson, si el p-valor es significativo, se acepta que haya correlación. La correlación puede ser directa o inversa (si es negativa). La correlación aumenta si se acerca hacia 1 o -1, y se desvanece si se acerca a cero.
all_ps=ggarrange(p1,p2,
ncol = 2, nrow = 2)
# paso 2
annotate_figure(all_ps,
top = text_grob("Correlacion con percapitaf",
color = "blue",
face = "bold",
size = 14))
Hemos pedido a Pearson, pero tenemos a Spearman si las variables no se distribuyeran normalmente:
library(dlookr)## Loading required package: mice## Loading required package: lattice##
## Attaching package: 'mice'## The following objects are masked from 'package:base':
##
## cbind, rbind## Registered S3 method overwritten by 'xts':
## method from
## as.zoo.xts zoo## Registered S3 method overwritten by 'quantmod':
## method from
## as.zoo.data.frame zoo## Registered S3 methods overwritten by 'car':
## method from
## influence.merMod lme4
## cooks.distance.influence.merMod lme4
## dfbeta.influence.merMod lme4
## dfbetas.influence.merMod lme4## Warning in fun(libname, pkgname): couldn't connect to display ":0"##
## Attaching package: 'dlookr'## The following object is masked from 'package:base':
##
## transformnormality(idhSM[,c(10,11,12)])## Warning: `cols` is now required.
## Please use `cols = c(statistic)`## # A tibble: 3 x 4
## vars statistic p_value sample
## <chr> <dbl> <dbl> <dbl>
## 1 percapitaf 0.859 9.51e-38 1834
## 2 PPK 0.266 7.53e-65 1834
## 3 FP 0.251 3.20e-65 1834Si la probabilidad es menor a 0.05 (p valor), se rechaza la normalidad. De ahi que lo recomendable es mostrar al correlación de Spearman, por ejemplo:
s4=ggscatter(idhSM,
x = "percapitaf", y = "PPK",
cor.coef = TRUE,
cor.method = "spearman")
s4
hay relación entre ingresos con el partido de ppk
library(ggpubr)
s5=ggscatter(idhSM,
x = "percapitaf", y = "FP",
cor.coef = TRUE,
cor.method = "spearman")
s5
library(ggpubr)
g1=ggscatter(idhSM,
x = "accesoedu", y = "PPK",
cor.coef = TRUE,
cor.method = "pearson")
g1
library(ggpubr)
g2=ggscatter(idhSM,
x = "accesoedu", y = "FP",
cor.coef = TRUE,
cor.method = "pearson")
g2
# paso 1:
all_ps=ggarrange(g1,g2,
ncol = 2, nrow = 2)
# paso 2
annotate_figure(all_ps,
top = text_grob("Correlacion con accesoedu",
color = "blue",
face = "bold",
size = 14))
library(dlookr)
normality(idhSM[,c(9,11,12)])## Warning: `cols` is now required.
## Please use `cols = c(statistic)`## # A tibble: 3 x 4
## vars statistic p_value sample
## <chr> <dbl> <dbl> <dbl>
## 1 accesoedu 0.970 4.31e-19 1834
## 2 PPK 0.266 7.53e-65 1834
## 3 FP 0.251 3.20e-65 1834library(ggpubr)
n1=ggscatter(idhSM,
x = "esperanza", y = "FP",
cor.coef = TRUE,
cor.method = "pearson")
n1
library(ggpubr)
n2=ggscatter(idhSM,
x = "esperanza", y = "PPK",
cor.coef = TRUE,
cor.method = "pearson")
n2
# paso 1:
all_ps=ggarrange(n1,n2,
ncol = 2, nrow = 2)
# paso 2
annotate_figure(all_ps,
top = text_grob("Correlacion con esperanza",
color = "blue",
face = "bold",
size = 14))
library(dlookr)
normality(idhSM[,c(10,11,12)])## Warning: `cols` is now required.
## Please use `cols = c(statistic)`## # A tibble: 3 x 4
## vars statistic p_value sample
## <chr> <dbl> <dbl> <dbl>
## 1 percapitaf 0.859 9.51e-38 1834
## 2 PPK 0.266 7.53e-65 1834
## 3 FP 0.251 3.20e-65 1834paviModelo=lm(percapitaf~.,data=idhSM)
summary(idhSM)## ubiReg ubiProv ubiDis depa
## 150000 : 171 150100 : 43 10101 : 1 LIMA : 171
## 20000 : 166 120400 : 34 10102 : 1 ANCASH : 166
## 60000 : 127 151000 : 33 10103 : 1 CAJAMARCA: 127
## 120000 : 123 150700 : 32 10104 : 1 JUNIN : 123
## 50000 : 111 40100 : 29 10105 : 1 AYACUCHO : 111
## 40000 : 109 120100 : 28 10106 : 1 AREQUIPA : 109
## (Other):1027 (Other):1635 (Other):1828 (Other) :1027
## prov dist pobla esperanza
## LIMA : 43 SANTA ROSA : 10 Min. : 181 Min. :51.72
## JAUJA : 34 SAN ANTONIO : 5 1st Qu.: 1915 1st Qu.:70.02
## YAUYOS : 33 SANTA CRUZ : 5 Median : 4564 Median :73.39
## HUAROCHIRI: 32 BELLAVISTA : 4 Mean : 16432 Mean :72.67
## AREQUIPA : 29 INDEPENDENCIA: 4 3rd Qu.: 11485 3rd Qu.:76.45
## HUANCAYO : 28 MIRAFLORES : 4 Max. :1025929 Max. :83.52
## (Other) :1635 (Other) :1802
## accesoedu percapitaf PPK FP
## Min. : 2.030 Min. : 100.0 Min. : 0.0 Min. : 0.0
## 1st Qu.: 5.240 1st Qu.: 201.7 1st Qu.: 378.2 1st Qu.: 413.2
## Median : 6.500 Median : 317.8 Median : 945.5 Median : 929.5
## Mean : 6.825 Mean : 392.4 Mean : 4562.7 Mean : 4529.7
## 3rd Qu.: 8.178 3rd Qu.: 511.9 3rd Qu.: 2279.8 3rd Qu.: 2443.5
## Max. :14.250 Max. :1596.1 Max. :264607.0 Max. :318615.0
##