title: Adjusting the width of the datatable using DT in R
body: <p>This is a script for a data table that is created in R shiny.I am trying to fit the plot within the box completely by adjusting the width of the plot. Below is the script of the plot along with the box in which I am trying to fit. Please help me to adjust the width of the plot produced using datatable. Also, I don't want to increase the width of the box. A link to apossible solution would be of great help. Thanks.</p>
  
  <p><strong>Script for datatable:</strong></p>
  
  <pre><code>r3_blood = subset(patient, handling == "Blood test" &amp; employee == "r3")
    datatable(r3_blood, options = list(
      searching = FALSE,
      pageLength = 5,
      lengthMenu = c(5, 10, 15, 20)
    ))
  </code></pre>
  
  <p><strong>Script to fit table in box:</strong></p>
  
  <pre><code>box( title = "Case Summary", status = "primary", height = 
    "575",solidHeader = T, 
                            dataTableOutput("sankey_table"))
  </code></pre>
  
  <p><a href="https://i.stack.imgur.com/2dSZH.png" rel="noreferrer"><img src="https://i.stack.imgur.com/2dSZH.png" alt="DataTable"></a></p>