Fantástico Walmes,

Obrigado inicialmente pela rotina e pela interpretação da pergunta, a palavras chave era vão.


--
======================================================================
Alexandre dos Santos
Proteção Florestal
IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso
Campus Cáceres
Caixa Postal 244
Avenida dos Ramires, s/n
Bairro: Distrito Industrial
Cáceres - MT                      CEP: 78.200-000
Fone: (+55) 65 8132-8112 (TIM)   (+55) 65 9686-6970 (VIVO)
e-mails:[email protected]
        [email protected]
Lattes: http://lattes.cnpq.br/1360403201088680
======================================================================



Em 02/11/2013 17:09, walmes . escreveu:
Sua explicação ficou muito confusa. Eu entendi que você tem um grid regular em duas dimensões e quer colocar outros iguais a este ao lado e acima mas de tal forma que tenha um espaço entre eles, em outras palavras, um vão entre eles. O resultado é parecido com uma horta cheia de canteiros ou talhões de plantio florestal (que deve ser o seu caso). Sendo assim, segue CMR.

## distâncias verticais e horizontais
v <- 2; h <- 3

## número de pontos vertical e horizontal
npv <- 8; nph <- 5

## distância entre vãos vertical e hotizontal
V <- 3; H <- 4

## número de linhas e colunas
ncol <- 2; nrow <- 3

grid0 <- expand.grid(L=seq(0,length.out=nrow,by=npv*v+V),
                   C=seq(0,length.out=ncol,by=nph*h+H),
                   x=seq(0,length.out=npv,by=v),
                   y=seq(0,length.out=nph,by=h))
grid1 <- with(grid0, data.frame(x=L+x, y=C+y))

plot(y~x, grid1, asp=1)

À disposição.
Walmes.


==========================================================================
Walmes Marques Zeviani
LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W)
Departamento de Estatística - Universidade Federal do Paraná
fone: (+55) 41 3361 3573
skype: walmeszeviani
homepage: http://www.leg.ufpr.br/~walmes <http://www.leg.ufpr.br/%7Ewalmes>
linux user number: 531218
==========================================================================


2013/11/2 Thiago Silva Pereira <[email protected] <mailto:[email protected]>>

    p0<-c(1,1)
    c0 <- seq(p0[1],p0[1]+190,by=2)
    d0 <- seq(p0[2],p0[2]+47,by=3)
    d1 <- expand.grid(x=c0, y=d0) ## Coordenadas do grid espaçadas 3 x 2
    plot(d1[,1],d1[,2])
    curve(plot)



    Em 2 de novembro de 2013 16:31, ASANTOS
    <[email protected]
    <mailto:[email protected]>> escreveu:

        Boa tarde Pessoal,

               Estou com dificuldades de fazer um expand.grid()
        alterando-se as distância, como por exemplo se faço:

        # Ponto inicial
        p0<-c(1,1)
        c0 <- seq(p0[1],p0[1]+190,by=2)
        d0 <- seq(p0[2],p0[2]+47,by=3)
        d1 <- expand.grid(x=c0, y=d0) ## Coordenadas do grid espaçadas
        3 x 2
        plot(d1[,1],d1[,2])
        #----------

                 Crio 16 pontos no eixo y e 32 pontos no eixo x,
        totalizando 1536 pontos, no entanto, eu gostaria de criar os
        mesmo 1536 pontos, mas gostaria de fazer da seguinte maneira:
        a cada 8 pontos na linha e 8 na coluna, distanciar em 4
        unidades na linha e na coluna do próximo agrupamento de 8
        pontos na linha e 8 na coluna para todos os pontos, formando
        ao final 24 agrupamentos de 8 pontos na linha por 8 na coluna
        separados de maneira equidistantes em 4 unidades. Alguém
        poderia me dar uma ajuda, pois fiz inúmeras tentativas sem
        sucesso?

        Obrigado,



-- ======================================================================
        Alexandre dos Santos
        Proteção Florestal
        IFMT - Instituto Federal de Educação, Ciência e Tecnologia de
        Mato Grosso
        Campus Cáceres
        Caixa Postal 244
        Avenida dos Ramires, s/n
        Bairro: Distrito Industrial
        Cáceres - MT                      CEP: 78.200-000
        Fone: (+55) 65 8132-8112 <tel:%28%2B55%29%2065%208132-8112>
        (TIM) (+55) 65 9686-6970 <tel:%28%2B55%29%2065%209686-6970> (VIVO)
        e-mails:[email protected]
        <mailto:e-mails%[email protected]>
        [email protected]
        <mailto:[email protected]>
        Lattes: http://lattes.cnpq.br/1360403201088680
        ======================================================================

        _______________________________________________
        R-br mailing list
        [email protected] <mailto:[email protected]>
        https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
        Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e
        forneça código mínimo reproduzível.



    _______________________________________________
    R-br mailing list
    [email protected] <mailto:[email protected]>
    https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
    Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e
    forneça código mínimo reproduzível.




_______________________________________________
R-br mailing list
[email protected]
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código 
mínimo reproduzível.

_______________________________________________
R-br mailing list
[email protected]
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código 
mínimo reproduzível.

Responder a