DestroyKafkaConsumer <- function(consumer.base.uri) {
  response <- DELETE(url = consumer.base.uri,
         content_type("application/vnd.kafka.v2+json"))
  if(response$status_code == 204) {
    return(TRUE)
    } else stop(response)
}