摘要:
我正在寻找的排序方式在AutoIt中列序列的2D(多维)数组有道。我很熟悉的AutoIt且有_ArraySort
功能,通过这导致排序的列行提供了一个排序。但我需要的是排序中列方向的列的顺序/序列(按英文字母的方式)。
背景和目标:
对于我创建(一个HTML文件)测试病例报告,我需要它来显示表。此表应包含测试用例结果的一部分的数据。
我已经实现的是:
我读CSV文件到一个数组(通过定义分离器),这是没问题的。我可以将二维数组的行序列和解析,并皈依到HTML结构报告进行排序也是没有问题的。
但我想达到什么是显示在底部的示例表。请注意,示例中仅包含示例数据。真正的数组内容将有数组作为测试用例结果更加列和行。但是,这应该够得到的想法。
码:
这就像下面的例子阵列数据:
Global $a2dData[6][6]
$a2dData[0][0] = 'fruits'
$a2dData[0][1] = 'IT manufactures'
$a2dData[0][2] = 'painters'
$a2dData[0][3] = 'music genres'
$a2dData[0][4] = 'days'
$a2dData[1][0] = 'apple'
$a2dData[1][1] = 'Google'
$a2dData[1][2] = 'Picasso'
$a2dData[1][3] = 'Jazz'
$a2dData[1][4] = 'Monday'
$a2dData[2][0] = 'Orange'
$a2dData[2][1] = 'Microsoft'
$a2dData[2][2] = 'Van Gogh'
$a2dData[2][3] = 'Blues'
$a2dData[2][4] = 'Thursday'
$a2dData[3][0] = 'Pear'
$a2dData[3][1] = ''
$a2dData[3][2] = 'Da Vinci'
$a2dData[3][3] = 'Hip Hop'
$a2dData[3][4] = 'Friday'
$a2dData[4][0] = ''
$a2dData[4][1] = 'Apple'
$a2dData[4][2] = 'Monet'
$a2dData[4][3] = 'Rap'
$a2dData[4][4] = 'Sunday'
$a2dData[5][0] = 'Cherry'
$a2dData[5][1] = 'Adobe'
$a2dData[5][2] = 'Michelangelo'
$a2dData[5][3] = 'Classic'
$a2dData[5][4] = ''
_ArrayDisplay( $a2dData )
而现在,如何排序二维数组中的AutoIt列顺序?
排序列序列之前实际阵列数据:
| fruits | IT manufactures | painters | music genres | days |
| apple | Google | Picasso | Jazz | Monday |
| Orange | Microsoft | Van Gogh | Blues | Thursday |
| Pear | | Da Vinci | Hip Hop | Friday |
| | Apple | Monet | Rap | Sunday |
| Cherry | Adobe | Michelangelo | Classic | |
排序列顺序后预期阵列数据:
| days | fruits | IT manufactures | music genres | painters |
| Monday | apple | Google | Jazz | Picasso |
| Thursday | Orange | Microsoft | Blues | Van Gogh |
| Friday | Pear | | Hip Hop | Da Vinci |
| Sunday | | Apple | Rap | Monet |
| | Cherry | Adobe | Classic | Michelangelo |
是否已有一个函数来做到这一点还是我必须做我自己?
这是否符合您的预期?
#include <Array.au3>
Global $a2dData[6][5]
$a2dData[0][0] = 'fruits'
$a2dData[0][1] = 'IT manufactures'
$a2dData[0][2] = 'painters'
$a2dData[0][3] = 'music genres'
$a2dData[0][4] = 'days'
$a2dData[1][0] = 'apple'
$a2dData[1][1] = 'Google'
$a2dData[1][2] = 'Picasso'
$a2dData[1][3] = 'Jazz'
$a2dData[1][4] = 'Monday'
$a2dData[2][0] = 'Orange'
$a2dData[2][1] = 'Microsoft'
$a2dData[2][2] = 'Van Gogh'
$a2dData[2][3] = 'Blues'
$a2dData[2][4] = 'Thursday'
$a2dData[3][0] = 'Pear'
$a2dData[3][1] = ''
$a2dData[3][2] = 'Da Vinci'
$a2dData[3][3] = 'Hip Hop'
$a2dData[3][4] = 'Friday'
$a2dData[4][0] = ''
$a2dData[4][1] = 'Apple'
$a2dData[4][2] = 'Monet'
$a2dData[4][3] = 'Rap'
$a2dData[4][4] = 'Sunday'
$a2dData[5][0] = 'Cherry'
$a2dData[5][1] = 'Adobe'
$a2dData[5][2] = 'Michelangelo'
$a2dData[5][3] = 'Classic'
$a2dData[5][4] = ''
_ArrayDisplay($a2dData, 'BEFORE')
_ArrayTranspose($a2dData)
_ArraySort($a2dData)
_ArrayTranspose($a2dData)
_ArrayDisplay($a2dData, 'AFTER' )
这么久了,兆丰
是:
Xenobiologist的解决方案完全适合我的期望,谢谢。但我不能用一个评论说。
其他的解决方案:
在此期间我也解决了它在我自己的(但不是在优雅的方式):
Global $a2dData[6][6]
$a2dData[0][0] = 'fruits'
$a2dData[0][1] = 'IT manufactures'
$a2dData[0][2] = 'painters'
$a2dData[0][3] = 'music genres'
$a2dData[0][4] = 'days'
$a2dData[1][0] = 'apple'
$a2dData[1][1] = 'Google'
$a2dData[1][2] = 'Picasso'
$a2dData[1][3] = 'Jazz'
$a2dData[1][4] = 'Monday'
$a2dData[2][0] = 'Orange'
$a2dData[2][1] = 'Microsoft'
$a2dData[2][2] = 'Van Gogh'
$a2dData[2][3] = 'Blues'
$a2dData[2][4] = 'Thursday'
$a2dData[3][0] = 'Pear'
$a2dData[3][1] = ''
$a2dData[3][2] = 'Da Vinci'
$a2dData[3][3] = 'Hip Hop'
$a2dData[3][4] = 'Friday'
$a2dData[4][0] = ''
$a2dData[4][1] = 'Apple'
$a2dData[4][2] = 'Monet'
$a2dData[4][3] = 'Rap'
$a2dData[4][4] = 'Sunday'
$a2dData[5][0] = 'Cherry'
$a2dData[5][1] = 'Adobe'
$a2dData[5][2] = 'Michelangelo'
$a2dData[5][3] = 'Classic'
$a2dData[5][4] = ''
Func _arraySortColumnSequence( $a2dArray, $iAscOrDesc )
Local $aJustColumns[1]
For $i = 0 To UBound( $a2dArray, 2 ) - 2 Step 1
_ArrayAdd( $aJustColumns, $a2dArray[0][$i] )
Next
_ArrayDelete( $aJustColumns, 0 )
_ArraySort( $aJustColumns, $iAscOrDesc )
Local $aNew2dArray[UBound( $a2dArray, 1 )][UBound( $a2dArray, 2 )]
For $i = 0 To UBound( $aJustColumns ) - 1 Step 1
For $j = 0 To UBound( $aJustColumns ) - 1 Step 1
If $a2dArray[0][$j] = $aJustColumns[$i] Then
For $k = 0 To UBound( $a2dArray, 1 ) - 1 Step 1
$aNew2dArray[$k][$i] = $a2dArray[$k][$j]
Next
EndIf
Next
Next
Return $aNew2dArray
EndFunc
_ArrayDisplay( $a2dData, 'before' )
Global $a2dDataRes = _arraySortColumnSequence( $a2dData, 0 )
_ArrayDisplay( $a2dDataRes, 'after' )