Cargar las librerías:

Cargamos los datos

Set de Datos que contiene la distribución conjunta de la edad (Age) y el ingreso promedio por hora (AHE) para trabajadores de tiempo completo de entre 25 y 34 años en 2012, con un nivel educativo superior al de educación media superior.

Completa los siguientes ejercicios

  1. Calcula la distribución marginal de la edad (Age).
  1. Calcula la media de AHE para cada valor de la edad; es decir, calcula \(E(AHE∣Age=25)\), y así sucesivamente.
  1. Calcula y grafica la media de AHE en función de la edad (Age). ¿Existe una relación entre el ingreso promedio por hora y la edad? Explica.

  1. Utiliza la ley de la esperanza iterada para calcular la media de AHE; es decir, calcula \(E(AHE)\).

\[ E(AHE)=\sum_{age}​E(AHE∣Age)⋅P(Age) \]

[1] 21.51058
  1. Calcula la varianza de AHE. \[var(Y)= E[(Y-E(Y))^2]\]
[1] 164.8203
  1. Calcula la covarianza entre AHE y la edad (Age).

\[Cov(AHE,Age)=E(AHE⋅Age)−E(AHE)E(Age)\]

[1] 5.717183
  1. Calcula la correlación entre AHE y la edad (Age).

\[Corr(AHE,Age)=\frac{Cov(AHE,Age)}{Var(AHE)Var(Age)}\]

[1] 0.1560412
  1. Relaciona tus respuestas de los incisos (f) y (g) con la gráfica que construiste en el inciso (c).

Aqui escribe lo que observaste

Dado las respuestas de los incisos(f) y (g) se puede llegar a distintas conclusiones con respecto a la gráfica realizada en un inicio. En el inciso f se llega a una covarianza positiva de 5.717 entre las variables de ingreso promedio por hora y edad, lo que se traduce a que entre más edad tenga una persona, mayor ingreso promedio por hora tiene. Esto se ve relacionado en la primera gráfica al la gráfica tener una tendencia positiva de crecimiento, en donde a mayor edad hay mayor ingreso promedio.

Por otro lado, el inciso g es el que da respuesta a la correlación entre las variables mencionadas anteriormente. Es entonces que en concordancia con el inciso f, el inciso g muestra una correlación positiva en donde si uno aumenta el otro aumentará, sin embargo una correlación de 0.156 se podría considerar hasta cierto punto débil o baja, por lo cual el aumento en una no significa, por lo que el aumento en una variable no implica necesariamente un incremento significativo en la otra. Esto se ve en la gráfica en los distintos segmentos que en ocasiones tienen caídas en sus inclinaciones con respecto a los anteriores segmentos.

