lecture de tableau à 2 dimensions

Bonjour (encore :cry:)

Je suis entrain de lire un fichier texte , ce fichier possède des données par colonnes disposées ainsi sur n lignes:

Code:

---

X1 X2 X3 X4 X4

---

le problème c'est que je souhaite avoir une seule variable du genre X(5,n) ou stocker le tout et me débarasser des Xi.

Malheureusement mon code ne marche pas!

Code:

---

1 2 3 4 5 6

do i = 1, n ! nombre de ligne du fichier do j = 1, n_Xi ! nombre de colonnes read(7,*) X(j,i) enddo enddo

---

est ce que vous auriez une idée de comment procéder à la lecture de ce tableau?

Merci

Salut,

Alors, pour pouvoir lire ce fichier, s'il ne contient que des valeurs numériques essayes en mettant le tableau X sous la forme d'un tableau dynamique lors de la déclaration des variables puis:

Citation:

---

!Declaration des variables
Allocatable, dimension (:,: ) :: X
...
Allocate(X(n_Xi,n))

read(7,*) X
...

Deallocate (X)

---

Si je ne me trompes pas, ça devrait marcher.

Citation:

---

Envoyé par manaliac

...
Je suis entrain de lire un fichier texte , ce fichier possède des données par colonnes disposées ainsi sur n lignes:

Code:

---

X1 X2 X3 X4 X4

---

le problème c'est que je souhaite avoir une seule variable du genre X(5,n) ou stocker le tout et me débarasser des Xi.

Malheureusement mon code ne marche pas!

Code:

---

1 2 3 4 5 6

do i = 1, n ! nombre de ligne du fichier do j = 1, n_Xi ! nombre de colonnes read(7,*) X(j,i) enddo enddo

---

...

---

Le problème est qu'à chaque read, il y a saut de ligne. Ton programme ne lit donc que le X1 de chaque ligne. Tu dois faire :

Code:

---

1 2 3 4

do i = 1, n ! nombre de ligne du fichier read(7,*) X(:,i) enddo

---

ou :

Code:

---

1 2 3 4

do i = 1, n ! nombre de ligne du fichier read(7,*) (X(j,i),j=1,n_Xi) enddo

---

ou encore :

Code:

---

1 2 3 4

do i = 1, n ! nombre de ligne du fichier read(7,*) X(1:n_Xi,i) enddo

---

Il serait également possible de combiner ta stratégie (2 boucles) avec la clause advance='no', mais c'est beaucoup trop compliqué pour ton problème...

Bonjour,
tu veux dire qu'il suffit que j'ecrive juste

read(7,*) X

sans préciser les indices i,j pour que ça marche? pas de boucle do?

(j'ai déjà alloué la taille du tableau par un allocate )

Oui ça va fonctionner, MAIS :

La lecture d'un tableau entier par un format libre (*) offre très peu de contrôle. Je te suggère donc, suite à la lecture, de valider si possible le contenu du tableau.

C'est ce problème de contrôle qui oblige souvent à découper la lecture en ligne et à utiliser une variable caractère intermédiaire. Tu trouveras plusieurs problèmes résolus par cette stratégie dans le forum.