search for: catmethod

Dear David, Thank you for your answer. Sorry for the embarrassing mistake. However, even with when I generate a map for the whole world using: eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) And then use: do.call(addMapLegend, c(eps, legendLabels="none", arrows(-100,-140,100,-140,code=3))) Only a legend with the colours is generated, no arrows. My session info is below. Thanks again! R version...

...he list Dear Jim, Thank you for your reply. I must be doing something wrong, If this is my command to plot a map of Europe: eps_europe <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score - Europe",colourPalette=colourPalette, catMethod="fixedWidth", missingCountryCol = "white", mapRegion="Europe", addLegend=FALSE) The following command does not seem to add the arrow. What am I doing wrong? do.call(addMapLegend, c(eps_europe, legendLabels="none", arrows(-100,-140,100,-140,code=3))) Thank...

...for your answer. Sorry for the embarrassing mistake. However, even with when I generate a map for the whole world using: >> >> eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, >> catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) >> >> And then use: >> >> do.call(addMapLegend, c(eps, legendLabels="none", arrows(-100,-140,100,-140,code=3))) > > I do get an arrow using same version of R and OSX. See attac...

...barrassing mistake. > However, even with when I generate a map for the whole world using: > >>> > >>> eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS > Score",colourPalette=colourPalette, > >>> catMethod="fixedWidth", missingCountryCol = > "white", addLegend=FALSE) > >>> > >>> And then use: > >>> > >>> do.call(addMapLegend, c(eps, legendLabels="none", > arrows(-100,-140,100,-140,code=3))) > >> > >>...

...Thank you for your answer. Sorry for the embarrassing mistake. However, even with when I generate a map for the whole world using: > > eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, > catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) > > And then use: > > do.call(addMapLegend, c(eps, legendLabels="none", arrows(-100,-140,100,-140,code=3))) I do get an arrow using same version of R and OSX. See attached. (I think that png ima...

...ake. > However, even with when I generate a map for the whole world using: > > >>> > > >>> eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS > Score",colourPalette=colourPalette, > > >>> catMethod="fixedWidth", missingCountryCol = > "white", addLegend=FALSE) > > >>> > > >>> And then use: > > >>> > > >>> do.call(addMapLegend, c(eps, legendLabels="none", > arrows(-100,-140,100,-140,code=3))) > &g...

...k you for your reply. I must be doing something wrong, If this is my > command to plot a map of Europe: > > eps_europe <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS > Score - Europe",colourPalette=colourPalette, > catMethod="fixedWidth", missingCountryCol = > "white", mapRegion="Europe", addLegend=FALSE) > > The following command does not seem to add the arrow. What am I doing wrong? > > do.call(addMapLegend, c(eps_europe, legendLabels="none", > arrows(-100,-...

...for the embarrassing mistake. However, even with when I generate a map for the whole world using: > >>> > >>> eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, > >>> catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) > >>> > >>> And then use: > >>> > >>> do.call(addMapLegend, c(eps, legendLabels="none", arrows(-100,-140,100,-140,code=3))) > >> > >> I do get...

...nswer. Sorry for the embarrassing mistake. However, even with when I generate a map for the whole world using: >>> >>> eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, >>> catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) >>> >>> And then use: >>> >>> do.call(addMapLegend, c(eps, legendLabels="none", arrows(-100,-140,100,-140,code=3))) >> >> I do get an arrow using same version...

Dear Jim, Thanks again! I do want the arrows at the bottom (beneath the map). This is what I am doing: # Draw the map eps_europe <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score - Europe",colourPalette=colourPalette, catMethod="fixedWidth", missingCountryCol = "white", mapRegion="Europe", addLegend=FALSE) # ISO3 codes on the map text(n, labels="ISO3", cex=0.30) # Obtain coordinates for the arrow par('usr') # -19.75966 54.75966 33.60000 71.40000 # Arrows par(xpd=TRUE)...

...ssing mistake. However, even with when I generate a map for the whole world using: > > >>> > > >>> eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, > > >>> catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) > > >>> > > >>> And then use: > > >>> > > >>> do.call(addMapLegend, c(eps, legendLabels="none", arrows(-100,-140,100,-140,code=3))) > > >&gt...

...oinColumn="iso3") n <- n[-which(row.names(n)=='Antarctica'),] # EPS colourPalette <- rev(brewer.pal(7, "RdYlGn")) eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS Score",colourPalette=colourPalette, catMethod="fixedWidth", missingCountryCol = "white", addLegend=FALSE) do.call(addMapLegend, c(eps, legendLabels="all", legendWidth=0.5)) Instead of adding numeric based legend, I would like to add a two-headed arrow with some text. I would be grateful for any help. Thank you!...

...er, even with when I generate a map for the whole world using: > > > >>> > > > >>> eps <- mapCountryData(n, nameColumnToPlot="eps_score", > mapTitle="EPS Score",colourPalette=colourPalette, > > > >>> catMethod="fixedWidth", missingCountryCol = > "white", addLegend=FALSE) > > > >>> > > > >>> And then use: > > > >>> > > > >>> do.call(addMapLegend, c(eps, legendLabels="none", > arrows(-100,-140,100,-1...

...t the arrows at the bottom (beneath the map). This > is > > what I am doing: > > > > # Draw the map > > eps_europe <- mapCountryData(n, nameColumnToPlot="eps_score", > mapTitle="EPS > > Score - Europe",colourPalette=colourPalette, > > catMethod="fixedWidth", missingCountryCol = "white", mapRegion="Europe", > > addLegend=FALSE) > > > > # ISO3 codes on the map > > text(n, labels="ISO3", cex=0.30) > > > > # Obtain coordinates for the arrow > > par('usr'...

...;- n[-which(row.names(n)=='Antarctica'),] > > # EPS > colourPalette <- rev(brewer.pal(7, "RdYlGn")) > > eps <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS > Score",colourPalette=colourPalette, > catMethod="fixedWidth", missingCountryCol = "white", > addLegend=FALSE) > do.call(addMapLegend, c(eps, legendLabels="all", legendWidth=0.5)) > > Instead of adding numeric based legend, I would like to add a two-headed > arrow with some text. I would be grateful fo...

...ar Jim, > > Thanks again! I do want the arrows at the bottom (beneath the map). This is > what I am doing: > > # Draw the map > eps_europe <- mapCountryData(n, nameColumnToPlot="eps_score", mapTitle="EPS > Score - Europe",colourPalette=colourPalette, > catMethod="fixedWidth", missingCountryCol = "white", mapRegion="Europe", > addLegend=FALSE) > > # ISO3 codes on the map > text(n, labels="ISO3", cex=0.30) > > # Obtain coordinates for the arrow > par('usr') > > # -19.75966 54.75966...

Hi Milu, I just realized that by "the bottom of the map" you may mean "beneath the map", in which case you should use: par(xpd=TRUE) arrows(...) par(xpd=FALSE) Jim On Mon, Apr 11, 2016 at 11:50 PM, Miluji Sb <milujisb at gmail.com> wrote: > Dear David, > > Thank you very much for your replies! I didn't know about par('usr'). > > I get

...p). This >> > is >> > what I am doing: >> > >> > # Draw the map >> > eps_europe <- mapCountryData(n, nameColumnToPlot="eps_score", >> > mapTitle="EPS >> > Score - Europe",colourPalette=colourPalette, >> > catMethod="fixedWidth", missingCountryCol = "white", mapRegion="Europe", >> > addLegend=FALSE) >> > >> > # ISO3 codes on the map >> > text(n, labels="ISO3", cex=0.30) >> > >> > # Obtain coordinates for the arrow &gt...