I invented some data for your ggplot code and it seems to work fine. Does the following work for you?
library(ggplot2)
LondonWards <- data.frame(x = 1:20, y = 1:20, coefjobindex = sample(1:20))
gwr.point1 <- ggplot(LondonWards, aes(x=x,y=y))+
geom_point(aes(colour=LondonWards$coefjobindex))+
scale_colour_gradient2(low ="red", mid = "white", high = "blue",
midpoint = 0, space = "rgb", na.value = "grey50",
guide = "colourbar", guide_legend(title="Coefs"))
#> Warning: Non Lab interpolation is deprecated
boroughoutline <- data.frame(long = c(2,7,7,2, 2, 11,17,17,11,11),
lat = c(2,2, 12,12,2, 15, 15, 18, 18,15),
id = c(1,1,1,1,1,2,2,2,2,2))
gwr.point1+geom_path(data=boroughoutline,aes(long, lat, group=id), colour="grey")+
coord_equal()

Created on 2020-01-02 by the reprex package (v0.3.0)