stock_prices <- read_csv_arrow( file = "prices.csv", as_data_frame = FALSE )