[R] Suppression de ligne blanche dans un array 1D ou +

[Julien]

Bonjour,

Je suis à la recherche d'une fonction qui permet de supprimer les ligne blanches d'un array existant avec 1 ou plusieurs colonnes, détection automatique.

J'ai testé la fonction suivante : remove-empty-rows-in-2d-array
mais elle ne fonctionne pas lors de gros tableau a multiple colonnes.

D'avance merci si vous avez ça dans vos tiroirs.

[mikell]

Je vois pas pourquoi...
Testé (un peu adapté), ça marche

► Afficher le texte

Code : Tout sélectionner

#include <Array.au3>

Dim $aTmp[5][8] = [[0, 1, 2, 3, 1, 1, 2, 3], [2, 3, 4, 5, 6, 7, 8, 9], ["", ""], ["", ""], [4, 5, 7, 8, 9, 6 , 5, 4]]

_ArrayDisplay($aTmp, "$aTmp_BEFORE")
_Array2DDeleteEmptyRows($aTmp)
_ArrayDisplay($aTmp, "$aTmp_AFTER")

Func _Array2DDeleteEmptyRows(ByRef $iArray)
    Local $vEmpty = 1
    For $i = UBound($iArray) - 1 To 0 Step -1
        For $j = 0 To UBound($iArray, 2) - 1 
            If $iArray[$i][$j] <> "" Then
                $vEmpty = 0
        Exitloop
            EndIf
        Next
        If $vEmpty = 1 Then _ArrayDelete($iArray, $i)
        $vEmpty = 1
    Next
EndFunc
 

[Julien]

Bonsoir,

Effectivement avec vos modifications cela fonctionne. C'est "assez" long mais c'est ce qu'il me fallait.

Merci beaucoup.