# Load packages
library(tidyverse)
library(tidyquant)
# Choose stocks
symbols <- c("WMT", "F", "APPL")
prices <- tq_get(x = symbols,
get = "stock.prices",
from = "2012-01-01",
to = "2017-01-01")
Apple(APPL) has the highest return between the three of APPL,F,WMT. And it will continue to have the highest return for times to come.
Hide the code, messages, and warnings