#install packages
install.packages("openintro")
install.packages("tidyverse")
#call libraries
library(openintro)
library(tidyverse)
The Data
GPA_IQ dataset details
?gpa_iq
What is the relationship between GPA and IQ?
#CREATE a visualization to compare gpa and iq. DESCRIBE what you see
What is the relationship between GPA and Study Hours?
#CREATE a visualization to compare gpa and iq. DESCRIBE what you see
Based on the visualizations above, which variable influences GPA to
a greater degree: IQ or Study Hours? Explain.
Mutating the dataset.
#So that gpa and IQ can be compared on similar scales, mutate the dataset gpa_iq so that the gpa is out of 100 points rather than 10. Call the new data set GPA100 and the new variable you create gpa_100)
Subsetting the data.
hint: subset function newdata <- subset(data, variable == ” “)
# using subset function
female <- subset(gpa, gender == "female")
# using subset function to create a male dataset with gpa data
Gender analysis
Now that you have a gpa dataset for females and one for males, write
a question to compare the 2 genders, then create visualizations and
describe what you see. Be sure that you visualization and analysis
answer the question that you posed.
YOUR Question HERE
LS0tCnRpdGxlOiAiTGFiIDEgUXVpeiBHUEEgQW5hbHlzaXMiCmF1dGhvcjogIkZpcnN0IGFuZCBMYXN0IE5hbWUiCm91dHB1dDogaHRtbF9ub3RlYm9vawotLS0KCmBgYHtyfQojaW5zdGFsbCBwYWNrYWdlcwppbnN0YWxsLnBhY2thZ2VzKCJvcGVuaW50cm8iKQppbnN0YWxsLnBhY2thZ2VzKCJ0aWR5dmVyc2UiKQpgYGAKCmBgYHtyfQojY2FsbCBsaWJyYXJpZXMKbGlicmFyeShvcGVuaW50cm8pCmxpYnJhcnkodGlkeXZlcnNlKQpgYGAKCiMjIyMgVGhlIERhdGEKCiMjIyMjIEdQQSBkYXRhc2V0IGRldGFpbHMKCmBgYHtyfQojZGF0YSBzZXQgZ3BhIGluZm8uIFN1bW1hcml6ZSB0aGUgZGltZW5zaW9ucyBhbmQgY29udGVudHMgb2YgdGhlIGRhdGEgc2V0Cj9ncGEKYGBgCgojIyMjIyBHUEFfSVEgZGF0YXNldCBkZXRhaWxzCgpgYGB7cn0KI2RhdGEgc2V0IGdwYV9pcSBpbmZvLiBTdW1tYXJpemUgdGhlIGRpbWVuc2lvbnMgYW5kIGNvbnRlbnRzIG9mIHRoZSBkYXRhIHNldAo/Z3BhX2lxCmBgYAoKIyMjIyBXaGF0IGlzIHRoZSByZWxhdGlvbnNoaXAgYmV0d2VlbiBHUEEgYW5kIElRPwoKYGBge3J9CiNDUkVBVEUgYSB2aXN1YWxpemF0aW9uIHRvIGNvbXBhcmUgZ3BhIGFuZCBpcS4gREVTQ1JJQkUgd2hhdCB5b3Ugc2VlCmBgYAoKIyMjIyBXaGF0IGlzIHRoZSByZWxhdGlvbnNoaXAgYmV0d2VlbiBHUEEgYW5kIFN0dWR5IEhvdXJzPwoKYGBge3J9CiNDUkVBVEUgYSB2aXN1YWxpemF0aW9uIHRvIGNvbXBhcmUgZ3BhIGFuZCBpcS4gREVTQ1JJQkUgd2hhdCB5b3Ugc2VlCmBgYAoKIyMjIyBCYXNlZCBvbiB0aGUgdmlzdWFsaXphdGlvbnMgYWJvdmUsIHdoaWNoIHZhcmlhYmxlIGluZmx1ZW5jZXMgR1BBIHRvIGEgZ3JlYXRlciBkZWdyZWU6IElRIG9yIFN0dWR5IEhvdXJzPyBFeHBsYWluLgoKIyMjIyBNdXRhdGluZyB0aGUgZGF0YXNldC4gCgpgYGB7cn0KI1NvIHRoYXQgZ3BhIGFuZCBJUSBjYW4gYmUgY29tcGFyZWQgb24gc2ltaWxhciBzY2FsZXMsIG11dGF0ZSB0aGUgZGF0YXNldCBncGFfaXEgc28gdGhhdCB0aGUgZ3BhIGlzIG91dCBvZiAxMDAgcG9pbnRzIHJhdGhlciB0aGFuIDEwLiBDYWxsIHRoZSBuZXcgZGF0YSBzZXQgR1BBMTAwIGFuZCB0aGUgbmV3IHZhcmlhYmxlIHlvdSBjcmVhdGUgZ3BhXzEwMCkKCmBgYAoKIyMjIyBTdWJzZXR0aW5nIHRoZSBkYXRhLgoKaGludDogc3Vic2V0IGZ1bmN0aW9uCm5ld2RhdGEgPC0gc3Vic2V0KGRhdGEsIHZhcmlhYmxlID09ICIgIikKCgpgYGB7cn0KIyB1c2luZyBzdWJzZXQgZnVuY3Rpb24gdG8gY3JlYXRlIGEgZmVtYWxlIGRhdGFzZXQgd2l0aCBncGEgZGF0YQoKYGBgCgpgYGB7cn0KIyB1c2luZyBzdWJzZXQgZnVuY3Rpb24gdG8gY3JlYXRlIGEgbWFsZSBkYXRhc2V0IHdpdGggZ3BhIGRhdGEKYGBgCgojIyMjIyBHZW5kZXIgYW5hbHlzaXMKCk5vdyB0aGF0IHlvdSBoYXZlIGEgZ3BhIGRhdGFzZXQgZm9yIGZlbWFsZXMgYW5kIG9uZSBmb3IgbWFsZXMsIHdyaXRlIGEgcXVlc3Rpb24gdG8gY29tcGFyZSB0aGUgMiBnZW5kZXJzLCB0aGVuIGNyZWF0ZSB2aXN1YWxpemF0aW9ucyBhbmQgZGVzY3JpYmUgd2hhdCB5b3Ugc2VlLiBCZSBzdXJlIHRoYXQgeW91IHZpc3VhbGl6YXRpb24gYW5kIGFuYWx5c2lzIGFuc3dlciB0aGUgcXVlc3Rpb24gdGhhdCB5b3UgcG9zZWQuIAoKIyMjIyBZT1VSIFF1ZXN0aW9uIEhFUkUK