Display only available levels of variables when filtering reactive DT

[olen_ki]

Is it possible to show only available values for variable "Transmission" in the example below?

For instance, if I select value 'audi' for the variable 'Manufacturer', than unavailable 'Transmission' types (as autol4) should be disabled to avoid the following output without any data shown. So, I would put something like:

if (input$trans != "All") {
      data <- data[data$trans == input$trans & data$manufacturer == input$man ,]
    }

but I don't know how to wrap it in a reactive mode.

Thanks for your help!