Чтение заголовков из файла csv, хранящегося на S3 в R

Я пытаюсь прочитать заголовки из файла csv, который хранится на s3. Я пробовал несколько способов сделать это. Но все мои методы загружают csv из s3 локально в R, а затем читают заголовок. Это не эффективный способ сделать.

Мои попытки:

dt <- aws.s3::s3read_using(FUN = fread(headers=T,nrows = 1),
                     bucket = "bucket_name/path/,
                     object = "abc.csv"))
cols <- colnames(dt)

Вторая попытка:

  # Getting file locally and then reading headers.
  system(paste("s3cmd get --force -v ", s3Path, s3FileName, " ", s3FileName, sep = ""))
  df <- data.table::fread(s3FileName, ...)
  cols <- colnames(df)

Я знаю, что может быть какой-то эффективный способ сделать это. Любые предложения будут действительно оценены. Я специально хочу сделать это в R.