Improvements to Describe > Graph > Scatterplot

[derekagorhom]

Fixes Partly #8800 Replaces #8927 This PR fixes parts e, f, and g. This PR is ready for review. @fran2or, @rdstern.

[rdstern]

@derekagorhom thanks for working on this. That's progress. Here is the dialog now:

a) Could the group box for the point, count and jitter be a bit narrower. Ot doesn't need to go right to the edge of the dialog. b) Very small, but the control saying Identity, seems a bit lower. Could you check the laignment. c) The Colour control is not yet giving the colours. Please change it to the Colour options. d) I haven;t checked the coding change I requested in point g) Could you please confirm that you made the change.

Then I'm looking forward to the rest. I'm excited by being able to add the Side plots.

[derekagorhom]

@rdstern I have made the code changes for the item g) when the user checks either the shape or size or both there will appear in the geom_point() otherwise they will not appear there. see below when the checkboxes are ticked survey <- data_book$get_data_frame(data_name="survey") last_graph <- ggplot2::ggplot(data=survey, mapping=ggplot2::aes(colour=variety, y=yield, x=fert)) + ggplot2::geom_point(size=2.2, shape="square") + theme_grey() + ggplot2::facet_wrap(facets= ~ village) data_book$add_object(data_name="survey", object_name="last_graph", object_type_label="graph", object_format="image", object=check_graph(graph_object=last_graph)) data_book$get_object_data(data_name="survey", object_name="last_graph", as_file=TRUE) rm(list=c("last_graph", "survey"))

and when the checkboxes are not ticked survey <- data_book$get_data_frame(data_name="survey") last_graph <- ggplot2::ggplot(data=survey, mapping=ggplot2::aes(colour=variety, x=fert, y=yield)) + ggplot2::geom_point() + theme_grey() + ggplot2::facet_wrap(facets= ~ village) data_book$add_object(data_name="survey", object_name="last_graph", object_type_label="graph", object_format="image", object=check_graph(graph_object=last_graph)) data_book$get_object_data(data_name="survey", object_name="last_graph", as_file=TRUE) rm(list=c("last_graph", "survey"))

[rdstern]

@derekagorhom here is a snapshot:

Could you change Colour Optionto just Colour. And can you see that currently these are not colours. They should offer the same colour options as in the sub-dialog for the Count.

[derekagorhom]

@rdstern I have made the change can you review this again Thanks

[rdstern]

@derekagorhom looks good. Is there a reason for omitting the Pick Colour option from the list on the dialog? It is on the sub-dialog.

[derekagorhom]

@rdstern apologies I thought i had added that option along with the other colours