Simples função que implementa uma variante do algoritmo Fisher-Yates shuffle. Esta implementação foi descrita pela pesquisadora italiana Sandra Sattolo.

• Download sattolo_zsh
• Enviar nova versão

Esconder código-fonte

#
# Sattolo's Random Cyclic Permutation
# -- Variante do algoritmo Fisher-Yates shuffle
# Sandro Marcell <sandro_marcell@yahoo.com.br>
# Boa Vista, Roraima - 21/03/2010
#
function sattoloCycle {
   zmodload zsh/mathfunc
   (( rand48(seed) ))

   typeset -a array swap
   integer n k

   array=(${*=})
   (( n = ${(w)#array} + 1 ))

   while ((n > 1))
   do
      ((--n))
      (( k = int((n - 1) * rand48()) + 1 ))
      swap+=$array[k]
      array[k]=$array[n]
      array[n]=$swap
   done

   return 0
}

Download do Banco de dados NCBI NT (DNA)

passa2 - Um sistema de backup/sincronização/cópia de arquivos em SHell Script

Gerenciamento de software e hardware de desktop

Limpando cache do Squid (Baseado em Debian)

Calculadora em phyton