zsh: Sattolo's Random Cyclic Permutation
Publicado por Sandro Marcell (última atualização em 14/04/2010)
[ Hits: 5.296 ]
Homepage: http://sanmarcell.wordpress.com
Simples função que implementa uma variante do algoritmo Fisher-Yates shuffle. Esta implementação foi descrita pela pesquisadora italiana Sandra Sattolo.
#
# 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
}
Estok SH 1.2b - Controle de Estoque em Shell Script
Bashblog v3.0 - cria um microblog em HTML5
Removendo kernels antigos no Ubuntu
File Browser: Crie sua Nuvem Pessoal Privada
A produção de áudio e vídeo no Linux e as distribuições dedicadas a esse fim
Criptografando sua Home com Gocryptfs para tristeza do meliante
A Involução do Linux e as Lambanças Desnecessárias desde o seu Lançamento
O Journal no Linux para a guarda e consulta de logs do sistema
Assistindo IPTV no Linux com Fred TV e Lista Free TV
Impressora Tomate MDK-007 no Ubuntu (ou qualquer distro Linux)
Acelerando a compilação de pacotes no Arch Linux (AUR) usando todos os núcleos do processador
computador nao reconhece camara (0)
VoidBR - Void Linux adaptado ao Brasil. (6)









