Update for the day
This commit is contained in:
Alex Gebben Work
parent
4b93ced8ef
commit
6525accf74
@ -2,13 +2,15 @@
|
||||
\usetheme{Madrid}
|
||||
\usepackage{tikz}
|
||||
\usepackage{datetime}
|
||||
\usepackage{hyperref}
|
||||
\usepackage{cleveref}
|
||||
\usepackage{tcolorbox}
|
||||
\tcbuselibrary{skins, breakable}
|
||||
|
||||
\newdate{nextTuesday}{26}{08}{2025}
|
||||
|
||||
\title{ECON 4530/5530 \\ Computational Economics}
|
||||
\author{University of Wyoming}
|
||||
\author{Alex Gebben}
|
||||
\date{\displaydate{nextTuesday}}
|
||||
|
||||
\begin{document}
|
||||
@ -35,10 +37,29 @@
|
||||
\item \textbf{Office:} BU 362
|
||||
\item \textbf{Email:} \texttt{agebben@uwyo.edu}
|
||||
\item \textbf{Phone:} 307-766-4136
|
||||
\item \textbf{Office Hours:} Monday \& Friday 1:00–2:30, other times by appointment
|
||||
\item \textbf{Office Hours:} Monday \& Wednesday 1:00–2:30
|
||||
\end{itemize}
|
||||
\end{tcolorbox}
|
||||
\end{frame}
|
||||
\begin{frame}{Class Structure}
|
||||
Learn to create economic reports using computational methods
|
||||
\newline
|
||||
\begin{enumerate}
|
||||
\item{Intro to programming with data management in mind}
|
||||
\item{R and analysis}
|
||||
\item{Python and machine learning}
|
||||
\end{enumerate}
|
||||
You will understand the basics of R, Python and GAMS and when to use them.
|
||||
\end{frame}
|
||||
|
||||
\begin{frame}{Assignments}
|
||||
\begin{enumerate}
|
||||
\item{In class work}
|
||||
\item{\(\approx\) Weekly homework}
|
||||
\item{Final project}
|
||||
\end{enumerate}
|
||||
The final project will involve a economic impact analysis using data you have collected.
|
||||
\end{frame}
|
||||
|
||||
% Workflow Diagram Slide
|
||||
\begin{frame}{Steps of an Economic Analysis}
|
||||
@ -188,33 +209,273 @@
|
||||
\onslide<6->{Should you rethink the strategy?}
|
||||
\onslide<6->{Should you change the question?}
|
||||
}
|
||||
\only<7->{Linear Regression
|
||||
\newline
|
||||
R would work well
|
||||
|
||||
\textbf{Ideal Data}
|
||||
\begin{enumerate}
|
||||
\item{Skiing numbers}
|
||||
\item{Temperature}
|
||||
\item{Air quality}
|
||||
\item{Snow fall}
|
||||
\item{Road closures}
|
||||
\item{Distance travelled of visitors}
|
||||
\item{Income}
|
||||
\item{Population trends}
|
||||
\item{Skiing trends in other states}
|
||||
\end{enumerate}
|
||||
Narrow focus
|
||||
}
|
||||
\end{column}
|
||||
\end{columns}
|
||||
\end{frame}
|
||||
\begin{frame}{Data Collection}
|
||||
%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
||||
\begin{frame}{Strategy and Design: Example}
|
||||
\centering
|
||||
\begin{columns}
|
||||
\begin{column}{0.5\textwidth}
|
||||
|
||||
\only<1>{\includegraphics[width=\textwidth]{"Data_Types"}}
|
||||
\only<2>{\includegraphics[width=\textwidth]{"Data_Conversion"}}
|
||||
\only<3>{\includegraphics[width=\textwidth]{"Data_Flow"}}
|
||||
\begin{tikzpicture}[
|
||||
node distance=1.5cm and 2.5cm,
|
||||
every node/.style={draw, rounded corners, text centered, minimum width=3.8cm, minimum height=1cm, font=\small},
|
||||
designstyle/.style={fill=blue!20},
|
||||
designstyle_blur/.style={fill=blue!20, opacity=0.3},
|
||||
designstyle_bold/.style={fill=blue!20, thick, draw=black, font=\bfseries},
|
||||
datastyle/.style={fill=orange!20},
|
||||
datastyle_blur/.style={fill=orange!20, opacity=0.3},
|
||||
datastyle_bold/.style={fill=orange!20, thick, draw=black, font=\bfseries },
|
||||
analysisstyle/.style={fill=teal!20, opacity=0.3},
|
||||
reportstyle/.style={fill=yellow!40, thick, draw=black, font=\bfseries, opacity=0.3},
|
||||
fadedarrow/.style={->, thick, opacity=0.3}
|
||||
]
|
||||
|
||||
% Title above left column
|
||||
|
||||
% Left column nodes
|
||||
\node[designstyle_blur] (q) at (-3,1.8) {Economic Question};
|
||||
\node[designstyle_bold] (sd) at (-3,0) {Strategy and Design};
|
||||
\node[datastyle_blur] (dc) at (-3,-1.8) {Data Collection};
|
||||
\node[datastyle_blur] (clean) at (-3,-3.6) {Data Cleaning};
|
||||
|
||||
% arrows
|
||||
\draw[fadedarrow] (q) -- ++(sd);
|
||||
\draw[fadedarrow] (sd) -- ++(dc);
|
||||
\draw[fadedarrow] (dc) -- ++(clean);
|
||||
\end{tikzpicture}
|
||||
|
||||
\end{column}
|
||||
|
||||
\begin{column}{0.5\textwidth}
|
||||
|
||||
\onslide<1->{Linear Regression}
|
||||
\newline
|
||||
\onslide<2->{R would work well}
|
||||
\newline
|
||||
\onslide<3->{\textbf{Ideal Data}
|
||||
\begin{enumerate}
|
||||
\onslide<4->{\item{Skiing numbers}}
|
||||
\onslide<5->{\item{Temperature}}
|
||||
\onslide<6->{\item{Air quality}}
|
||||
\onslide<7->{\item{Snow fall}}
|
||||
\onslide<8->{\item{Road closures}}
|
||||
\onslide<9->{\item{Distance travelled of visitors}}
|
||||
\onslide<10->{\item{Income}}
|
||||
\onslide<11->{\item{Population trends}}
|
||||
\onslide<12->{\item{Skiing trends in other states}}
|
||||
\end{enumerate}
|
||||
}
|
||||
\onslide<13->{Narrow focus?}
|
||||
\end{column}
|
||||
\end{columns}
|
||||
\end{frame}
|
||||
|
||||
|
||||
%%%%%%%%%%%%%%%%%%
|
||||
\begin{frame}{Data collection}
|
||||
\begin{columns}
|
||||
\begin{column}{0.5\textwidth}
|
||||
\begin{tikzpicture}[
|
||||
node distance=1.5cm and 2.5cm,
|
||||
every node/.style={draw, rounded corners, text centered, minimum width=3.8cm, minimum height=1cm, font=\small},
|
||||
designstyle/.style={fill=blue!20},
|
||||
designstyle_blur/.style={fill=blue!20, opacity=0.3},
|
||||
designstyle_bold/.style={fill=blue!20, thick, draw=black, font=\bfseries},
|
||||
datastyle/.style={fill=orange!20},
|
||||
datastyle_blur/.style={fill=orange!20, opacity=0.3},
|
||||
datastyle_bold/.style={fill=orange!20, thick, draw=black, font=\bfseries },
|
||||
analysisstyle/.style={fill=teal!20, opacity=0.3},
|
||||
reportstyle/.style={fill=yellow!40, thick, draw=black, font=\bfseries, opacity=0.3},
|
||||
fadedarrow/.style={->, thick, opacity=0.3}
|
||||
]
|
||||
|
||||
% Title above left column
|
||||
|
||||
% Left column nodes
|
||||
\node[designstyle_blur] (q) at (-3,1.8) {Economic Question};
|
||||
\node[designstyle_blur] (sd) at (-3,0) {Strategy and Design};
|
||||
\node[datastyle_bold] (dc) at (-3,-1.8) {Data Collection};
|
||||
\node[datastyle_blur] (clean) at (-3,-3.6) {Data Cleaning};
|
||||
|
||||
% arrows
|
||||
\draw[fadedarrow] (q) -- ++(sd);
|
||||
\draw[fadedarrow] (sd) -- ++(dc);
|
||||
\draw[fadedarrow] (dc) -- ++(clean);
|
||||
\end{tikzpicture}
|
||||
\end{column}
|
||||
\begin{column}{0.5\textwidth}
|
||||
|
||||
\begin{itemize}
|
||||
\onslide<1->{\item{Identify key needs}}
|
||||
\onslide<2->{\item{Observe possible data sets}}
|
||||
\onslide<3->{\item{Evaluate data options}}
|
||||
\onslide<4->{\item{Develop code}}
|
||||
\end{itemize}
|
||||
\end{column}
|
||||
\end{columns}
|
||||
\end{frame}
|
||||
|
||||
\begin{frame}{Data Collection}
|
||||
\only<1>{\includegraphics[width=\textwidth]{"Data_Types"}}
|
||||
\only<2-7>{
|
||||
\centering
|
||||
\begin{columns}
|
||||
\begin{column}{0.5\textwidth}
|
||||
\begin{tikzpicture}[
|
||||
node distance=1.5cm and 2.5cm,
|
||||
every node/.style={draw, rounded corners, text centered, minimum width=3.8cm, minimum height=1cm, font=\small},
|
||||
designstyle/.style={fill=blue!20},
|
||||
designstyle_blur/.style={fill=blue!20, opacity=0.3},
|
||||
designstyle_bold/.style={fill=blue!20, thick, draw=black, font=\bfseries},
|
||||
datastyle/.style={fill=orange!20},
|
||||
datastyle_blur/.style={fill=orange!20, opacity=0.3},
|
||||
datastyle_bold/.style={fill=orange!20, thick, draw=black, font=\bfseries },
|
||||
analysisstyle/.style={fill=teal!20, opacity=0.3},
|
||||
reportstyle/.style={fill=yellow!40, thick, draw=black, font=\bfseries, opacity=0.3},
|
||||
fadedarrow/.style={->, thick, opacity=0.3}
|
||||
]
|
||||
|
||||
% Title above left column
|
||||
|
||||
% Left column nodes
|
||||
\node[designstyle_blur] (q) at (-3,1.8) {Economic Question};
|
||||
\node[designstyle_blur] (sd) at (-3,0) {Strategy and Design};
|
||||
\node[datastyle_bold] (dc) at (-3,-1.8) {Data Collection};
|
||||
\node[datastyle_blur] (clean) at (-3,-3.6) {Data Cleaning};
|
||||
|
||||
% arrows
|
||||
\draw[fadedarrow] (q) -- ++(sd);
|
||||
\draw[fadedarrow] (sd) -- ++(dc);
|
||||
\draw[fadedarrow] (dc) -- ++(clean);
|
||||
\end{tikzpicture}
|
||||
\end{column}
|
||||
|
||||
|
||||
|
||||
\begin{column}{0.5\textwidth}
|
||||
\textbf{Data considerations}
|
||||
\begin{itemize}
|
||||
\onslide<3->{\item{Reputable data set}}
|
||||
\onslide<4->{\item{Ease of access for a computer}}
|
||||
\onslide<5->{\item{Able to extract automatically}}
|
||||
\onslide<6->{\item{Able to verify results}}
|
||||
\onslide<7->{\item{Will the data change in the future?}}
|
||||
\end{itemize}
|
||||
|
||||
\end{column}
|
||||
\end{columns}
|
||||
}
|
||||
\only<8->{
|
||||
Challenging data collection is not always bad.
|
||||
|
||||
A good paper may either use advanced methods OR new data.
|
||||
\begin{center}
|
||||
\includegraphics[width=0.75\textwidth]{"Searching"}
|
||||
\end{center}
|
||||
}
|
||||
|
||||
\end{frame}
|
||||
%%%%%%%%%%%%%%%%%%
|
||||
|
||||
\begin{frame}{Data Collection: Example}
|
||||
\begin{itemize}
|
||||
\item{\href{https://www.wrds.uwyo.edu/wrds/nrcs/nrcs.html}{Snow Pack}}
|
||||
\item{\href{https://www.nsaa.org/NSAA/Store/Research/Shared_Content/Shop/All_Products_Pages/Research.aspx?hkey=818ad543-3c76-}{All data but paid}}
|
||||
\item{\href{https://www.nps.gov/subjects/socialscience/visitor-use-statistics-dashboard.htm}{National Park Query}}
|
||||
\item{\href{https://aqs.epa.gov/aqsweb/airdata/download_files.html}{Air Quality}}
|
||||
\item{\href{https://wyoroad.info/Highway/History/HistoricalInfo.html}{WYDOT road closure}}
|
||||
\item{\href{https://fred.stlouisfed.org/series/MEHOINUSWYA672N}{Real Wyoming Income \((\)clean data set\()\)}}
|
||||
\end{itemize}
|
||||
\end{frame}
|
||||
|
||||
|
||||
%%%%%%%%%%%%%%%%%%
|
||||
\begin{frame}{Data Cleaning}
|
||||
\begin{columns}
|
||||
\begin{column}{0.5\textwidth}
|
||||
\begin{tikzpicture}[
|
||||
node distance=1.5cm and 2.5cm,
|
||||
every node/.style={draw, rounded corners, text centered, minimum width=3.8cm, minimum height=1cm, font=\small},
|
||||
designstyle/.style={fill=blue!20},
|
||||
designstyle_blur/.style={fill=blue!20, opacity=0.3},
|
||||
designstyle_bold/.style={fill=blue!20, thick, draw=black, font=\bfseries},
|
||||
datastyle/.style={fill=orange!20},
|
||||
datastyle_blur/.style={fill=orange!20, opacity=0.3},
|
||||
datastyle_bold/.style={fill=orange!20, thick, draw=black, font=\bfseries },
|
||||
analysisstyle/.style={fill=teal!20, opacity=0.3},
|
||||
reportstyle/.style={fill=yellow!40, thick, draw=black, font=\bfseries, opacity=0.3},
|
||||
fadedarrow/.style={->, thick, opacity=0.3}
|
||||
]
|
||||
|
||||
% Title above left column
|
||||
|
||||
% Left column nodes
|
||||
\node[designstyle_blur] (q) at (-3,1.8) {Economic Question};
|
||||
\node[designstyle_blur] (sd) at (-3,0) {Strategy and Design};
|
||||
\node[datastyle_blur] (dc) at (-3,-1.8) {Data Collection};
|
||||
\node[datastyle_bold] (clean) at (-3,-3.6) {Data Cleaning};
|
||||
|
||||
% arrows
|
||||
\draw[fadedarrow] (q) -- ++(sd);
|
||||
\draw[fadedarrow] (sd) -- ++(dc);
|
||||
\draw[fadedarrow] (dc) -- ++(clean);
|
||||
\end{tikzpicture}
|
||||
\end{column}
|
||||
|
||||
\begin{column}{0.5\textwidth}
|
||||
\textbf{Tidy data}
|
||||
\begin{itemize}
|
||||
\item{Each variable is a column; each column is a variable.}
|
||||
\item{Each observation is a row; each row is an observation.}
|
||||
\item{Each value is a cell; each cell is a single value.}
|
||||
\end{itemize}
|
||||
\end{column}
|
||||
\end{columns}
|
||||
\end{frame}
|
||||
|
||||
\begin{frame}{Data Processing}
|
||||
\centering
|
||||
\only<1>{\includegraphics[width=\textwidth]{"Data_Conversion"}}
|
||||
\only<2>{\includegraphics[width=\textwidth]{"Data_Flow"}}
|
||||
\only<3>{\includegraphics[width=\textwidth]{"CSV_Clean"}}
|
||||
\end{frame}
|
||||
%%%%%%%%%%%%%%%%%%
|
||||
\begin{frame}{Data Processing: Example}
|
||||
\begin{center}
|
||||
\includegraphics[width=0.65\textwidth]{"Clean_Example"}
|
||||
\end{center}
|
||||
Make the data computer ready
|
||||
\begin{itemize}
|
||||
\onslide<2->{ \item{Convert from HTML table to CSV}}
|
||||
\onslide<3->{ \item{Aggregate each Basin}}
|
||||
\onslide<4->{ \item{Make code to pull data over time with URL changes}}
|
||||
\end{itemize}
|
||||
|
||||
|
||||
\end{frame}
|
||||
|
||||
\begin{frame}{Next Class}
|
||||
\begin{itemize}
|
||||
\item{Install R-base}
|
||||
\item{Install R-Studio}
|
||||
\item{Load tidyverse in R}
|
||||
\item{Homework}
|
||||
\begin{enumerate}
|
||||
\item{Develop at least three economic questions you are interested in}
|
||||
\item{5530: Select one question and appropriate analysis}
|
||||
\item{Create a list of relevant data}
|
||||
\item{Find at least three data sets on the list and provide a URL}
|
||||
\item{5530: Explain the main challenges to making the data usable}
|
||||
\item{4430: Submit a list of these findings}
|
||||
\item{5530: Provide a memo or one page report with this information}
|
||||
\end{enumerate}
|
||||
|
||||
\end{itemize}
|
||||
|
||||
|
||||
\end{frame}
|
||||
|
||||
|
||||
\end{document}
|
||||
|
||||
BIN
Clean_Example.png
Normal file
BIN
Clean_Example.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 165 KiB |
BIN
Searching.jpg
Normal file
BIN
Searching.jpg
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 40 KiB |
Loading…
x
Reference in New Issue
Block a user