1

Lua では、単位行列を設定しました。

local ident_matrix = {
 {1,0,0,0},
 {0,1,0,0},
 {0,0,1,0},
 {0,0,0,1},
}

これは、x=100、y=0、z=0 の点を含むように更新されます。

ident_matrix = {
 {100,0,0,0},
 {0,0,0,0},
 {0,0,0,0},
 {0,0,0,1},
}

次に、回転値をラジアンで 90 度として定義します。

local r = math.rad(90)

これから、Z 軸回転行列を作成します。

local rotate_matrix = {
 {math.cos(r),math.sin(r),0,0},
 {-math.sin(r),math.cos(r),0,0},
 {0,0,1,0},
 {0,0,0,1},
}

ここから、行列乗算を使用して Z 軸回転行列を {100,0,0} ポイントに適用します。

local function multiply( aMatrix, bMatrix )
    if #aMatrix[1] ~= #bMatrix then       -- inner matrix-dimensions must agree
        return nil      
    end 

    local empty = newEmptyMatrix()

    for aRow = 1, #aMatrix do
        for bCol = 1, #bMatrix[1] do
            local sum = empty[aRow][bCol]
            for bRow = 1, #bMatrix do
                sum = sum + aMatrix[aRow][bRow] * bMatrix[bRow][bCol]
            end
            empty[aRow][bCol] = sum
        end
    end

    return empty
end

local rotated = multiply( rotate_matrix, ident_matrix )

行列の乗算は RosettaCode.org から取得されます: https://rosettacode.org/wiki/Matrix_multiplication#Lua

rotatedマトリックス出力が次のようになると予想していました。

local expected = {
 { 0, 0, 0, 0 },
 { 0, 100, 0, 0 },
 { 0, 0, 0, 0 },
 { 0, 0, 0, 0 },
}

あるいは、左利き (?) の計算では、Y 値は -100 になります。私が実際に最終的に得られるのは次のとおりです。

{
 { 0, 100, 0, 0 },
 { 0, 0, 0, 0 },
 { 0, 0, 0, 0 },
 { 0, 0, 0, 1 },
}

誰かが私が間違っていることを教えて、私のコードを修正してもらえますか?

4

1 に答える 1

0

@egor-skriptunoffのコメントで暗示されるように...

Lua では、単位行列を設定しました。

local ident_matrix = {
 {1,1,1,1},
}

これは、x=100、y=0、z=0 の点を含むように更新されます。

ident_matrix = {
 {100,0,0,1},
}

次に、回転値をラジアンで 90 度として定義します。

local r = math.rad(90)

これから、Z 軸回転行列を作成します。

local rotate_matrix = {
 {math.cos(r),math.sin(r),0,0},
 {-math.sin(r),math.cos(r),0,0},
 {0,0,1,0},
 {0,0,0,1},
}

ここから、行列乗算を使用して Z 軸回転行列を {100,0,0} ポイントに適用します。

local function multiply( aMatrix, bMatrix )
    if #aMatrix[1] ~= #bMatrix then       -- inner matrix-dimensions must agree
        return nil      
    end 

    local empty = newEmptyMatrix()

    for aRow = 1, #aMatrix do
        for bCol = 1, #bMatrix[1] do
            local sum = empty[aRow][bCol]
            for bRow = 1, #bMatrix do
                sum = sum + aMatrix[aRow][bRow] * bMatrix[bRow][bCol]
            end
            empty[aRow][bCol] = sum
        end
    end

    return empty
end

local rotated = multiply( rotate_matrix, ident_matrix )

行列の乗算は、RosettaCode.org から取得されます: https://rosettacode.org/wiki/Matrix_multiplication#Lua

今、私は期待したものを手に入れました：

local expected = {
 { 0, 100, 0, 0 },
}
于 2016-07-01T09:38:17.170 に答える