I would like to label Voronoi polygons with point attributes (in this case, station name and station number). To create Voronoi polygons, I used the function from this topic.
My station data file (shapefile) is in here.
pts <- readOGR(dsn = ".", layer="rainfallStations")
thiessen.pol <- voronoipolygons(pts)
proj <- CRS('+proj=longlat +ellps=WGS84')
proj4string(thiessen.pol) <- proj