First part of PA.  ui.R and server.R committed.