Página 1 de 1

Vetores

Enviado: 20 Jun 2024 09:27
por leandrolinauer
Bom dia,

Estou precisando inverter dados de uma matriz

Exemplo: A[n,3] para B[3,n]

Existe algum comando que faça isto automaticamente ou tem que passar por um processo FOR.

Grato

Vetores

Enviado: 20 Jun 2024 09:51
por leandrolinauer
Bom dia
Consegui no CHAT GPT, caso alguém precise segue abaixo o código

Código: Selecionar todos

Static FUNCTION TransporMatriz( aMatriz )
    LOCAL nLinhas := Len( aMatriz )
    LOCAL nColunas := Len( aMatriz[1] )
    LOCAL aTransposta := Array( nColunas )

    LOCAL i, j

    FOR i := 1 TO nColunas
        aTransposta[i] := Array( nLinhas )
        FOR j := 1 TO nLinhas
            aTransposta[i][j] := aMatriz[j][i]
        NEXT
    NEXT

RETURN aTransposta
Grato