Prospekt addCircleMarkers Radius R

Question

ich ein "Problem" mit einem Radius in Faltblatt addCircleMarkes haben

Beispiel-Datensatz:

lat long number 
-  -  4 
-  -  26 
-  -  13 
-  -  40 
-  -  30 

i den Radius des Kreises Markierungen in der Karte ändern mit radius = ~ifelse(data$number <=25, 2, ifelse((data$number > 25 & data$number <=50),4,6)) (verschachtelte if) nicht Problem damit, aber ich denke, es gibt noch einen "eleganteren" Weg.

I kann nicht herausfinden, wie man automatisch eine Reihe von Zahlen, beispielsweise erzeugen [0-25] = 2 [26 - 50] = 4 und [51 - mehr] = 6 und vergleichen:

Wenn die Daten $ -Nummer in einem bestimmten Bereich liegt, geben Sie im Radius die Nummer ein, die mit diesem Bereich verknüpft ist.

Das ursprüngliche Dataset haben Zahlen zwischen 1 und 1500, so dass meine eigentliche Form es nicht zu viel hilft.

Vielen Dank im Voraus

Answer 1

radius <- findInterval(exampledataset$number,c(25,50,1500)) * 2 

Fügen Sie diese als eine Spalte auf Ihren SpatialPointsDataFrame, weisen Sie dann, wenn der Radius in Faltblatt.