LS0tDQp0aXRsZTogIkVqZXJjaWNpbyBSZXBhc28gUHJvYmFiaWxpZGFkLSBBaXJhbSINCm91dHB1dDogaHRtbF9ub3RlYm9vaw0KLS0tDQoNCmBgYHtyIGVjaG89RkFMU0V9DQprbml0cjo6b3B0c19jaHVuayRzZXQoZWNobyA9IEZBTFNFKQ0KYGBgDQoNCkNhcmdhciBsYXMgbGlicmVyw61hczoNCg0KYGBge3J9DQojaW5zdGFsbC5wYWNrYWdlcygiZ2dwbG90MiIpDQpsaWJyYXJ5KGRwbHlyKQ0KbGlicmFyeSh0aWR5cikNCmxpYnJhcnkoZ2dwbG90MikNCmBgYA0KDQojIENhcmdhbW9zIGxvcyBkYXRvcw0KDQpTZXQgZGUgRGF0b3MgcXVlIGNvbnRpZW5lIGxhIGRpc3RyaWJ1Y2nDs24gY29uanVudGEgZGUgbGEgZWRhZCAoQWdlKSB5IGVsIGluZ3Jlc28gcHJvbWVkaW8gcG9yIGhvcmEgKEFIRSkgcGFyYSB0cmFiYWphZG9yZXMgZGUgdGllbXBvIGNvbXBsZXRvIGRlIGVudHJlIDI1IHkgMzQgYcOxb3MgZW4gMjAxMiwgY29uIHVuIG5pdmVsIGVkdWNhdGl2byBzdXBlcmlvciBhbCBkZSBlZHVjYWNpw7NuIG1lZGlhIHN1cGVyaW9yLg0KDQoNCmBgYHtyfQ0KZGF0b3NfbWF0cml6IDwtIHJlYWQuY3N2KCJBZ2VfSG91cmx5RWFybmluZ3MuY3N2IiwgaGVhZGVyID0gVFJVRSkNCg0KZGF0YSA8LSBwaXZvdF9sb25nZXIoZGF0b3NfbWF0cml6LCBjb2xzID0gc3RhcnRzX3dpdGgoIkFnZSIpLCBuYW1lc190byA9ICJBZ2UiLCB2YWx1ZXNfdG8gPSAicHJvIikNCg0KZGF0YSRBZ2UgPC0gYXMubnVtZXJpYyhnc3ViKCJBZ2VfIiwgIiIsIGRhdGEkQWdlKSkNCg0KZGF0YQ0KDQpgYGANCg0KDQojIENvbXBsZXRhIGxvcyBzaWd1aWVudGVzIGVqZXJjaWNpb3MNCg0KYS4gQ2FsY3VsYSBsYSBkaXN0cmlidWNpw7NuIG1hcmdpbmFsIGRlIGxhIGVkYWQgKEFnZSkuDQpgYGB7cn0NCm1hcmdpbmFsIDwtIGRhdGEgJT4lDQogIGdyb3VwX2J5KEFnZSkgJT4lDQogIHN1bW1hcmlzZShQX0FnZSA9IHN1bShwcm8pKQ0KDQptYXJnaW5hbA0KDQpgYGANCg0KYi4gQ2FsY3VsYSBsYSBtZWRpYSBkZSBBSEUgcGFyYSBjYWRhIHZhbG9yIGRlIGxhIGVkYWQ7IGVzIGRlY2lyLCBjYWxjdWxhIA0KJEUoQUhF4oijQWdlPTI1KSQsIHkgYXPDrSBzdWNlc2l2YW1lbnRlLg0KDQpgYGB7cn0NCnByb21FPC1kYXRhICU+JSANCiAgZ3JvdXBfYnkoQWdlKSAlPiUgDQogIHN1bW1hcmlzZShFQSA9IHN1bShBSEUgKiBwcm8pIC8gc3VtKHBybykpDQoNCnByb21FDQoNCmBgYA0KDQoNCmMuIENhbGN1bGEgeSBncmFmaWNhIGxhIG1lZGlhIGRlIEFIRSBlbiBmdW5jacOzbiBkZSBsYSBlZGFkIChBZ2UpLiDCv0V4aXN0ZSB1bmEgcmVsYWNpw7NuIGVudHJlIGVsIGluZ3Jlc28gcHJvbWVkaW8gcG9yIGhvcmEgeSBsYSBlZGFkPyBFeHBsaWNhLg0KDQpgYGB7cn0NCg0KZ2dwbG90KHByb21FLCBhZXMoeCA9IEFnZSwgeSA9IEVBICkpICsNCiAgZ2VvbV9saW5lKCkgKw0KICBnZW9tX3BvaW50KCkgKw0KICBsYWJzKHRpdGxlID0gIk1lZGlhIEFIRSBwb3IgZWRhZCIsDQogICAgICAgeCA9ICJFZGFkIiwNCiAgICAgICB5ID0gIkUoQUhFIHwgRWRhZCkiKSArDQogIHRoZW1lX21pbmltYWwoKQ0KDQpgYGANCg0KDQpkLiBVdGlsaXphIGxhIGxleSBkZSBsYSBlc3BlcmFuemEgaXRlcmFkYSBwYXJhIGNhbGN1bGFyIGxhIG1lZGlhIGRlIEFIRTsgZXMgZGVjaXIsIGNhbGN1bGENCiRFKEFIRSkkLg0KDQokJCBFKEFIRSk9XHN1bV97YWdlfeKAi0UoQUhF4oijQWdlKeKLhVAoQWdlKSAkJA0KDQoNCmBgYHtyfQ0KDQpFQUg8LSBzdW0ocHJvbUUkRUEgKiBtYXJnaW5hbCRQX0FnZSkNCg0KRUFIDQpgYGANCg0KDQplLiBDYWxjdWxhIGxhIHZhcmlhbnphIGRlIEFIRS4NCiQkdmFyKFkpPSBFWyhZLUUoWSkpXjJdJCQNCg0KYGBge3J9DQp5IDwtIHN1bSgoZGF0YSRBSEVeMikgKiBkYXRhJHBybykNCg0KdmFyZSA8LSB5IC0gKEVBSF4yKQ0KDQp2YXJlDQpgYGANCg0KDQpmLiBDYWxjdWxhIGxhIGNvdmFyaWFuemEgZW50cmUgQUhFIHkgbGEgZWRhZCAoQWdlKS4NCg0KJCRDb3YoQUhFLEFnZSk9RShBSEXii4VBZ2Up4oiSRShBSEUpRShBZ2UpJCQNCg0KYGBge3J9DQpFQUhFIDwtIHN1bShkYXRhJEFIRSAqIGRhdGEkQWdlICogZGF0YSRwcm8pDQoNCkVBIDwtIHN1bShkYXRhJEFnZSAqIGRhdGEkcHJvKQ0KDQpDb3ZBIDwtIEVBSEUgLSAoRUFIICogRUEpDQoNCkNvdkENCg0KYGBgDQoNCmcuIENhbGN1bGEgbGEgY29ycmVsYWNpw7NuIGVudHJlIEFIRSB5IGxhIGVkYWQgKEFnZSkuDQoNCiQkQ29ycihBSEUsQWdlKT1cZnJhY3tDb3YoQUhFLEFnZSl9e1ZhcihBSEUpVmFyKEFnZSl9JCQNCg0KYGBge3J9DQpFQTIgPC0gc3VtKChkYXRhJEFnZV4yKSAqIGRhdGEkcHJvKQ0KDQpWYXJBIDwtIEVBMiAtIChFQV4yKQ0KDQpDb3JyIDwtIENvdkEgLyAoc3FydCh2YXJlKSAqIHNxcnQoVmFyQSkpDQoNCkNvcnINCg0KYGBgDQoNCmguIFJlbGFjaW9uYSB0dXMgcmVzcHVlc3RhcyBkZSBsb3MgaW5jaXNvcyAoZikgeSAoZykgY29uIGxhIGdyw6FmaWNhIHF1ZSBjb25zdHJ1aXN0ZSBlbiBlbCBpbmNpc28gKGMpLg0KDQoqQXF1aSBlc2NyaWJlIGxvIHF1ZSBvYnNlcnZhc3RlKg0KDQpEYWRvIGxhcyByZXNwdWVzdGFzIGRlIGxvcyBpbmNpc29zKGYpIHkgKGcpIHNlIHB1ZWRlIGxsZWdhciBhIGRpc3RpbnRhcyBjb25jbHVzaW9uZXMgY29uIHJlc3BlY3RvIGEgbGEgZ3LDoWZpY2EgcmVhbGl6YWRhIGVuIHVuIGluaWNpby4gRW4gZWwgaW5jaXNvIGYgc2UgbGxlZ2EgYSB1bmEgY292YXJpYW56YSBwb3NpdGl2YSBkZSA1LjcxNyBlbnRyZSBsYXMgdmFyaWFibGVzIGRlIGluZ3Jlc28gcHJvbWVkaW8gcG9yIGhvcmEgeSBlZGFkLCBsbyBxdWUgc2UgdHJhZHVjZSBhIHF1ZSBlbnRyZSBtw6FzIGVkYWQgdGVuZ2EgdW5hIHBlcnNvbmEsIG1heW9yIGluZ3Jlc28gcHJvbWVkaW8gcG9yIGhvcmEgdGllbmUuIEVzdG8gc2UgdmUgcmVsYWNpb25hZG8gZW4gbGEgcHJpbWVyYSBncsOhZmljYSBhbCBsYSBncsOhZmljYSB0ZW5lciB1bmEgdGVuZGVuY2lhIHBvc2l0aXZhIGRlIGNyZWNpbWllbnRvLCBlbiBkb25kZSBhIG1heW9yIGVkYWQgaGF5IG1heW9yIGluZ3Jlc28gcHJvbWVkaW8uDQoNClBvciBvdHJvIGxhZG8sIGVsIGluY2lzbyBnIGVzIGVsIHF1ZSBkYSByZXNwdWVzdGEgYSBsYSBjb3JyZWxhY2nDs24gZW50cmUgbGFzIHZhcmlhYmxlcyBtZW5jaW9uYWRhcyBhbnRlcmlvcm1lbnRlLiBFcyBlbnRvbmNlcyBxdWUgZW4gY29uY29yZGFuY2lhIGNvbiBlbCBpbmNpc28gZiwgZWwgaW5jaXNvIGcgbXVlc3RyYSB1bmEgY29ycmVsYWNpw7NuIHBvc2l0aXZhIGVuIGRvbmRlIHNpIHVubyBhdW1lbnRhIGVsIG90cm8gYXVtZW50YXLDoSwgc2luIGVtYmFyZ28gdW5hIGNvcnJlbGFjacOzbiBkZSAwLjE1NiBzZSBwb2Ryw61hIGNvbnNpZGVyYXIgaGFzdGEgY2llcnRvIHB1bnRvIGTDqWJpbCBvIGJhamEsIHBvciBsbyBjdWFsIGVsIGF1bWVudG8gZW4gdW5hIG5vIHNpZ25pZmljYSwgcG9yIGxvIHF1ZSBlbCBhdW1lbnRvIGVuIHVuYSB2YXJpYWJsZSBubyBpbXBsaWNhIG5lY2VzYXJpYW1lbnRlIHVuIGluY3JlbWVudG8gc2lnbmlmaWNhdGl2byBlbiBsYSBvdHJhLiBFc3RvIHNlIHZlIGVuIGxhIGdyw6FmaWNhIGVuIGxvcyBkaXN0aW50b3Mgc2VnbWVudG9zIHF1ZSBlbiBvY2FzaW9uZXMgdGllbmVuIGNhw61kYXMgZW4gc3VzIGluY2xpbmFjaW9uZXMgY29uIHJlc3BlY3RvIGEgbG9zIGFudGVyaW9yZXMgc2VnbWVudG9zLg0KDQoNCg0KDQoNCg==