Creates a shinyUI to be able to run crsiprseekplus interactively.
cspUI()
the panel for the UI;
cspUI
x<-cspUI()