<div dir="ltr"><div class="gmail_default" style="font-size:small;font-family:verdana,sans-serif">Bernado, <br><br></div><div class="gmail_default" style="font-size:small;font-family:verdana,sans-serif">
Veja se isso ajuda.<br></div><div class="gmail_default" style="font-size:small;font-family:verdana,sans-serif">Basicamente, separamos o texto pelo '. ', transforma a primeira letra em minúsculo e depois concatena o texto novamente.<br>
</div><div class="gmail_default" style="font-size:small;font-family:verdana,sans-serif"><br>###<br><span style="font-family:courier new,monospace">texto <- unlist(strsplit(<span style="color:rgb(56,118,29)">'Deus abencoou Noe e seus filhos, e lhes disse: "Sede fecundos, multiplicai-vos, enchei a terra. Sede o medo e o pavor de todos os animais da terra e de todas as aves do ceu, como de tudo o que se move na terra e de todos os peixes do mar: eles sao entregues nas vossas maos. Tudo o que se move e possui a vida vos servira de alimento, tudo isso eu vos dou, como vos dei a verdura das plantas. Mas nao comereis a carne com sua alma, isto e, o sangue. Pedirei contas porem, do sangue de cada um de vos. Pedirei contas a todos os animais e ao homem, aos homens entre si, eu pedirei contas da alma do homem. Quem derrama o sangue do homem pelo homem terra seu sangue derramado. Pois a imagem de Deus o homem foi feito. Quanto a vos, sede fecundos, multiplicai-vos, povoai a terra e dominai-a.'</span>, <span style="color:rgb(56,118,29)">". "</span>, fixed = TRUE))<br>
substring(texto, 1) <- c(tolower(substring(texto, 1,1)))<br>cat(texto, sep=". ")<br></span>###<br><br>Aqui fica falho, quando depois do '.' vem um nome próprio. <br><br></div><div class="gmail_default" style="font-size:small;font-family:verdana,sans-serif">
Abraços<br></div></div><div class="gmail_extra"><br clear="all"><div><div dir="ltr"><font style="font-family:arial,helvetica,sans-serif" face="'comic sans ms', sans-serif"><font><i><span style="font-family:verdana,sans-serif">Att,<br>
Gerson R. Primo Jr</span></i></font><b><br></b><br></font></div></div>
<br><br><div class="gmail_quote">Em 25 de março de 2014 08:48, Rodrigo Coster <span dir="ltr"><<a href="mailto:rcoster@gmail.com" target="_blank">rcoster@gmail.com</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">Bernado,<div><br></div><div>note que ao escrever 'teste' no R, aparece "teste" (ele troca as aspas simples por dupla). Se o texto tem aspas dupla dentro ('teste "teste'), vai aparecer a \ antes dela para diferenciar aquela aspa - que faz parte do texto - das aspas que marcam inicio e fim dela. Mas isso é só no R, ao exportar para fora a \ (e as " do inicio e fim ) somem</div>
</div><div class="gmail_extra"><br><br><div class="gmail_quote">2014-03-25 6:19 GMT-03:00 Bernardo Rangel Tura <span dir="ltr"><<a href="mailto:tura@centroin.com.br" target="_blank">tura@centroin.com.br</a>></span>:<div>
<div class="h5"><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div>On 03/24/2014 08:42 PM, jimmy wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
On Mon, Mar 24, 2014 at 04:29:47PM -0300, Bernardo Rangel Tura wrote:<br>
[...]<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
jimmy,<br>
<br>
Nesta caso a comando ficaria assim: gsub('(?<=\\. )([:upper:])',<br>
'\\L\\1', texto, perl =TRUE) Mas aqui não funcionou ... Onde está o<br>
meu erro ?<br>
</blockquote>
O erro aí foi semântico. Uma classe posix também é uma lista e precisa<br>
ser declarada dentro dos colchetes, ficando '[[:upper:]]', assim:<br>
<br>
gsub('(?<=\\. )([[:upper:]])', '\\L\\1', texto, perl = TRUE )<br>
</blockquote>
<br>
<br></div>
Agora entendi ! Muito obrigado Jimmy.<br>
<br>
Porém ainda tem um problema neste exemplo, existe uma parte que deu erro:<br>
<br>
: "Sede fecundos,<br>
<br>
ficou<br>
<br>
: \"Sede fecundos<br>
<br>
Você sabe dizer porque?<div><div><br>
<br>
[]s<br>
Tura<br>
<br>
<br>
______________________________<u></u>_________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/<u></u>cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-<u></u>guia</a>) e forneça código mínimo reproduzível.<br>
</div></div></blockquote></div></div></div><br></div>
<br>_______________________________________________<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" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br></div>