mostly working Data layers/scores visualization down to category and year. TODO: implement renderUI so faster and without interim error messages "Error in names(choices) <- choiceNames : attempt to set an attribute on NULL".
working Report : tables with flowers for html report generation