reficius1 OP t1_ivhbkso wrote on November 7, 2022 at 11:38 PM

This is [OC], plotted in MS Excel. Data source:

https://www.extremeweatherwatch.com/cities/concord#:~:text=The%20highest%20temperature%20ever%20recorded,occurred%20on%20July%203%2C%201966.&text=The%20lowest%20temperature%20ever%20recorded,occurred%20on%20February%2016%2C%201943

Method was simply to scroll through the yearly data and note dates of first and last temperature of 32F/0C or lower. Probably could have automated it, but that would have taken at least as long as this did.

lightbulbdeath t1_ivi9974 wrote on November 8, 2022 at 3:50 AM

>Good use case here for using Power Query in Excel - add this into the advanced editor window, pass the year and city as a variable, and you're away. Probably better to run it as a function, but I did this in 3 mins.
>
>let
>
>yr= "1976",
>
>city = "concord",
>
>src = Web.Page(Web.Contents("https://www.extremeweatherwatch.com/cities/" & city &"/year-" & yr)),
>
>tables = Table.Combine({src{1}[Data],src{2}[Data],src{3}[Data],src{4}[Data],src{5}[Data],src{6}[Data], src{7}[Data],src{8}[Data],src{9}[Data], src{10}[Data],src{11}[Data],src{12}[Data]}),
>
>#"Added Suffix" = Table.TransformColumns(tables, {{"Day", each _ & " " & yr, type text}}),
>
>#"Changed Type" = Table.TransformColumnTypes(#"Added Suffix",{{"Day", type date}, {"High (°F)", Int64.Type}, {"Low (°F)", Int64.Type}})
>
>in
>
>#"Changed Type"