## Not run: geotext(deg,z=z) # plot text at points deg$lat,deg$lon
#
# geotext(deg$lat,deg$lon,z,csi=0.06) # Same, size of text 0.06".
#
# geotext(x$x,x$y,x$z,aftertext="km",pretext="distance")
# # If geopar$projection="none"
#
# geotext(x,z=x$z,aftertext=" km",pretext="distance",angle =90)
# # Same text written vertically.
#
#
# ###############################################################
# # Example #
# ###############################################################
#
# lon <- rnorm(10,-27,1.3)
# lat <- rnorm(10,65,0.6)
# # Make a normal dist. random set of 10 points.
#
# geoplot(lat=lat,lon=lon,grid=F,xlim=c(-22,-30),ylim=c(63,67))
# # Plot the random data points.
#
# geopolygon(island,col=115,exterior=T)
# geolines(island)
# # Color Iceland. Use litir(number) to see colour scheme.
# # Sharpen lines around Iceland.
#
# num <- 1:10
# lab <- paste("Nr.",num,sep="")
# # Make string vector with "Nr.1".."Nr.10" for geotext.
#
# geopoints(lat,lon,pch="*",col=5)
# # Redraw the data in a new color the * mark at points.
#
# geotext(lon=lon,lat=lat,z=lab,col=155)
# # With geotext we put one element from lab at each data point.
# title(main="10 Random Data Point")
# # Add title
# ## End(Not run)
Run the code above in your browser using DataLab