Project 1
Updated by NDG 2/7/24
Description
You have been hired as a consultant by Disney to create a location
for a new amusement park. Your job is to analyze weather data from
different locations to pick out the best option.
Part 1: Data cleanup (5 points)
Begin by looking at the documentation for the climate normal
data.
Then load your ClimateNormalData.csv datafile. You will need to do
some clean-up. Be sure to look at the data carefully. Below are a list
of suggested dplyr activities.
Suggested tasks:
- Load both csv files as raw data
- Cleanup the data
- Turn all character date fields into integers
- Create a new string with paste or paste0 that has m/d/y (use 2024
for year)
- Use mdy from lubridate to create an actual date column
- Remove any fields you don’t want to use
- Join the two tables together to get the titles for each
station.
(put the paste before actual date, put in a date from the data for
actual date don’t create your own date, select removes columns, filter
removes rows, skip jumps past the first rows, need na to remove/identify
the na cells/values)
Part 2: Summary table (5 points)
Now that you have the data, create some basic summary data. Show a
table with the average temperature by month and location. Have the
stations as rows, and the month as columns.
Hint: you may need to use dplyr pivot.
Part 3: Best location for amusement park (5 points)
We want to find the best location for an amusement park that isn’t
too hot, or too cold. Define an appropriate temperature range where it
is comfortable to be outside. Then, create a graph showing how different
locations meet your temperature requirement.
Write a brief 2-3 sentence explanation of your findings.

#Based on the graphs I created above, it looks like Austin, TX is the best location to put the amusement park since it's temperature stays within the range of 45-90 degrees Fahrenheit that I established with the variable comfortable_temp. Throughout the year, the other locations fall below 40 degrees, which may start to become too cold for people to enjoy the park or even for some rides to be functional.

#Based on this updated graph, I would say my argument still stands since Texas contains the temperature range I deem best fit for an amusement park all year round. The other locations fall below my threshold of 45 degrees during the winter.
Part 4: Airport (5 points)
Which of the sites would be best as an airport? Explore the others
variables in your dataset. For example, look at cloud cover or average
wind speed. This may require some data clean, so carefully look at your
dataset for weird values.
Give a chart, and write a 2-3 sentence explanation of your
answer.

