Question 1:

True

Question 2:

See on Blackboard

Question 3:

True

Question 4:

All apply


bike1 <- read.table("bike_sharing_data.csv", sep=",", header=TRUE)
bike2 <- read.table("bike_sharing_data.txt", sep="\t", header=TRUE)
bike3 <- read.csv("bike_sharing_data.csv")

bike4 <- read.delim("bike_sharing_data.txt")

Question 5:

17379, 13

Question 6:

Character

Question 7:

4

bike_sharing_data[6251, ]

Question 8:

4232

table(bike_sharing_data$season)

Question 9:

True

Question 10:

46

subset(bike_sharing_data, (windspeed >= 40) & ((season) %in% c("1" , "4")) )

Add a new chunk by clicking the Insert Chunk button on the toolbar or by pressing Cmd+Option+I.

When you save the notebook, an HTML file containing the code and output will be saved alongside it (click the Preview button or press Cmd+Shift+K to preview the HTML file).

The preview shows you a rendered HTML copy of the contents of the editor. Consequently, unlike Knit, Preview does not run any R code chunks. Instead, the output of the chunk when it was last run in the editor is displayed.

LS0tCnRpdGxlOiAiUiBOb3RlYm9vayIKb3V0cHV0OiBodG1sX25vdGVib29rCi0tLQojIFF1ZXN0aW9uIDE6IAojIyMgVHJ1ZSAKCiMgUXVlc3Rpb24gMjogIAojIyMgU2VlIG9uIEJsYWNrYm9hcmQKCgojIFF1ZXN0aW9uIDM6CiMjIyBUcnVlCgojIFF1ZXN0aW9uIDQ6IAojIyMgQWxsIGFwcGx5CmBgYHtyfQoKYmlrZTEgPC0gcmVhZC50YWJsZSgiYmlrZV9zaGFyaW5nX2RhdGEuY3N2Iiwgc2VwPSIsIiwgaGVhZGVyPVRSVUUpCmBgYAoKYGBge3J9CmJpa2UyIDwtIHJlYWQudGFibGUoImJpa2Vfc2hhcmluZ19kYXRhLnR4dCIsIHNlcD0iXHQiLCBoZWFkZXI9VFJVRSkKYGBgCgpgYGB7cn0KYmlrZTMgPC0gcmVhZC5jc3YoImJpa2Vfc2hhcmluZ19kYXRhLmNzdiIpCmBgYAoKYGBge3J9CmJpa2U0IDwtIHJlYWQuZGVsaW0oImJpa2Vfc2hhcmluZ19kYXRhLnR4dCIpCmBgYAoKIyBRdWVzdGlvbiA1OiAKIyMjIDE3Mzc5LCAxMwoKCiMgUXVlc3Rpb24gNjogCiMjIyBDaGFyYWN0ZXIKCiMgUXVlc3Rpb24gNzogCiMjIyA0IApgYGB7cn0KYmlrZV9zaGFyaW5nX2RhdGFbNjI1MSwgXQpgYGAKCiMgUXVlc3Rpb24gODogCiMjIyA0MjMyCmBgYHtyfQp0YWJsZShiaWtlX3NoYXJpbmdfZGF0YSRzZWFzb24pCmBgYAoKIyBRdWVzdGlvbiA5OiAKIyMjIFRydWUgCgojIFF1ZXN0aW9uIDEwOiAKIyMjIDQ2CmBgYHtyfQpzdWJzZXQoYmlrZV9zaGFyaW5nX2RhdGEsICh3aW5kc3BlZWQgPj0gNDApICYgKChzZWFzb24pICVpbiUgYygiMSIgLCAiNCIpKSApCmBgYAoKCgpBZGQgYSBuZXcgY2h1bmsgYnkgY2xpY2tpbmcgdGhlICpJbnNlcnQgQ2h1bmsqIGJ1dHRvbiBvbiB0aGUgdG9vbGJhciBvciBieSBwcmVzc2luZyAqQ21kK09wdGlvbitJKi4KCldoZW4geW91IHNhdmUgdGhlIG5vdGVib29rLCBhbiBIVE1MIGZpbGUgY29udGFpbmluZyB0aGUgY29kZSBhbmQgb3V0cHV0IHdpbGwgYmUgc2F2ZWQgYWxvbmdzaWRlIGl0IChjbGljayB0aGUgKlByZXZpZXcqIGJ1dHRvbiBvciBwcmVzcyAqQ21kK1NoaWZ0K0sqIHRvIHByZXZpZXcgdGhlIEhUTUwgZmlsZSkuIAoKVGhlIHByZXZpZXcgc2hvd3MgeW91IGEgcmVuZGVyZWQgSFRNTCBjb3B5IG9mIHRoZSBjb250ZW50cyBvZiB0aGUgZWRpdG9yLiBDb25zZXF1ZW50bHksIHVubGlrZSAqS25pdCosICpQcmV2aWV3KiBkb2VzIG5vdCBydW4gYW55IFIgY29kZSBjaHVua3MuIEluc3RlYWQsIHRoZSBvdXRwdXQgb2YgdGhlIGNodW5rIHdoZW4gaXQgd2FzIGxhc3QgcnVuIGluIHRoZSBlZGl0b3IgaXMgZGlzcGxheWVkLgoK