can't able to download pdf with knitr in shiny in R

[Deva]

I can't able to generate PDF report, By default it saving as HTML even after changing the format in .Rmd. I have given the code below which I used, Kindly help me to solve this.

I'm quite new to markdown and R in general.
I am posting here because google searches did not yield any solution regarding this.

Thanks in advance!

Server.R

shinyServer(function(input, output) {
 output$report = downloadHandler(
    filename ='my_report.pdf',
    
    content = function(file) {
      tempReport <- file.path(tempdir(), "test.Rmd")
      file.copy("test.Rmd", tempReport, overwrite = TRUE)
      
      library(rmarkdown)
      
      rmarkdown::render(tempReport, output_file = file,
                        params = input,
                        envir = new.env(parent = globalenv())
      )
    }
  )
 })

Ui.R

library(shiny)

shinyUI(basicPage(
 downloadButton('report')
))

test.Rmd

---
title: "Dynamic report"
output: pdf_document
params:
  n: NA
---

```{r}
# The `params` object is available in the document.
input$farmer_id

[cderv]

Hi, please can you format your post correctly ?

FAQ: How to format your code

Formatting Code: the Basics All code or console output you include in your posts should be formatted properly. Luckily, this is very easy to do! Just use the code formatting button at the top of the post editing box: [image] Select some code Click the </> button! The code formatting button automatically adds special Markdown formatting symbols to whatever you selected. If you check the preview pane to the right of your post, you'll see that the forum software now outputs nicely formatted code . [04] The code formatting button is pretty smart! It can tell the difference between snippets of code that are part of a sentence and blocks of code that stand alone. …

Thank you !