search for: batimetria

Displaying 4 results from an estimated 4 matches for "batimetria".

Did you mean: asimetria
Plotting a kriging on a map
2008 Dec 04
2
Plotting a kriging on a map
...odrigos/Kriging.jpg (but without the top right area, just the different grayscale kriging area). library(xlsReadWrite) library(maps) library(mapdata) library(maptools) Pontos<-read.xls('Pontos.xls',sheet=1,rowNames=T) Prof<-read.xls('Pontos.xls',sheet=2,rowNames=T) Batimetria<-readShapeSpatial(‘Batimetria.shp') Municipios<-readShapeSpatial('Municipios.shp') Recifes<-readShapeSpatial('Recifes.shp') par(mar=c(4,0,0,0)) map('worldHires','brazil',ylim=c(,),xlim=c(,),type='n') plot(Batimetria,ylab='',xlab='...
North Arrow (.png file) on a Map
2009 Mar 10
1
North Arrow (.png file) on a Map
...Pontos Amostrais Dados<-odbcConnectExcel(''Campos.xls'',readOnly=T) Coord<-sqlFetch(Dados,''CoordMed'',colnames=F,rownames=''Ponto'') odbcClose(Dados) N<-pixmap(''Norte.png'',nrow=166,ncol=113) # Carregar pontos e shapes Batimetria<-readShapeSpatial(''C:/Users/Rodrigo/Documents/UFPR/Micropaleontol ogia/Campos/ShapeFiles/Batimetria_BC.shp'') Estados<-readShapeSpatial(''C:/Users/Rodrigo/Documents/UFPR/Micropaleontologi a/Campos/ShapeFiles/Estados_Sudeste.shp'') Faciologia<-readShapeSpa...
Text Contrast in a Plot
2009 Apr 24
3
Text Contrast in a Plot
...g',width=5.2,height=3.6,pointsize=5,units='in',bg=NA,restoreC onsole=T,res=1200) par(mar=c(5,0,0,0)) map('worldHires','brazil',ylim=c(-5.15,-4.55),xlim=c(-37,-36.1),type='n') rect(-37.1,-5.25,-36,-4.9,density=NULL,angle=45,col='#dbf4ff',border=F) plot(Batimetria,ylab='',xlab='',border=F,col=Cor$Cor,add=T) plot(Municipios,ylab='',xlab='',col=rgb(245,232,140,max=255,alpha=255),add=T ,lwd=0.2) axis(1,xaxp=c(-37,-36.1,5),cex.axis=1.5) axis(2,yaxp=c(-5.15,-4.55,5),cex.axis=1.5) text(Prof$Long,Prof$Lat,rownames(Prof),col='...
Bubble Plot Over a Map
2009 May 07
1
Bubble Plot Over a Map
...9;)[i],width=5.2,height=3.6,pointsize =5,units='in',bg=NA,restoreConsole=T,res=1200) par(mar=c(5,0,0,0)) map('worldHires','brazil',ylim=c(-5.15,-4.55),xlim=c(-37,-36.1),type='n') rect(-37.1,-5.25,-36,-4.9,density=NULL,angle=45,col='#dbf4ff',border=F) plot(Batimetria,ylab='',xlab='',border=F,col=Cor$Cor,add=T) plot(Municipios,ylab='',xlab='',col=rgb(245,232,140,max=255,alpha=255),add=T ,lwd=0.2) axis(1,xaxp=c(-37,-36.1,5),cex.axis=1.5) axis(2,yaxp=c(-5.15,-4.55,5),cex.axis=1.5) text(Prof$Long,Prof$Lat,rownames(Prof),col='...