2
local function fShallowCopy(tData)
    local tOutput = {}
    for k,v in ipairs(tData) do
        tOutput[k] = v
    end
    return tOutput
end

local function fLexTblSort(tA,tB) --sorter for tables
    for i=1,#tA do 
        if tA[i]~=tB[i] then 
            return tA[i]<tB[i]
        end
    end 
    return false 
end

function fBWT(tData)

    --setup--
    local iSize = #tData
    local tSolution = {}
    local tSolved = {}


    --key table--
    for n=1,iSize do 
        tData[iSize] = fRemove(tData,1)
        tSolution[n] = fShallowCopy(tData)
    end
    table.sort(tSolution,fLexTblSort)


    --encode output--
    for i=1,iSize do
        tSolved[i] = tSolution[i][iSize]
    end


    --finalize--
    for i=1,iSize do
        if fIsEqual(tSolution[i],tData) then
            return i,tSolved
        end
    end
    return false
end

以上是我目前在 Lua 中实现 BWT 编码的代码。问题是由于表的大小和循环的长度,它需要很长时间才能运行。对于 1000 个字符的输入,平均编码时间约为 1.15 秒。有人对制作更快的 BWT 编码功能有建议吗?

最大的放缓似乎出现在 fLexTblSort 和 fShallowCopy 中。我也将两者都包含在 BWT 函数之上。

4

1 回答 1

0

如果我没O(n^2 log n)看错,如果排序是快速排序,你的算法就很复杂。比较器函数对您比较的每一对值进行自我比较fLexTblSortO(n)

当我检查几年前的实施时,我看到了可能的改进空间。您创建 的所有可能的旋转tData,这也需要很多时间。我只使用了单个数据块,并且只存储了特定旋转的起始位置。您还使用了很多可以缩小到更少的循环。

我的实现是用 C 语言实现的,但这个概念也可以在 Lua 中使用。Lua 和 C 之间的一些混合伪代码中的想法。

function fBWT(tData)

  local n = #tData
  local tSolution = {}
  for(i = 0; i < n; i++)
    tSolution[i] = i;

  --table.sort(tSolution, fLexTblSort)
  quicksort(tData, n, tSolution, 0, n)

  for(i = 0; i < n; i++){
    tSolved[i] = tData[(tSolution[i]+n-1)%n];
    if( tSolution[i] == 0 )
        I = i;
  }

  return I, tSolved
end

您还需要自己的排序功能,因为该标准没有为这种魔法提供足够的灵活性。快速排序是个好主意(你可能会避免一些争论,但我只粘贴了我正在使用的 C 版本):

void swap(int array[], int left, int right){
    int tmp = array[right]; 
    array[right] = array[left];
    array[left] = tmp;         
}

void quicksort(uint8_t data[], int length, int array[], int left, int right){
    if(left < right){ 
        int boundary = left;
        for(int i = left + 1; i < right; i++){ 
            if( offset_compare(data, length, array, i, left) < 0 ){
                swap(array, i, ++boundary);
            }
        }
        swap(array, left, boundary);
        quicksort(data, length, array, left, boundary);
        quicksort(data, length, array, boundary + 1, right);
    }     
}

最后一步是您自己的比较器功能(类似于您的原始功能,但在旋转中工作,再次在 C 中):

/**
 *  compare one string (fixed length) with different rotations.
 */
int offset_compare(uint8_t *data, int length, int *array, int first, int second){
    int res;
    for(int i = 0; i < length; i++){
        res = data[(array[first]+i)%length] - data[(array[second]+i)%length];
        if( res != 0 ){
            return res;
        }
    }
    return 0;
}

这是我几年前提出的基本想法,并且对我有用。让我知道是否有不清楚或错误的地方。

于 2016-05-14T20:39:43.030 回答