<div dir="ltr"><div class="gmail_default" style="font-family:verdana,sans-serif">Rodrigo,</div><div class="gmail_default" style="font-family:verdana,sans-serif"><br></div><div class="gmail_default" style="font-family:verdana,sans-serif">Ao importar o shape ele se torna um objeto da classe sp (SpatialLines ou SpatialLinesDF). A partir daí vc pode isolar as linhas e definir o padrão ao usar plot(). Para tracejado use o argumento lty=2 ou 3.</div><div class="gmail_default" style=""><div class="gmail_default" style=""><font face="verdana, sans-serif"><br></font></div><div class="gmail_default" style=""><div class="gmail_default"><font face="monospace, monospace"># <code r></font></div><div class="gmail_default"><font face="monospace, monospace"># <a href="http://mapas.mma.gov.br/i3geo/datadownload.htm">http://mapas.mma.gov.br/i3geo/datadownload.htm</a></font></div><div class="gmail_default"><font face="monospace, monospace">fn <- paste0("<a href="http://mapas.mma.gov.br/ms_tmp/estadosl_2007">http://mapas.mma.gov.br/ms_tmp/estadosl_2007</a>", c(".shp", ".dbf", ".shx"))</font></div><div class="gmail_default"><font face="monospace, monospace">for (i in fn) download.file(i, basename(i), mode="wb")</font></div><div class="gmail_default"><font face="monospace, monospace"><br></font></div><div class="gmail_default"><font face="monospace, monospace">require(maptools)</font></div><div class="gmail_default"><font face="monospace, monospace">est     <- readShapeLines("estadosl_2007")</font></div><div class="gmail_default"><font face="monospace, monospace">est.pol <- readShapePoly("estadosl_2007")</font></div><div class="gmail_default"><font face="monospace, monospace">str(est, max=2)</font></div><div class="gmail_default"><font face="monospace, monospace">est@data</font></div><div class="gmail_default"><font face="monospace, monospace">est@data[c(7,9,12,13),]</font></div><div class="gmail_default"><font face="monospace, monospace"><br></font></div><div class="gmail_default"><font face="monospace, monospace">plot(est, lty=2)</font></div><div class="gmail_default"><font face="monospace, monospace">lines(est[c(7,9,12,13),], col=2, add=T)</font></div><div class="gmail_default"><font face="monospace, monospace"># plot(est.pol[c(7,9,12,13),], col=2, add=T)</font></div><div class="gmail_default"><font face="monospace, monospace"># </code></font></div></div><div class="gmail_default" style=""><br></div></div><div class="gmail_extra"><br clear="all"><div><div class="gmail_signature" data-smartmail="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><span><br>================================================<br>Éder Comunello<br>Researcher at Brazilian Agricultural Research Corporation (Embrapa)<br>DSc in Agricultural Systems Engineering (USP/Esalq)<br>MSc in Environ. Sciences (UEM), <span>Agronomist (UEM)</span><br>---<br>Embrapa Agropecuária Oeste, Dourados, MS, Brazil |<O>|<br>================================================<br>GEO, -22.2752, -54.8182, 408m<br>UTC-04:00 / DST: UTC-03:00</span><div><div><div><br></div><div><br></div></div><div style="font-size:small"><br></div></div></div></div></div></div></div></div></div></div></div></div></div>
<br><div class="gmail_quote">Em 3 de agosto de 2016 21:05, Rodrigo Plei via R-br <span dir="ltr"><<a href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a>></span> escreveu:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr">Prezados,<div><br></div><div>Tenho um shapefile que contém os dados da linha de costa e de batimetrias (100 a 500 m).<br><br>Eu uso o pacote "maptools" para plotar o mapa nos limites que eu quero, que obviamente acaba plotando tudo o que está no shapefile em linha contínua.</div><div><br></div><div>Gostaria de saber:</div><div><br></div><div>1 - se há como plotar a linha de costa em traço contínuo e as batimetrias tracejadas</div><div><br></div><div>2 - se há como escolher somente uma das batimetrias (digamos, a de 200 m) para ser plotada (tracejada obviamente) no mesmo mapa.</div><div><br></div><div>------------------------------<wbr>------------------------------<wbr>------------------------------<wbr>------------<br>CRM:<br><br>setwd("C:\\ ...") # diretório onde está o shapefile</div><div><br></div><div>mapa <- readShapeLines("nome_do_<wbr>shapefile.shp")</div><div><br></div><div>plot(mapa, xlim =c(-48, -44), ylim = c(-26.5, - 23), axes = TRUE, cex.axis=1.2)</div><div>------------------------------<wbr>------------------------------<wbr>------------------------------<wbr>---------------<br><br>Não dá para mandar o shapefile porque é muito grande, mas pelo CRM dá para visualizar o que eu fiz e o que eu gostaria de fazer.</div><div><br></div><div>Agradeço desde logo,</div><div><br></div><div>Rodrigo <br><br clear="all"><div><br></div>-- <br><div data-smartmail="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr">=8-->=8-->=8-->=8-->=8-->=8--><wbr>=8-->=8-->=8-->=8-->=8-->=8--><br><br>Prof. Dr. Rodrigo Silvestre Martins<br><br><div>Universidade Federal de São Paulo</div><div>Instituto do Mar</div><div>Campus Baixada Santista</div><div><div>Rua Dr. Carvalho de Mendonça, 144</div><div>Encruzilhada, 11070100, <span style="font-size:12.8px">Santos, SP - Brasi</span><span style="font-size:12.8px">l</span></div></div><div>Tel: + 55  13 3229-<span style="font-size:12.8px">0365</span> </div><div><br></div><a href="http://www.unifesp.br/campus/san7/graduacao/cursos/bacharelado-interdisciplinar-em-ciencia-e-tecnologia-do-mar" target="_blank">http://www.unifesp.br/campus/<wbr>san7/</a><br><br>Email: <a href="mailto:rodrigo.plei@gmail.com" target="_blank">rodrigo.plei@gmail.com</a> ; <a href="mailto:ocersm@lycos.com" target="_blank">ocersm@lycos.com</a>; <a href="mailto:rsmartins@usp.br" target="_blank">rsmartins@usp.br</a>; <a href="mailto:rsmartins@unifesp.br" target="_blank">rsmartins@unifesp.br</a><br>CV Lattes: <a href="http://lattes.cnpq.br/5350064124902777" target="_blank">http://lattes.cnpq.br/<wbr>5350064124902777</a><br>Google Scholar: 
<a href="http://scholar.google.com.br/citations?user=zX_EezEAAAAJ&hl=pt-BR" target="_blank">http://scholar.google.com.br/<wbr>citations?user=zX_EezEAAAAJ&<wbr>hl=pt-BR</a></div><div dir="ltr">Orcid: <a href="http://orcid.org/0000-0002-9884-1515" target="_blank">http://orcid.org/0000-0002-<wbr>9884-1515</a></div><div dir="ltr">Research Gate: <a href="https://www.researchgate.net/profile/Rodrigo_Martins6/?ev=hdr_xprf" target="_blank">https://www.<wbr>researchgate.net/profile/<wbr>Rodrigo_Martins6/</a><div><br><br><br><br><br><br><br></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div>
</div></div>
<br>______________________________<wbr>_________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/<wbr>cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-<wbr>guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br></div></div>