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.
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.
`summarise()` has grouped output by 'station', 'name'. You can override using the `.groups` argument.
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.
Answer: I would define the appropriate temperature range for an
amusement park to be around 60 - 80 degrees Fahrenheit. Amusement parks
should be able to be enjoyed year round and could include water
attractions, therefore the temperature shouldn’t be too low. Austin, TX,
was identified to be the most suitable location within the specified
temperature range.

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.
Answer: For locating the best site for an airport, I looked at the
average wind speed, percent of clear skies, percent of overcast, percent
of calm winds, and the average temperature. I found that Pittsburgh, PA
would be the most suitable location for an airport. This is because the
location has the highest percent of clear skies, the lowest percent of
overcast, the lowest average wind speed, the second lowest percent of
calm winds, and a comfortable average temperature for ground
workers.

LS0tDQp0aXRsZTogIlIgTm90ZWJvb2siDQpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sNCi0tLQ0KDQojIFByb2plY3QgMQ0KKlVwZGF0ZWQgYnkgTkRHIDIvNy8yNCoNCg0KYGBge3IgaW5jbHVkZT1GQUxTRX0NCmxpYnJhcnkodGlkeXZlcnNlKQ0KbGlicmFyeShsdWJyaWRhdGUpDQpsaWJyYXJ5KGphbml0b3IpDQpsaWJyYXJ5KGdncGxvdDIpDQpgYGANCg0KDQojIyBEZXNjcmlwdGlvbg0KDQpZb3UgaGF2ZSBiZWVuIGhpcmVkIGFzIGEgY29uc3VsdGFudCBieSBEaXNuZXkgdG8gY3JlYXRlIGEgbG9jYXRpb24gZm9yIGEgbmV3IGFtdXNlbWVudCBwYXJrLiBZb3VyIGpvYiBpcyB0byBhbmFseXplIHdlYXRoZXIgZGF0YSBmcm9tIGRpZmZlcmVudCBsb2NhdGlvbnMgdG8gcGljayBvdXQgdGhlIGJlc3Qgb3B0aW9uLg0KDQoNCiMgUGFydCAxOiBEYXRhIGNsZWFudXAgKDUgcG9pbnRzKQ0KDQpCZWdpbiBieSBsb29raW5nIGF0IHRoZSBkb2N1bWVudGF0aW9uIGZvciB0aGUgY2xpbWF0ZSBub3JtYWwgZGF0YS4gDQoNClRoZW4gbG9hZCB5b3VyIENsaW1hdGVOb3JtYWxEYXRhLmNzdiBkYXRhZmlsZS4gWW91IHdpbGwgbmVlZCB0byBkbyBzb21lIGNsZWFuLXVwLiBCZSBzdXJlIHRvIGxvb2sgYXQgdGhlIGRhdGEgY2FyZWZ1bGx5LiBCZWxvdyBhcmUgYSBsaXN0IG9mIHN1Z2dlc3RlZCBkcGx5ciBhY3Rpdml0aWVzLg0KDQpTdWdnZXN0ZWQgdGFza3M6DQoNCi0gTG9hZCBib3RoIGNzdiBmaWxlcyBhcyByYXcgZGF0YQ0KLSBDbGVhbnVwIHRoZSBkYXRhDQogLSBUdXJuIGFsbCBjaGFyYWN0ZXIgZGF0ZSBmaWVsZHMgaW50byBpbnRlZ2Vycw0KIC0gQ3JlYXRlIGEgbmV3IHN0cmluZyB3aXRoIHBhc3RlIG9yIHBhc3RlMCB0aGF0IGhhcyBtL2QveSAodXNlIDIwMjQgZm9yIHllYXIpDQogLSBVc2UgbWR5IGZyb20gbHVicmlkYXRlIHRvIGNyZWF0ZSBhbiBhY3R1YWwgZGF0ZSBjb2x1bW4NCiAtIFJlbW92ZSBhbnkgZmllbGRzIHlvdSBkb24ndCB3YW50IHRvIHVzZQ0KLSBKb2luIHRoZSB0d28gdGFibGVzIHRvZ2V0aGVyIHRvIGdldCB0aGUgdGl0bGVzIGZvciBlYWNoIHN0YXRpb24uDQoNCmBgYHtyIGluY2x1ZGU9RkFMU0V9DQp0X3JhdyA8LSByZWFkX2NzdigiQ2xpbWF0ZU5vcm1hbERhdGEuY3N2Iiwgc2tpcCA9IDMpDQp0X3N0YXRpb25zX3JhdyA8LSByZWFkX2NzdigiQ2xpbWF0ZU5vcm1hbERhdGFfc3RhdGlvbnMuY3N2Iiwgc2tpcCA9IDIpDQoNCnRfc3RhdGlvbnMgPC0gdF9zdGF0aW9uc19yYXcgJT4lIA0KICBqYW5pdG9yOjpjbGVhbl9uYW1lcygpICU+JSANCiAgc2VsZWN0KC1sYXRpdHVkZSwgLWxvbmdpdHVkZSkNCg0KdCA8LSB0X3JhdyAlPiUNCiAgamFuaXRvcjo6Y2xlYW5fbmFtZXMoKSAlPiUgDQogIHNlbGVjdCgtY29udGFpbnMoInllYXJzIiksIC1tZWFzX2ZsYWdfaGx5X2Rld3BfMTBwY3RsKSAlPiUNCiAgbXV0YXRlKG1vbnRoID0gYXMuaW50ZWdlcihtb250aCksDQogICAgICAgICBkYXkgPSBhcy5pbnRlZ2VyKGRheSksDQogICAgICAgICBkYXRlID0gbWR5KHBhc3RlKG1vbnRoLCBkYXksIDIwMjQpKSkgJT4lIA0KICByZWxvY2F0ZShkYXRlLCAuYWZ0ZXIgPSBob3VyKQ0KDQp0X2NsaW1hdGUgPC0gbGVmdF9qb2luKHRfc3RhdGlvbnMsIHQsIGJ5ID0gInN0YXRpb24iKQ0KDQpgYGANCg0KIyBQYXJ0IDI6IFN1bW1hcnkgdGFibGUgKDUgcG9pbnRzKQ0KDQpOb3cgdGhhdCB5b3UgaGF2ZSB0aGUgZGF0YSwgY3JlYXRlIHNvbWUgYmFzaWMgc3VtbWFyeSBkYXRhLiBTaG93IGEgdGFibGUgd2l0aCB0aGUgYXZlcmFnZSB0ZW1wZXJhdHVyZSBieSBtb250aCBhbmQgbG9jYXRpb24uIEhhdmUgdGhlIHN0YXRpb25zIGFzIHJvd3MsIGFuZCB0aGUgbW9udGggYXMgY29sdW1ucy4NCg0KSGludDogeW91IG1heSBuZWVkIHRvIHVzZSBkcGx5ciBwaXZvdC4NCg0KYGBge3IgZWNobz1GQUxTRX0NCnRfc3VtbWFyeSA8LSB0X2NsaW1hdGUgJT4lIA0KICBncm91cF9ieShzdGF0aW9uLCBuYW1lLCBtb250aCkgJT4lIA0KICBzdW1tYXJpemUoYXZnX3RlbXAgPSBtZWFuKGhseV90ZW1wX25vcm1hbCwgcm0ubmEgPSBUUlVFKSkgJT4lIA0KICBwaXZvdF93aWRlcihuYW1lc19mcm9tID0gbW9udGgsIHZhbHVlc19mcm9tID0gYXZnX3RlbXApDQoNCnByaW50KHRfc3VtbWFyeSkNCmBgYA0KDQojIFBhcnQgMzogQmVzdCBsb2NhdGlvbiBmb3IgYW11c2VtZW50IHBhcmsgKDUgcG9pbnRzKQ0KDQpXZSB3YW50IHRvIGZpbmQgdGhlIGJlc3QgbG9jYXRpb24gZm9yIGFuIGFtdXNlbWVudCBwYXJrIHRoYXQgaXNuJ3QgdG9vIGhvdCwgb3IgdG9vIGNvbGQuDQpEZWZpbmUgYW4gYXBwcm9wcmlhdGUgdGVtcGVyYXR1cmUgcmFuZ2Ugd2hlcmUgaXQgaXMgY29tZm9ydGFibGUgdG8gYmUgb3V0c2lkZS4gVGhlbiwgY3JlYXRlIGEgZ3JhcGggc2hvd2luZyBob3cgZGlmZmVyZW50IGxvY2F0aW9ucyBtZWV0IHlvdXIgdGVtcGVyYXR1cmUgcmVxdWlyZW1lbnQuDQoNCldyaXRlIGEgYnJpZWYgMi0zIHNlbnRlbmNlIGV4cGxhbmF0aW9uIG9mIHlvdXIgZmluZGluZ3MuDQoNCkFuc3dlcjoNCkkgd291bGQgZGVmaW5lIHRoZSBhcHByb3ByaWF0ZSB0ZW1wZXJhdHVyZSByYW5nZSBmb3IgYW4gYW11c2VtZW50IHBhcmsgdG8gYmUgYXJvdW5kIDYwIC0gODAgZGVncmVlcyBGYWhyZW5oZWl0LiBBbXVzZW1lbnQgcGFya3Mgc2hvdWxkIGJlIGFibGUgdG8gYmUgZW5qb3llZCB5ZWFyIHJvdW5kIGFuZCBjb3VsZCBpbmNsdWRlIHdhdGVyIGF0dHJhY3Rpb25zLCB0aGVyZWZvcmUgdGhlIHRlbXBlcmF0dXJlIHNob3VsZG4ndCBiZSB0b28gbG93LiBBdXN0aW4sIFRYLCB3YXMgaWRlbnRpZmllZCB0byBiZSB0aGUgbW9zdCBzdWl0YWJsZSBsb2NhdGlvbiB3aXRoaW4gdGhlIHNwZWNpZmllZCB0ZW1wZXJhdHVyZSByYW5nZS4NCg0KYGBge3IgZWNobz1GQUxTRX0NCg0KbGlicmFyeShnZ3Bsb3QyKQ0KDQpnZ3Bsb3QodF9jbGltYXRlKSArDQogYWVzKHggPSBobHlfdGVtcF9ub3JtYWwsIHkgPSBuYW1lKSArDQogZ2VvbV9ib3hwbG90KGZpbGwgPSAiIzAwRDNGMiIpICsNCiBsYWJzKHggPSAiSG91cmx5IEF2ZXJhZ2UgVGVtcGVyYXR1cmUgKMKwRikiLCANCiB5ID0gIkxvY2F0aW9uIiwgdGl0bGUgPSAiVGVtcGVyYXR1cmUgRGlzdHJpYnV0aW9uIGJ5IExvY2F0aW9uIikgKw0KIHRoZW1lX21pbmltYWwoKQ0KDQpgYGANCg0KDQoNCiMgUGFydCA0OiBBaXJwb3J0ICg1IHBvaW50cykNCg0KV2hpY2ggb2YgdGhlIHNpdGVzIHdvdWxkIGJlIGJlc3QgYXMgYW4gYWlycG9ydD8gRXhwbG9yZSB0aGUgb3RoZXJzIHZhcmlhYmxlcyBpbiB5b3VyIGRhdGFzZXQuIEZvciBleGFtcGxlLCBsb29rIGF0IGNsb3VkIGNvdmVyIG9yIGF2ZXJhZ2Ugd2luZCBzcGVlZC4gVGhpcyBtYXkgcmVxdWlyZSBzb21lIGRhdGEgY2xlYW4sIHNvIGNhcmVmdWxseSBsb29rIGF0IHlvdXIgZGF0YXNldCBmb3Igd2VpcmQgdmFsdWVzLg0KDQpHaXZlIGEgY2hhcnQsIGFuZCB3cml0ZSBhIDItMyBzZW50ZW5jZSBleHBsYW5hdGlvbiBvZiB5b3VyIGFuc3dlci4NCg0KQW5zd2VyOg0KRm9yIGxvY2F0aW5nIHRoZSBiZXN0IHNpdGUgZm9yIGFuIGFpcnBvcnQsIEkgbG9va2VkIGF0IHRoZSBhdmVyYWdlIHdpbmQgc3BlZWQsIHBlcmNlbnQgb2YgY2xlYXIgc2tpZXMsIHBlcmNlbnQgb2Ygb3ZlcmNhc3QsIHBlcmNlbnQgb2YgY2FsbSB3aW5kcywgYW5kIHRoZSBhdmVyYWdlIHRlbXBlcmF0dXJlLiBJIGZvdW5kIHRoYXQgUGl0dHNidXJnaCwgUEEgd291bGQgYmUgdGhlIG1vc3Qgc3VpdGFibGUgbG9jYXRpb24gZm9yIGFuIGFpcnBvcnQuIFRoaXMgaXMgYmVjYXVzZSB0aGUgbG9jYXRpb24gaGFzIHRoZSBoaWdoZXN0IHBlcmNlbnQgb2YgY2xlYXIgc2tpZXMsIHRoZSBsb3dlc3QgcGVyY2VudCBvZiBvdmVyY2FzdCwgdGhlIGxvd2VzdCBhdmVyYWdlIHdpbmQgc3BlZWQsIHRoZSBzZWNvbmQgbG93ZXN0IHBlcmNlbnQgb2YgY2FsbSB3aW5kcywgYW5kIGEgY29tZm9ydGFibGUgYXZlcmFnZSB0ZW1wZXJhdHVyZSBmb3IgZ3JvdW5kIHdvcmtlcnMuIA0KDQpgYGB7ciBlY2hvPUZBTFNFfQ0KYXZnX3ZhbHVlcyA8LSB0X2NsaW1hdGUgJT4lIA0KICBmaWx0ZXIoaGx5X3dpbmRfYXZnc3BkID4gMCwgaGx5X2Nsb2RfcGN0Y2xyID4gMCwNCiAgICAgICAgIGhseV93aW5kX3BjdGNsbT4gMCwgaGx5X3RlbXBfbm9ybWFsID4gMCwgaGx5X2Nsb2RfcGN0b3ZjID4gMCkgJT4lIA0KICBncm91cF9ieShuYW1lKSAlPiUgDQogIHN1bW1hcmlzZShhdmdfd2luZF9zcGVlZCA9IG1lYW4oaGx5X3dpbmRfYXZnc3BkKSwNCiAgICAgICAgICAgIHBlcmNlbnRfY2xvdWRzX2NsZWFyID0gbWVhbihobHlfY2xvZF9wY3RjbHIpLA0KICAgICAgICAgICAgcGVyY2VudF9jbG91ZHNfb3ZlcmNhc3QgPSBtZWFuKGhseV9jbG9kX3BjdG92YyksDQogICAgICAgICAgICBwZXJjZW50X3dpbmRfY2FsbSA9IG1lYW4oaGx5X3dpbmRfcGN0Y2xtKSwNCiAgICAgICAgICAgIGF2Z190ZW1wID0gbWVhbihobHlfdGVtcF9ub3JtYWwpKSAlPiUgDQogIHBpdm90X2xvbmdlcihjb2xzID0gLW5hbWUsIG5hbWVzX3RvID0gInZhcmlhYmxlcyIsIHZhbHVlc190byA9ICJ2YWx1ZSIpDQoNCmdncGxvdChhdmdfdmFsdWVzKSArDQogYWVzKHggPSB2YWx1ZSwgeSA9IG5hbWUsIGNvbG91ciA9IHZhcmlhYmxlcykgKw0KIGdlb21fcG9pbnQoc2hhcGUgPSAiY2lyY2xlIiwgc2l6ZSA9IDEuNSkgKw0KIHNjYWxlX2NvbG9yX2h1ZShkaXJlY3Rpb24gPSAxKSArDQogbGFicyh4ID0gIkF2ZXJhZ2VzIGFuZCBQZXJjZW50cyIsIA0KIHkgPSAiTG9jYXRpb24iLCB0aXRsZSA9ICJBdmVyYWdlcyBhbmQgUGVyY2VudHMgYnkgTG9jYXRpb24iLCANCiBjb2xvciA9ICJMZWdlbmQiKSArDQogdGhlbWVfbWluaW1hbCgpDQoNCg0KYGBgDQoNCg==