Magic Square solution in 'R' (shiny app)