R Shiny: может получить доступ к файлу в выводе $ pdfview, но получил ошибку {HTTP-статус «401 Unauthorized»} на download.file того же pdf

Question

Я разрабатываю блестящее приложение, в котором пользователь может загрузить файл PDF (хранится на облачном диске). При нажатии на кнопку загрузки файла отобразится предварительный просмотр файла PDF, а затем внизу есть кнопка загрузки, которая загрузит показанный файл. PDF. PDF успешно загружается в своем предварительном просмотре (вывод $ pdfview), но не удается нажать кнопку загрузки (вывод $ download). В обоих местах я использую один и тот же URL, но получаю сообщение об ошибке "не удается открыть URL-адрес" https:xxxxx.pdf ': статус HTTP был "401 Unauthorized" на загрузке. Пожалуйста, найдите код ниже:

output$pdfview <- renderUI({
                     tags$iframe(style="height:800px; width:100%; scrolling=yes",src=paste0("https:xxxxx.pdf"))
                   })

temp<-fs::file_temp("mytempfile", tmp_dir = "/home/xx/" , ext = ".pdf")

output$download<- downloadHandler(
                     download.file(paste0("https://xxxx.pdf"),temp,mode="wb"),
                     content = function(file) {
                       file.copy(temp, file)
                     }
                   )