Importing xlsm & blinking circilemarkers

On Thu, 17 Mar 2022, sownal chand wrote:

Hello sir/madam,

I have a macro-enabled excel file and wanted to import the data that this
file automatically grabs everytime the macro is run. Are there any

packages

for macro-enabled excel?

No idea, sounds like something for shiny, which I avoid. Interactive
graphics are very hard to do right at the best of times.

I have written some codes using a leaflet package and was trying to set
criteria for circle markers that if the Rainfall value is in the ranges

the

color of the markers would change and start blinking. Given for green
0-20mm, yellow - 20-30mm, orange- 30-50mm, red- >= 50mm.

library(sf)
rainfall <- st_as_sf(read.csv("RainfalSample.csv"), coords=c("Long",
  "Lat"), crs="OGC:CRS84")
library(tmap)
tmap_mode("view")
tm_shape(rainfall) + tm_symbols(size=0.0025, col="Rainfall.mm.",
  style="fixed", breaks=c(0, 20, 30, 50, Inf), pal=c("green", "yellow",
  "orange", "red"))

may be fairly close. tmap is a package using leaflet internally, mapview
is another such package. Many of the symbols overlap, so are not very
legible.

Hope this helps,

Roger

Given below is the code and sample data
library(sf)
library(leaflet)

#Make Leaflet map with markers
leaflet() %>%
 addTiles() %>%
 addCircleMarkers(lat = rainfall$Latitude,
                  lng = rainfall$Longitude)

# Add Data for rainfall
col_pal <- colorNumeric(palette = "viridis",
                       domain = rainfall$rainfall)

#adding content to the popups
#Make map with colors with markers
Map<- leaflet() %>%
 addTiles() %>%
 addCircles(lat = Rainfall$Latitude,
          lng = Rainfall$Longitude,
          color = col_pal(Rainfall_plots$Rainfall),
          radius = 2000,
         fillOpacity = 0.8,
         label =  Rainfall_plots$rainfall) %>%
addLegend(position = "bottomleft", pal = col_pal, values =
Rainfall_plots$rainfall, title = "Rainfall Indicator")

Map

********************************************************************************************************

The code is correct, some ideas to set up criterias for the rainfall

amount

would really be appreciated. And possibly the codes as well would be

really

wonderful. Also attached is the sample data in csv format

Thanking you in advance
Sownalc

--
Roger Bivand
Emeritus Professor
Department of Economics, Norwegian School of Economics,
Postboks 3490 Ytre Sandviken, 5045 Bergen, Norway.
e-mail: Roger.Bivand at nhh.no
https://orcid.org/0000-0003-2392-6140
https://scholar.google.no/citations?user=AWeghB0AAAAJ&hl=en