See example for the element order in the vectors :
inpboxe1.png
To get the menu, just use the following code:
vlabel<-'matrix'inp<-'M'ans<-inpboxe1(vlabel,inp)
References
Lawrence M.F.,Verzani J., (2012) Programming Graphical User Interfaces in R,CRC Press Taylor & Francis Group