Publications by Daniel Lee
ATV Recreation in Iowa
Table of contents ATV Recreation in the United States ATV Recreation in Iowa Outdoor Recreation Activity Rankings ATV Recreation in 2023 across States ATV Recreation Growth across States Limitations of BEA ORSA Data ATV Recreation in Iowa Analysis of 2023 Outdoor Recreation Satellite Account Data Author Daniel Lee Consulting LLC Code library(...
4540 sym 5 img
ATV Recreation in South Dakota
Table of contents ATV Recreation in the United States ATV Recreation in South Dakota Outdoor Recreation Activity Rankings ATV Recreation in 2023 across States ATV Recreation Growth across States Limitations of BEA ORSA Data ATV Recreation in South Dakota Analysis of 2023 Outdoor Recreation Satellite Account Data Author Daniel Lee Consulting LLC...
4596 sym 5 img
ATV Recreation in Wisconsin
Table of contents ATV Recreation in the United States ATV Recreation in Wisconsin Outdoor Recreation Activity Rankings ATV Recreation in 2023 across States ATV Recreation Growth across States Limitations of BEA ORSA Data ATV Recreation in Wisconsin Analysis of 2023 Outdoor Recreation Satellite Account Data Author Daniel Lee Consulting LLC Cod...
4612 sym 5 img
Analysis of 2023 Outdoor Recreation Satellite Account Data
Table of contents National Trend Wisconsin’s ATV/UTV Industry Outdoor Recreation Rankings ATV/UTV Industry across States Growth across States Limitations of BEA ORSA Data Analysis of 2023 Outdoor Recreation Satellite Account Data Author Daniel Lee Consulting LLC Code library(tidyverse) library(usmap) library(patchwork) library(tidyquant)...
4474 sym 5 img
Document
# Load packages # Core library(tidyverse) library(tidyquant) # time series library(timetk) Goal Simulate future portfolio returns five stocks: “SPY”, “EFA”, “IJS”, “EEM”, “AGG” market: “SPY” from 2012-12-31 to 2017-12-31 1 Import stock prices symbols <- c("SPY", "EFA", "IJS", "EEM", "AGG") prices <- tq_get(x = ...
451 sym R (9134 sym/36 pcs) 2 img
Document
# Load packages # Core library(tidyverse) library(tidyquant) # time series library(timetk) Goal Simulate future portfolio returns five stocks: “H”, “HSY”, “BA”, “VOO”, “NOK” market: “SPY” from 2012-12-31 to 2017-12-31 1 Import stock prices symbols <- c("H", "HSY", "BA", "VOO", "NOK") prices <- tq_get(x = symbol...
448 sym R (9127 sym/36 pcs) 2 img
Document
# Load packages # Core library(tidyverse) library(lubridate) library(nycflights13) Introduction Functions When should you write a function? # For reproducible work set.seed(1234) # Create a data frame df <- tibble::tibble( a = rnorm(10), b = rnorm(10), c = rnorm(10), d = rnorm(10) ) # Re-scale each column df$a <-...
303 sym R (2738 sym/27 pcs)
Document
# Load packages # Core library(tidyverse) library(lubridate) library(nycflights13) Introduction Functions When should you write a function? # For reproducible work set.seed(1234) # Create a data frame df <- tibble::tibble( a = rnorm(10), b = rnorm(10), c = rnorm(10), d = rnorm(10) ) # Re-scale each column df$a <-...
303 sym R (2738 sym/27 pcs)
Code Along 13 FA
# Load packages # Core library(tidyverse) library(tidyquant) # time series library(timetk) Goal Simulate future portfolio returns five stocks: “SPY”, “EFA”, “IJS”, “EEM”, “AGG” market: “SPY” from 2012-12-31 to 2017-12-31 1 Import stock prices symbols <- c("SPY", "EFA", "IJS", "EEM", "AGG") prices <- tq_get(x = symbol...
593 sym R (9950 sym/36 pcs) 2 img
Apply 13 FA
# Load packages # Core library(tidyverse) library(tidyquant) # Source function source("../00_scripts/simulate_accumulation.R") 1 Import stock prices Revise the code below. Replace symbols with your stocks. Replace the from and the to arguments to date from 2012-12-31 to present. symbols <- c("SPY", "EFA", "IJS", "EEM", "AGG") prices <- tq_get...
1679 sym R (5965 sym/24 pcs) 1 img