create_data_chunk_dialog function

Invoke Shiny gadget to create a data chunk