<div>#Caros colegas,</div><div>#minha duvida é uma implementação para gerar uma malha da seguinte forma:</div><div># 1) Imaginem que tenho um poligono como esse?</div><div>x <- c(-0.512320711, -0.503592775, -0.669423554, -0.841072957, -0.459953097, -0.186477777, -0.221389520, -0.000281815,</div>
<div>0.319742495,  0.569943319,  0.503029145,  0.209188642,  0.022992680, -0.169021906, -0.241754703, -0.305759565, -0.352308556, -0.390129611, -0.422132042, -0.422132042,-0.512320711)</div><div>y <- c( 0.73217213,  0.38635022,  0.08640264, -0.43585901, -0.80638249, -0.44997419, -0.03357638,</div>
<div>0.12169059,-0.13238264,  0.07228747,  0.48162768,  0.81333441 , 1.10622439,  1.13092596,  1.14504114,  1.13445475,  1.12739716,  1.12033957,  1.06035006,  1.00388934, 0.73217213)</div><div>plot(x,y,type='l')</div>
<div># 2) dentro deste poligono quero fazer quadrados irregulares como este</div><div>px1 <- c(-0.6131326, -0.4633484, -0.3762646, -0.5034070)</div><div>py1 <- c(-0.6037305,-0.7381249, -0.5774359, -0.3992173)</div><div>
polygon(px1,py1)</div><div># 3) quero fazer isso com o mouser clicando 4 vezes e guardando as coordenadas  e cada coordenada ganha um ID, ficando assim:</div><div>data.frame(id=1:length(px1),px1,py1)</div><div># 4) este quatros pontos forman um elemento (quadrado irregular), onde o elemento guarda o ID os pontos clicados.</div>
<div>elemento  <- c(1,1,2,3,4)#Idelemento - 4 ids dos pontos</div><div># 5) Esse procedimento é repetido n  vezes cobrindo toda a região com poligonos irregulares, como resultado final:</div><div># um data frame com id e x, y do ponto</div>
<div># um data frame com  id do elemento </div><div># restrições para o segundo elemento eu devo clicar por exemplo no ponto 2 e 3 e fazer mais o 5 e 6 para fechar ele, desta forma,</div><div># os elementos tem de ficar plotados para aproveitar os pontos já feitos.</div>
<div>#OBS: para os deterministicos de plantão isso é uma malha para modelos numericos de mecanica de fluidos.</div><div>#OBS1: Sugestoes de softwares livres que faz isso são bem vindo.</div><div># Diante do problema alguem tem sugestoes de funçoes que posso utilizar, na verdade é um mix de locator + identifique, pois não </div>
<div># consigui fechar todo o raciocinio de como fazer isso.</div><div># Obrigado pessoal</div><div>#Att</div>