…pch=21, bg=addTrans(«purple»,100)) Fn = ecdf(childcare.house[,«TOTSPACE»]) childcare.house$TOTSPACE.pct = as.ff(Fn(childcare.house[,«TOTSPACE»])) mymap = MapBackground(lat=childcare.house[,»Lat»], lon=childcare.house[,»Long»]) PlotOnStaticMap(mymap, childcare.house[,»Lat»], childcare.house[,»Long»], cex=childcare.house[,«TOTSPACE.pct»]*4, pch=21, bg=addTrans(«purple»,100)) Fn = ecdf(childcare.community[,«TOTSPACE»]) childcare.community$TOTSPACE.pct = as.ff(Fn(childcare.community[,«TOTSPACE»])) mymap = MapBackground(lat=childcare.community[,»Lat»], lon=childcare.community[,»Long»]) PlotOnStaticMap(mymap, childcare.community[,»Lat»],…