# NOT RUN {
library(tidyquant)
library(tidyverse)
lookup_table <- tibble(
stock = c("FB", "AMZN", "NFLX", "GOOG"),
company = c("Facebook", "Amazon", "Netflix", "Google")
)
# --- Basic Usage ---
VLOOKUP("NFLX",
.data = lookup_table,
.lookup_column = stock,
.return_column = company)
# --- Usage with tidyverse ---
# Add company names to the stock data
FANG %>%
mutate(company = VLOOKUP(symbol, lookup_table, stock, company))
# }
Run the code above in your browser using DataCamp Workspace