Publications by Jack Tortolani
Code Along 7
# Load packages # Core library(tidyverse) library(tidyquant) Goal Collect individual returns into a portfolio by assigning a weight to each stock five stocks: “SPY”, “EFA”, “IJS”, “EEM”, “AGG” from 2012-12-31 to 2017-12-31 1 Import stock prices symbols <- c("SPY", "EFA", "IJS", "EEM", "AGG") prices <- tq_get(x = symbols...
440 sym R (4341 sym/20 pcs) 3 img
Apply 6
# Load packages # Core library(tidyverse) library(tidyquant) Goal Visualize expected returns and risk to make it easier to compare the performance of multiple assets and portfolios. Choose your stocks. from 2012-12-31 to 2017-12-31 1 Import stock prices symbols <- c("XOM", "QQQ", "SPY", "TSLA","CGC") prices <- tq_get(x = symbols, ...
1445 sym R (3457 sym/18 pcs) 1 img
CodeAlong5
# Load packages # Core library(tidyverse) library(tidyquant) Goal Collect individual returns into a portfolio by assigning a weight to each stock five stocks: “SPY”, “EFA”, “IJS”, “EEM”, “AGG” from 2012-12-31 to 2017-12-31 1 Import stock prices symbols <- c("SPY", "EFA", "IJS", "EEM", "AGG") prices <- tq_get(x = symbols...
351 sym R (3983 sym/26 pcs) 3 img
Apply 5
# Load packages # Core library(tidyverse) library(tidyquant) Goal Collect individual returns into a portfolio by assigning a weight to each stock Choose your stocks. from 2012-12-31 to 2017-12-31 1 Import stock prices symbols <- c("XOM", "QQQ", "SPY", "TSLA","CGC") prices <- tq_get(x = symbols, get = "stock.prices", ...
524 sym R (2398 sym/12 pcs) 1 img
Code Along 6
# Load packages # Core library(tidyverse) library(tidyquant) Goal Collect individual returns into a portfolio by assigning a weight to each stock five stocks: “SPY”, “EFA”, “IJS”, “EEM”, “AGG” from 2012-12-31 to 2017-12-31 1 Import stock prices symbols <- c("SPY", "EFA", "IJS", "EEM", "AGG") prices <- tq_get(x = symbols...
335 sym R (2469 sym/15 pcs)
Apply it to your data 3
# Load packages library(tidyverse) library(tidyquant) 1 Import stock prices of your choice symbols <- c("XOM", "QQQ", "SPY", "TSLA","CGC") prices <- tq_get(x = symbols, get = "stock.prices", from = "2018-10-15", to = "2024-8-31") 2 Convert prices to returns by quarterly # Calculate quarte...
764 sym R (984 sym/4 pcs) 1 img
Code Along 4
# Load packages # Core library(tidyverse) ## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ── ## ✔ dplyr 1.1.4 ✔ readr 2.1.5 ## ✔ forcats 1.0.0 ✔ stringr 1.5.1 ## ✔ ggplot2 3.5.1 ✔ tibble 3.2.1 ## ✔ lubridate 1.9...
217 sym R (3123 sym/8 pcs) 1 img
Apply it to your own data 3
# Load packages library(tidyverse) library(tidyquant) Get stock prices and convert to returns Ra <- c("XOM", "NVDA", "SNAP","TSLA","WIX") %>% tq_get(get = "stock.prices", from = "2022-01-01") %>% group_by(symbol) %>% tq_transmute(select = adjusted, mutate_fun = periodReturn, p...
190 sym R (3392 sym/11 pcs)
CodeAlong 3 Performance Analysis
# Load packages library(tidyverse) ## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ── ## ✔ dplyr 1.1.4 ✔ readr 2.1.5 ## ✔ forcats 1.0.0 ✔ stringr 1.5.1 ## ✔ ggplot2 3.5.1 ✔ tibble 3.2.1 ## ✔ lubridate 1.9.3 �...
139 sym R (4432 sym/12 pcs)
Code Along 3 Td_Get
#load Packages library(tidyverse) ## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ── ## ✔ dplyr 1.1.4 ✔ readr 2.1.5 ## ✔ forcats 1.0.0 ✔ stringr 1.5.1 ## ✔ ggplot2 3.5.1 ✔ tibble 3.2.1 ## ✔ lubridate 1.9.3 ✔...
117 sym R (2305 sym/13 pcs)