Αντιστροφή τετραγωνικού πίνακα

[t300]

Ψάχνω πρόγραμμα (κατά προτίμηση fortran) που να αντιστρέφει τετραγωνικό πίνακα.

Κάπου επίσης, πήρε το αυτί μου ότι το excel μπορεί να αντιστρέφει πίνακες :eek: γίνεται, και αν ναι πως;

Όποιος μπορεί να βοηθήσει, ας το κάνει! :)

[metality]

Αυτό που κάνει το excel είναι τις γραμμές στήλες και τις στήλες γραμμές.

 

Δεν θυμάμαι καθόλου αν αυτό είναι αντιστροφή πίνακα. Σόρι. Πάντως το excel το βαφτίζει αντιμετάθεση.

 

Γίνεται ως εξής:

 

Γράφουμε τα στοιχεία του πίνακα.

 

Τα επιλέγουμε --> Αντιγραφή

 

Πάμε σε ένα άλλο σημείο --> Ειδική επικόλληση (Paste special)

 

Αντιμετάθεση (Transpose)

Έτοιμος!

 

Επίσης, ψάξε καλά τις συναρτήσεις όπως π.χ. την MINVERSE.

 

Σε κάθε περίπτωση, αν το θέμα σου είναι ο πίνακας και όχι η γλώσσα, τότε το excel σου κάνει.

[NikTG]

To Αντίστροφο ενός πίνακα δεν έχει καμία σχέση με το Ανάστροφο(Τranspose) του ίδιου πίνακα...Τρόπος να γίνει με πρόγραμμα υπάρχει και δεν ειναι πολύ δύσκολος αλλά δεν τον θυμάμαι...

[OratIos]

Epeidh tora teleytai asxoloyme me C++ na soy po thn Logikh ,einai aploystato!!!

[OratIos]

#include <stdio.h>

#include "simpio.h"

#include "genlib.h"

 

#define m 10

#define n 10

 

main()

{

 

int i,j,a[m,n],b[n,m];

 

for ( i=1 ;i<=m ;i++){

for ( j=1 ;j<=n ;j++){

b[j,i]=a[i,j];

}

}

 

/*Kai to print poy tha einai mia for */

 

}

[kallitheotis]

Αρχικό Μήνυμα από το μέλος OratIos (27 Οκτ. 2004 , 01:01)

 

#include <stdio.h>

#include "simpio.h"

#include "genlib.h"

 

#define m 10

#define n 10

 

main()

{

 

int i,j,a[m,n],b[n,m];

 

for ( i=1 ;i<=m ;i++){

for ( j=1 ;j<=n ;j++){

b[j,i]=a[i,j]

}

}

 

/*Kai to print poy tha einai mia for */

 

}

 

 

Σου λειπει ενα ";" b[j,i]=a[i,j]; ;) Ασχετο αλλα τι ειναι αυτες οι βιβλιοθηκες που κανεις include??

[OratIos]

tora den leipei omws........!!!

 

Aytes tis vazo stadar !Einai gia diafores functions,opws kai kano include thn <math.h> gia hmitona synimhtona cosinus ktl ktl.Sthn oysia den xreiazontai tora!!alla..........

[t300]

Αν κατάλαβα καλά, η ρουτίνα που έγραψες βρίσκει τον ανάστροφο (κάνει τις γραμμές στήλες και αντίστροφα). Εγώ θέλω τον αντίστροφο. :o Τελικά έβγαλα άκρη με το excel (με τη συνάρτηση MINVERSE) αλλά το μειονέκτημα είναι ότι δεν είναι "ευέλικτο" σε διάφορα μεγέθη πίνακα. Θα προτιμούσα κάποιον τρόπο (πχ προγραμματιστικά) με τον οποίο να μπορείς να ορίζεις τις διαστάσεις του πίνακα ανάλογα με το πόσο τον θέλεις κάθε φορά.

[nastis]

Allo anastrofi kai allo antistrofi pinaka.

Nomizw i gnosti methodos gia antistrofi einai Gauss - Jordan

Ean se endiaferei to programmatistiko kommati me ena proxeiro psaksimo brika auto:

http://www.rose.brandeis.edu/users/derosier/BHP/brandeis-helical-package/lib/matrix/matrix-inversion.f

 

Ean exeis wstoso den se endiaferei auto kai exeis pollous kai megalous pinakes kalo tha itan na xrisimopoihseis kapoio programma ftoiagmeno gia tetoia douleia p.x. Matlab pou xeirizetai me anesi megalous pinakes (megaloi pinakes ==>10.000x10.000). to opoio malista einai polu eukolo stin xrisi. px tha dwseis B=inv(A) (an thimamai kala)

 

Filika

V.

[OratIos]

aaaaaaaaaa m@l@ki@!!!Sorry.................

 

;) ;)

 

Ego gia ayth thn doyleia xrhsimopoio Mathlab!!kai nomizo oti einai kai i pio apli methodos gia na vreis enan antistrofo!!

[danton]

Αρχικό Μήνυμα από το μέλος nastis (27 Οκτ. 2004 , 11:53)

 

Allo anastrofi kai allo antistrofi pinaka.

Nomizw i gnosti methodos gia antistrofi einai Gauss - Jordan

Ean se endiaferei to programmatistiko kommati me ena proxeiro psaksimo brika auto:

http://www.rose.brandeis.edu/users/derosier/BHP/brandeis-helical-package/lib/matrix/matrix-inversion.f

 

Ean exeis wstoso den se endiaferei auto kai exeis pollous kai megalous pinakes kalo tha itan na xrisimopoihseis kapoio programma ftoiagmeno gia tetoia douleia p.x. Matlab pou xeirizetai me anesi megalous pinakes (megaloi pinakes ==>10.000x10.000). to opoio malista einai polu eukolo stin xrisi. px tha dwseis B=inv(A) (an thimamai kala)

 

Filika

V.

 

 

epitelous enas pou gnwrizei upotipwdes ma8hmatika.kai egw proteinw Matlab h Mathematica.Mia aporia exw omws asxeth me to 8ema,an den gnwrizetai oute thn antistrofh pinakwn ti soi programata grafete re paidia?giati to na ftiakseis kapoio programa enoeitai oti gnwrizeis kapoia basika ma8hmatika opws na metaxeirizesai pinakes kai dianysmata,grammika systhmata...

[kallitheotis]

καλα danton δεν χρειαζεται να ξερεις αντιστροφη πινακων για να γραψεις προγραμμα.Βασικα εγω δεν εχω χρησιμοποιησει ποτε τετοια πραγματα στα προγραμματα που εχω φτιαξει.Και απο οσο ξερω και αυτοι που εφτιαξαν προγραμματα οπως το matlab συνεργαστηκαν με μαθηματικους.Παντως για να σου λυσω και την απορια δεν υπαρχει προγραμματιστης απο πανεπιστημιο, τουλαχιστον που ξερω, που να μην ξερει αντιστροφη πινακων γιατι στο πρωτο-δευτερο ετος ολοι κανουν ενα μαθημα που λεγεται αριθμητικη αναλυση και εκει μαθαινεις διαφορες μεθοδους οπως Gauss-Seidel,Gauss-Jordan,SOR....