Added Chrolopleth map to the Heat Map dialog

[EstherNjeriLiberatta]

Fixes #6782
In this PR I have made a few adjustments to the heatmap dialogue and added a choropleth map option as another button.
To test the choropleth map use the data set below.
mydata.csv

@rdstern @africanmathsinitiative/developers This is ready for review.

[lloyddewit]

@N-thony Please could you review? thanks

[EstherNjeriLiberatta]

Thankyou @N-thony , I've made some of the changes you requested, kindly review. Thanks

[N-thony]

Thankyou @N-thony , I've made some of the changes you requested, kindly review. Thanks

@EstherNjeriLiberatta, we can have a quick call on this when you have time.

[EstherNjeriLiberatta]

@N-thony thank you for your help so far on this dialogue.
The issue I'm having now is making the labels and points clearer. As of now, the choropleth map creates a map however with the addition of points and/or labels they seem to be messed up and clustered along the borders of each region. @rdstern has suggested having one point for each region from the Alabama dataset which will help with that. The images below give a description of how the dialogue and the map look without and with the Add labels checked respectively.
@HawardKetoyoMsatsi please could you help me out on this? Thank you.

[shadrackkibet]

@HawardKetoyoMsatsi happy to take over?

[HawardKetoyoMsatsi]

@shadrackkibet yes I will fix this.

[EstherNjeriLiberatta]

@HawardKetoyoMsatsi Thank you for helping out on this, I'll work with you to know how you fix the problem I was having.

[HawardKetoyoMsatsi]

@EstherNjeriLiberatta I have managed to fix this error in R. Since you had already written the vb code once you have time we can add the R-code I wrote into your vb code together.

[EstherNjeriLiberatta]

Thank you, @HawardKetoyoMsatsi Getting to you on skype.

[HawardKetoyoMsatsi]

@EstherNjeriLiberatta How far with this task, Have you been able to add the R code I gave you in R-Instat.

[EstherNjeriLiberatta]

Hello @lilyclements when running the code below I get the following error. What could the problem be in the code?

# Code generated by the dialog, Heat Map

mydata1 <- data_book$get_data_frame(data_name="mydata1")
cnames <- aggregate(cbind(x=long, y=lat) ~ murder, data=mydata1, FUN=function(x)  mean(range(x)))
last_graph <- ggplot2::ggplot(data=mydata1, mapping=ggplot2::aes(x=long, y=lat, fill=murder)) + ggplot2::geom_polygon(mapping=ggplot2::aes(group=group)) + ggplot2::geom_point(data=cnames, mapping=ggplot2::aes(size=murder, x=long, y=lat)) + theme_grey()
data_book$add_graph(graph_name="last_graph", graph=last_graph, data_name="mydata1")
data_book$get_graphs(data_name="mydata1", graph_name="last_graph")
rm(list=c("last_graph", "mydata1", "cnames"))

[lilyclements]

@EstherNjeriLiberatta the error says "object 'long' not found".

You use "long" in the cbind function, and do not call it from the data frame. Can you show me all of the R output for this code? I am just wondering if you run long <- data_book$get_variables_from_data(...) or whichever the function is!

[EstherNjeriLiberatta]

@lilyclements here is the R output

[lilyclements]

Great, so you want to call long <- data_book$get_columns_from_data(...). To do this, you just have to run in the dialog code ucrSelectorLong.SetParameterIsRFunction, and similarly for the latitude selector.

[EstherNjeriLiberatta]

Okay, thank you so much

[EstherNjeriLiberatta]

@N-thony @africanmathsinitiative/developers This is ready for review.

[lloyddewit]

@EstherNjeriLiberatta Thank you for the changes.
Please could you also look at the 2 unresolved comments from 10 July (see unresolved comments above)
Thanks

[EstherNjeriLiberatta]

@lloyddewit I hope I have resolved all the requested changes from you and @N-thony, thank you so much.
This is ready for review.

[lloyddewit]

@EstherNjeriLiberatta This is looking really good, you've made some good quality improvements since the first commits.

I think we're very nearly ready to merge, just a couple of final questions.
Thank you for your patience

[EstherNjeriLiberatta]

@lloyddewit Thank you, I have made the changes.

[lloyddewit]

@rdstern There are significant changes since your last approval. If you can test/approve again, then we can merge, thanks