add shiny application for factor analysis