Question

这是我的问题：

我有一个网格（见下图），我需要在列表中获取并存储每个块（单元格）每个顶点的坐标。我需要的块的顺序是＆＃39; 1-1＆＃39;，...＆＃39; 4-1＆＃39;，＆＃39; 1-2＆＃39;，...＆＃39 ; 4-2＆＃39 ;.为了简单起见，我现在只是处理索引。

基于具有共同东坐标和北坐标的两个向量，我写了一个小函数，它部分地产生了我需要的输出。它正在跳过电池＆＃39; 1-2＆＃39;和＆＃39; 2-2＆＃39; （见下面的输出）。我无法确定错误的确切位置，但我怀疑问题出在我的嵌套for循环中。（关于for循环有很多问题，但没有一个问题对我有帮助）。

任何帮助都将受到赞赏，并且如果这是太基本的问题，请致歉。

载体：

x.breaks <- c(191789.1, 291789.1, 391789.1)
y.breaks <- c(5172287, 5272287, 5372287, 5472287, 5572287)

功能：

getting_vertices <- function(x.breaks, y.breaks){
  xs <- list()
  ys <- list()
  polys <- list()

  for(i in 1 : (length(x.breaks)-1)){
     xs[[i]] <- c(i, i+1 , i+1, i, i)
  }

  for(j in 1 : (length(y.breaks)-1)){
    ys[[j]] <- c(j, j, j+1, j+1, j)
  }

    for(v in 1 : length(sapply(ys, length)) ){
    for(k in 1: length(sapply(xs, length))){
      polys[[v*k]] <- cbind(xs[[k]], ys[[v]])

    }
  }
 return(polys)

}

getting_vertices(x.breaks, y.breaks)

输出（部分正确）：

[[1]]
     [,1] [,2]
[1,]    1    1
[2,]    2    1
[3,]    2    2
[4,]    1    2
[5,]    1    1

[[2]]
     [,1] [,2]
[1,]    1    2
[2,]    2    2
[3,]    2    3
[4,]    1    3
[5,]    1    2

[[3]]
     [,1] [,2]
[1,]    1    3
[2,]    2    3
[3,]    2    4
[4,]    1    4
[5,]    1    3

[[4]]
     [,1] [,2]
[1,]    1    4
[2,]    2    4
[3,]    2    5
[4,]    1    5
[5,]    1    4

[[5]]
NULL

[[6]]
     [,1] [,2]
[1,]    2    3
[2,]    3    3
[3,]    3    4
[4,]    2    4
[5,]    2    3

[[7]]
NULL

[[8]]
     [,1] [,2]
[1,]    2    4
[2,]    3    4
[3,]    3    5
[4,]    2    5
[5,]    2    4

Answer 1

行required init?(coder: NSCoder) { let attributes = [ UInt32(NSOpenGLPFADoubleBuffer), UInt32(NSOpenGLPFAOpenGLProfile), UInt32(NSOpenGLProfileVersion3_2Core), 0 ] let pixelFormat = NSOpenGLPixelFormat(attributes: attributes) super.init(coder: coder) self.pixelFormat = pixelFormat }背后的逻辑是不正确的，例如，v = 2，k = 1将覆盖v = 1，k = 2。没有v和k的组合产生5或7，因此这些条目是空的。

我希望你的意思是写下： polys[[v*k]] <- ... 要么 polys[[v+(k-1)*(length(ys))]] <- ...

取决于您希望获得结果的顺序

嵌套的for循环跳过循环

1 个答案: