How can I put vector in R in text-list-input HTML? [closed]

In my shiny app I uses Shinyalert. When I click on some button I get pop-up window of Shinyalert. In this pop-up window I've some text-box input and list-box input. I use HTML to create all the inputs. This is part of my code:

 observeEvent(input[["btn"]], {
    shinyalert(
      title = "my title",
      html = TRUE,
      text = "
<form action="/action_page.php">
  <label for="cars">Choose a car:</label>
  <select name="cars" id="cars">
    <option value="volvo">Volvo</option>
    <option value="saab">Saab</option>
    <option value="opel">Opel</option>
    <option value="audi">Audi</option>
  </select>
</form>"
)})

I've some vector - df$names. I want to create the option value according to df$names. the vector is changes sometimes, so I cant do it line by line. I don't want to use selectInput() because I've more than one inputs in my shinyalert. How can I do it?

from Recent Questions - Stack Overflow https://ift.tt/3AF81AD
https://ift.tt/eA8V8J