#With the graphs I made above, I can conclude that the best area to fly into is June AK due to the area having the lowest cloud coverage percentage. All four of the areas hit an average wind speed of over 10 mph, which is a tricky factor to consider when flying in. Having clear skies helps pilots to land and makes June, AK the best place to fly in.
#I know my graphs aren't the best. This is my second time working with raw data and it's tough, but I love the challenge. This is a great assignment that has definitely pushed me and shown be how to make the code and data work in my favor. I know where to go to publish, but I forgot how you wanted us to publish so I did not publish this project. I did knit it a couple times and believe the view for it to be published is correct.
LS0tDQp0aXRsZTogIlIgTm90ZWJvb2siDQpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sNCi0tLQ0KDQojIFByb2plY3QgMQ0KKlVwZGF0ZWQgYnkgTkRHIDIvNy8yNCoNCg0KIyMgRGVzY3JpcHRpb24NCg0KWW91IGhhdmUgYmVlbiBoaXJlZCBhcyBhIGNvbnN1bHRhbnQgYnkgRGlzbmV5IHRvIGNyZWF0ZSBhIGxvY2F0aW9uIGZvciBhIG5ldyBhbXVzZW1lbnQgcGFyay4gWW91ciBqb2IgaXMgdG8gYW5hbHl6ZSB3ZWF0aGVyIGRhdGEgZnJvbSBkaWZmZXJlbnQgbG9jYXRpb25zIHRvIHBpY2sgb3V0IHRoZSBiZXN0IG9wdGlvbi4NCg0KDQojIFBhcnQgMTogRGF0YSBjbGVhbnVwICg1IHBvaW50cykNCg0KQmVnaW4gYnkgbG9va2luZyBhdCB0aGUgZG9jdW1lbnRhdGlvbiBmb3IgdGhlIGNsaW1hdGUgbm9ybWFsIGRhdGEuIA0KDQpUaGVuIGxvYWQgeW91ciBDbGltYXRlTm9ybWFsRGF0YS5jc3YgZGF0YWZpbGUuIFlvdSB3aWxsIG5lZWQgdG8gZG8gc29tZSBjbGVhbi11cC4gQmUgc3VyZSB0byBsb29rIGF0IHRoZSBkYXRhIGNhcmVmdWxseS4gQmVsb3cgYXJlIGEgbGlzdCBvZiBzdWdnZXN0ZWQgZHBseXIgYWN0aXZpdGllcy4NCg0KU3VnZ2VzdGVkIHRhc2tzOg0KDQotIExvYWQgYm90aCBjc3YgZmlsZXMgYXMgcmF3IGRhdGENCi0gQ2xlYW51cCB0aGUgZGF0YQ0KIC0gVHVybiBhbGwgY2hhcmFjdGVyIGRhdGUgZmllbGRzIGludG8gaW50ZWdlcnMNCiAtIENyZWF0ZSBhIG5ldyBzdHJpbmcgd2l0aCBwYXN0ZSBvciBwYXN0ZTAgdGhhdCBoYXMgbS9kL3kgKHVzZSAyMDI0IGZvciB5ZWFyKQ0KIC0gVXNlIG1keSBmcm9tIGx1YnJpZGF0ZSB0byBjcmVhdGUgYW4gYWN0dWFsIGRhdGUgY29sdW1uDQogLSBSZW1vdmUgYW55IGZpZWxkcyB5b3UgZG9uJ3Qgd2FudCB0byB1c2UNCi0gSm9pbiB0aGUgdHdvIHRhYmxlcyB0b2dldGhlciB0byBnZXQgdGhlIHRpdGxlcyBmb3IgZWFjaCBzdGF0aW9uLg0KDQoocHV0IHRoZSBwYXN0ZSBiZWZvcmUgYWN0dWFsIGRhdGUsIHB1dCBpbiBhIGRhdGUgZnJvbSB0aGUgZGF0YSBmb3IgYWN0dWFsIGRhdGUgZG9uJ3QgY3JlYXRlIHlvdXIgb3duIGRhdGUsIHNlbGVjdCByZW1vdmVzIGNvbHVtbnMsIGZpbHRlciByZW1vdmVzIHJvd3MsIHNraXAganVtcHMgcGFzdCB0aGUgZmlyc3Qgcm93cywgbmVlZCBuYSB0byByZW1vdmUvaWRlbnRpZnkgdGhlIG5hIGNlbGxzL3ZhbHVlcykNCg0KYGBge3IgaW5jbHVkZT1GQUxTRX0NCmxpYnJhcnkoZGJwbHlyKQ0KbGlicmFyeSh0aWR5dmVyc2UpDQpsaWJyYXJ5KHJlYWRyKQ0KbGlicmFyeShsdWJyaWRhdGUpDQpsaWJyYXJ5KGphbml0b3IpDQoNCiNSZWFkaW5nIGluIHRoZSBkYXRhLg0KY2xpbWF0ZV9ub3JtYWxfZGF0YV9yYXcgPC0gcmVhZF9jc3YoIkNsaW1hdGVOb3JtYWxEYXRhLmNzdiIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2tpcCA9IDMsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbmEgPSBjKCIgIiwiIiwgJ05BJywgLTk5OTkpKQ0KVmlldyhjbGltYXRlX25vcm1hbF9kYXRhX3JhdykNCg0KY2xpbWF0ZV9ub3JtYWxfZGF0YV9zdGF0aW9uc19yYXcgPC0gcmVhZF9jc3YoIkNsaW1hdGVOb3JtYWxEYXRhX3N0YXRpb25zLmNzdiIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2tpcCA9IDIpDQpWaWV3KGNsaW1hdGVfbm9ybWFsX2RhdGFfc3RhdGlvbnNfcmF3KQ0KDQoNCiNDbGVhbmluZyB0aGUgZGF0YS4NCmNsaW1hdGVfbm9ybWFsX2RhdGEgPC0gY2xpbWF0ZV9ub3JtYWxfZGF0YV9yYXcgJT4lIA0KICBqYW5pdG9yOjpjbGVhbl9uYW1lcygpICU+JSANCiAgcmVuYW1lKHN0YXRpb25faWQgPSBzdGF0aW9uKSAlPiUgDQogIHNlbGVjdChzdGF0aW9uX2lkLA0KICAgICAgICAgbW9udGgsIA0KICAgICAgICAgZGF5LCANCiAgICAgICAgIGhvdXIsIA0KICAgICAgICAgaGx5X3RlbXBfbm9ybWFsLA0KICAgICAgICAgaGx5X3dpbmRfYXZnc3BkLA0KICAgICAgICAgaGx5X2Nsb2RfcGN0b3ZjLA0KICAgICAgICAgaGx5X2Nsb2RfcGN0Y2xyLA0KICAgICAgICAgaGx5X3dpbmRfcGN0Y2xtKSAlPiUgDQogIG11dGF0ZShkYXRlID0gcGFzdGUobW9udGgsIA0KICAgICAgICAgICAgICAgICAgICAgIGRheSwgDQogICAgICAgICAgICAgICAgICAgICAgMjAyNCwgDQogICAgICAgICAgICAgICAgICAgICAgc2VwID0gIi8iKSwNCiAgICAgICAgIG1keShkYXRlKSkNCg0KY2xpbWF0ZV9ub3JtYWxfZGF0YV9zdGF0aW9uIDwtIGNsaW1hdGVfbm9ybWFsX2RhdGFfc3RhdGlvbnNfcmF3ICU+JSANCiAgamFuaXRvcjo6Y2xlYW5fbmFtZXMoKSAlPiUgDQogIHJlbmFtZShzdGF0aW9uX2lkID0gc3RhdGlvbiwgDQogICAgICAgICBzdGF0aW9uX25hbWUgPSBuYW1lKSAlPiUgDQogIG11dGF0ZShnZW9ncmFwaGljX2xvY2F0aW9uID0gcGFzdGUobGF0aXR1ZGUsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGxvbmdpdHVkZSwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZWxldmF0aW9uLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBzZXAgPSAnLCAnKSkNCiAgI211dGF0ZShnZW9ncmFwaGljX2xvY2F0aW9uID09IHBhc3RlKCdsYXRpdHVkZScsICdsb25naXR1ZGUnLCAnZWxldmF0aW9uJykpDQogIA0KDQoNCiNKb2luaW5nIHRoZSB0YWJsZXMuDQpjbGltYXRlX2RhdGEgPC0gY2xpbWF0ZV9ub3JtYWxfZGF0YV9zdGF0aW9uICU+JSANCiAgIGlubmVyX2pvaW4oY2xpbWF0ZV9ub3JtYWxfZGF0YSwgYnkgPSAnc3RhdGlvbl9pZCcpDQoNCg0KDQpgYGANCg0KDQojIFBhcnQgMjogU3VtbWFyeSB0YWJsZSAoNSBwb2ludHMpDQoNCk5vdyB0aGF0IHlvdSBoYXZlIHRoZSBkYXRhLCBjcmVhdGUgc29tZSBiYXNpYyBzdW1tYXJ5IGRhdGEuIFNob3cgYSB0YWJsZSB3aXRoIHRoZSBhdmVyYWdlIHRlbXBlcmF0dXJlIGJ5IG1vbnRoIGFuZCBsb2NhdGlvbi4gSGF2ZSB0aGUgc3RhdGlvbnMgYXMgcm93cywgYW5kIHRoZSBtb250aCBhcyBjb2x1bW5zLg0KDQpIaW50OiB5b3UgbWF5IG5lZWQgdG8gdXNlIGRwbHlyIHBpdm90Lg0KDQpgYGB7ciBlY2hvPUZBTFNFfQ0KYXZnX3RlbXBlcmF0dXJlIDwtIGNsaW1hdGVfZGF0YSAlPiUgDQogIHNlbGVjdChzdGF0aW9uX25hbWUsIA0KICAgICAgICAgc3RhdGlvbl9pZCwgDQogICAgICAgICBtb250aCwgDQogICAgICAgICBnZW9ncmFwaGljX2xvY2F0aW9uLCANCiAgICAgICAgIGhseV90ZW1wX25vcm1hbCkgJT4lIA0KICBncm91cF9ieShnZW9ncmFwaGljX2xvY2F0aW9uLCBtb250aCkgJT4lDQogIHN1bW1hcmlzZShhdmdfdGVtcCA9IG1lYW4oaGx5X3RlbXBfbm9ybWFsKSkgJT4lIA0KICAgIHBpdm90X3dpZGVyKCBuYW1lc19mcm9tID0gbW9udGgsIHZhbHVlc19mcm9tID0gYXZnX3RlbXApDQoNCnByaW50KGF2Z190ZW1wZXJhdHVyZSkNCg0KI3NpbmNlIHRoZSBjb2RlIHNhaWQgdG8gdXNlIGxvY2F0aW9uLCBJIHVzZWQgdGhlIGdlb2dyYXBoaWNfbG9jYXRpb24gdmFyaWFibGUgSSBjcmVhdGVkLiBJZiB0aGUgc3RhdGlvbiBuYW1lcyB3ZXJlIHJlcXVpcmVkLCB0aGUgY29kZSBiZWxvdyB3b3VsZCB3b3JrOg0KDQphdmdfdGVtcGVyYXR1cmVfd2l0aF9zdGF0aW9uX25hbWUgPC0gY2xpbWF0ZV9kYXRhICU+JSANCiAgc2VsZWN0KHN0YXRpb25fbmFtZSwgDQogICAgICAgICBzdGF0aW9uX2lkLCANCiAgICAgICAgIG1vbnRoLCANCiAgICAgICAgIGdlb2dyYXBoaWNfbG9jYXRpb24sIA0KICAgICAgICAgaGx5X3RlbXBfbm9ybWFsKSAlPiUgDQogIGdyb3VwX2J5KHN0YXRpb25fbmFtZSwgbW9udGgpICU+JQ0KICBzdW1tYXJpc2UoYXZnX3RlbXAgPSBtZWFuKGhseV90ZW1wX25vcm1hbCkpICU+JSANCiAgICBwaXZvdF93aWRlciggbmFtZXNfZnJvbSA9IG1vbnRoLCB2YWx1ZXNfZnJvbSA9IGF2Z190ZW1wKQ0KDQpwcmludChhdmdfdGVtcGVyYXR1cmVfd2l0aF9zdGF0aW9uX25hbWUpDQoNCmBgYA0KDQoNCiMgUGFydCAzOiBCZXN0IGxvY2F0aW9uIGZvciBhbXVzZW1lbnQgcGFyayAoNSBwb2ludHMpDQoNCldlIHdhbnQgdG8gZmluZCB0aGUgYmVzdCBsb2NhdGlvbiBmb3IgYW4gYW11c2VtZW50IHBhcmsgdGhhdCBpc24ndCB0b28gaG90LCBvciB0b28gY29sZC4NCkRlZmluZSBhbiBhcHByb3ByaWF0ZSB0ZW1wZXJhdHVyZSByYW5nZSB3aGVyZSBpdCBpcyBjb21mb3J0YWJsZSB0byBiZSBvdXRzaWRlLiBUaGVuLCBjcmVhdGUgYSBncmFwaCBzaG93aW5nIGhvdyBkaWZmZXJlbnQgbG9jYXRpb25zIG1lZXQgeW91ciB0ZW1wZXJhdHVyZSByZXF1aXJlbWVudC4NCg0KV3JpdGUgYSBicmllZiAyLTMgc2VudGVuY2UgZXhwbGFuYXRpb24gb2YgeW91ciBmaW5kaW5ncy4NCg0KYGBge3J9DQpsaWJyYXJ5KGdncGxvdDIpDQoNCmNvbWZvcnRhYmxlX3RlbXAgPC0gZmlsdGVyKGNsaW1hdGVfZGF0YSwgaGx5X3RlbXBfbm9ybWFsID49IDQ1LCBobHlfdGVtcF9ub3JtYWwgPD0gOTApDQoNCmdncGxvdChkYXRhID0gY2xpbWF0ZV9kYXRhKSArDQogIGdlb21fcG9pbnQobWFwcGluZyA9IGFlcyh5ID0gaGx5X3RlbXBfbm9ybWFsLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgIHggPSBkYXRlKSkgKyANCiAgZmFjZXRfd3JhcCggfiBzdGF0aW9uX25hbWUsIG5yb3cgPSAzKQ0KYGBgDQpgYGB7cn0NCiNCYXNlZCBvbiB0aGUgZ3JhcGhzIEkgY3JlYXRlZCBhYm92ZSwgaXQgbG9va3MgbGlrZSBBdXN0aW4sIFRYIGlzIHRoZSBiZXN0IGxvY2F0aW9uIHRvIHB1dCB0aGUgYW11c2VtZW50IHBhcmsgc2luY2UgaXQncyB0ZW1wZXJhdHVyZSBzdGF5cyB3aXRoaW4gdGhlIHJhbmdlIG9mIDQ1LTkwIGRlZ3JlZXMgRmFocmVuaGVpdCB0aGF0IEkgZXN0YWJsaXNoZWQgd2l0aCB0aGUgdmFyaWFibGUgY29tZm9ydGFibGVfdGVtcC4gVGhyb3VnaG91dCB0aGUgeWVhciwgdGhlIG90aGVyIGxvY2F0aW9ucyBmYWxsIGJlbG93IDQwIGRlZ3JlZXMsIHdoaWNoIG1heSBzdGFydCB0byBiZWNvbWUgdG9vIGNvbGQgZm9yIHBlb3BsZSB0byBlbmpveSB0aGUgcGFyayBvciBldmVuIGZvciBzb21lIHJpZGVzIHRvIGJlIGZ1bmN0aW9uYWwuDQpgYGANCg0KDQoNCg0KYGBge3IgZWNobz1GQUxTRX0NCmdncGxvdChkYXRhID0gY2xpbWF0ZV9kYXRhKSArDQogIGdlb21fcG9pbnQobWFwcGluZyA9IGFlcyh5ID0gaGx5X3RlbXBfbm9ybWFsLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgIHggPSBkYXRlKSkgKyANCiAgeWxpbSg0NSwgOTApICsgDQogIGZhY2V0X3dyYXAoIH4gc3RhdGlvbl9uYW1lLCBucm93ID0gMykNCmBgYA0KDQpgYGB7cn0NCiNCYXNlZCBvbiB0aGlzIHVwZGF0ZWQgZ3JhcGgsIEkgd291bGQgc2F5IG15IGFyZ3VtZW50IHN0aWxsIHN0YW5kcyBzaW5jZSBUZXhhcyBjb250YWlucyB0aGUgdGVtcGVyYXR1cmUgcmFuZ2UgSSBkZWVtIGJlc3QgZml0IGZvciBhbiBhbXVzZW1lbnQgcGFyayBhbGwgeWVhciByb3VuZC4gVGhlIG90aGVyIGxvY2F0aW9ucyBmYWxsIGJlbG93IG15IHRocmVzaG9sZCBvZiA0NSBkZWdyZWVzIGR1cmluZyB0aGUgd2ludGVyLg0KYGBgDQoNCg0KIyBQYXJ0IDQ6IEFpcnBvcnQgKDUgcG9pbnRzKQ0KDQpXaGljaCBvZiB0aGUgc2l0ZXMgd291bGQgYmUgYmVzdCBhcyBhbiBhaXJwb3J0PyBFeHBsb3JlIHRoZSBvdGhlcnMgdmFyaWFibGVzIGluIHlvdXIgZGF0YXNldC4gRm9yIGV4YW1wbGUsIGxvb2sgYXQgY2xvdWQgY292ZXIgb3IgYXZlcmFnZSB3aW5kIHNwZWVkLiBUaGlzIG1heSByZXF1aXJlIHNvbWUgZGF0YSBjbGVhbiwgc28gY2FyZWZ1bGx5IGxvb2sgYXQgeW91ciBkYXRhc2V0IGZvciB3ZWlyZCB2YWx1ZXMuDQoNCkdpdmUgYSBjaGFydCwgYW5kIHdyaXRlIGEgMi0zIHNlbnRlbmNlIGV4cGxhbmF0aW9uIG9mIHlvdXIgYW5zd2VyLg0KDQpgYGB7cn0NCmdncGxvdChkYXRhID0gY2xpbWF0ZV9kYXRhKSArDQogIGdlb21fcG9pbnQobWFwcGluZyA9IGFlcyh5ID0gaGx5X2Nsb2RfcGN0Y2xyLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgIHggPSBobHlfd2luZF9hdmdzcGQpKSArIA0KICBmYWNldF93cmFwKCB+IHN0YXRpb25fbmFtZSwgbnJvdyA9IDMpDQpgYGANCg0KYGBge3J9DQojV2l0aCB0aGUgZ3JhcGhzIEkgbWFkZSBhYm92ZSwgSSBjYW4gY29uY2x1ZGUgdGhhdCB0aGUgYmVzdCBhcmVhIHRvIGZseSBpbnRvIGlzIEp1bmUgQUsgZHVlIHRvIHRoZSBhcmVhIGhhdmluZyB0aGUgbG93ZXN0IGNsb3VkIGNvdmVyYWdlIHBlcmNlbnRhZ2UuIEFsbCBmb3VyIG9mIHRoZSBhcmVhcyBoaXQgYW4gYXZlcmFnZSB3aW5kIHNwZWVkIG9mIG92ZXIgMTAgbXBoLCB3aGljaCBpcyBhIHRyaWNreSBmYWN0b3IgdG8gY29uc2lkZXIgd2hlbiBmbHlpbmcgaW4uIEhhdmluZyBjbGVhciBza2llcyBoZWxwcyBwaWxvdHMgdG8gbGFuZCBhbmQgbWFrZXMgSnVuZSwgQUsgdGhlIGJlc3QgcGxhY2UgdG8gZmx5IGluLg0KYGBgDQoNCmBgYHtyfQ0KI0kga25vdyBteSBncmFwaHMgYXJlbid0IHRoZSBiZXN0LiBUaGlzIGlzIG15IHNlY29uZCB0aW1lIHdvcmtpbmcgd2l0aCByYXcgZGF0YSBhbmQgaXQncyB0b3VnaCwgYnV0IEkgbG92ZSB0aGUgY2hhbGxlbmdlLiBUaGlzIGlzIGEgZ3JlYXQgYXNzaWdubWVudCB0aGF0IGhhcyBkZWZpbml0ZWx5IHB1c2hlZCBtZSBhbmQgc2hvd24gYmUgaG93IHRvIG1ha2UgdGhlIGNvZGUgYW5kIGRhdGEgd29yayBpbiBteSBmYXZvci4gSSBrbm93IHdoZXJlIHRvIGdvIHRvIHB1Ymxpc2gsIGJ1dCBJIGZvcmdvdCBob3cgeW91IHdhbnRlZCB1cyB0byBwdWJsaXNoIHNvIEkgZGlkIG5vdCBwdWJsaXNoIHRoaXMgcHJvamVjdC4gSSBkaWQga25pdCBpdCBhIGNvdXBsZSB0aW1lcyBhbmQgYmVsaWV2ZSB0aGUgdmlldyBmb3IgaXQgdG8gYmUgcHVibGlzaGVkIGlzIGNvcnJlY3QuDQpgYGA=