洗牌的技巧

sxqsir

高手們，能不能對列的取數(shù)也來個隨機，而不僅僅是行？？這個shell一直是我期待的

寂寞烈火

原帖由 sxqsir 于 2006-7-31 16:53 發(fā)表
高手們，能不能對列的取數(shù)也來個隨機，而不僅僅是行？？這個shell一直是我期待的

取出指定范圍的隨機數(shù)了,對行/列都是一樣的呀

sxqsir

原帖由 寂寞烈火 于 2006-7-31 17:10 發(fā)表

取出指定范圍的隨機數(shù)了,對行/列都是一樣的呀

老兄，列的取數(shù)沒有隨機的，我測過了。

寂寞烈火

原帖由 sxqsir 于 2006-7-31 17:19 發(fā)表

老兄，列的取數(shù)沒有隨機的，我測過了。

是這樣的么?
/home/lee#cat txt
1 2 3 4 5 6 7
2 4 6 8 0
3 5 7 9
4 7 8 2 1
4 5 6 2 7
/home/lee#cat Rand
#!/bin/bash
while read line;do
array=($line)
echo ${array[$((RANDOM%${#array[@]}))]}
done<txt
/home/lee#sh Rand
2
8
3
2
6

sxqsir

你怎么只取出一列？
我用第三條shell：
awk 'BEGIN{srand()}{b[rand()" "NR]=$0}END{for(x in b)print b[x]}' data
data是一個n*n的文本文件，排序結果是行取隨機，但每一行的內容（即列）沒有改變。

waker

1. awk 'BEGIN{srand()}{for(i=1;i<=NF;i++)a[rand(),i]=$i;for(i in a)c=c" "a[i];sub(/^./,"",c);b[rand(),NR]=c;delete a;c=""}END{for(x in b)print b[x]}' urfile
   

復制代碼

難道別人寫那么多一點兒啟發(fā)性都沒有？

sxqsir

原帖由 waker 于 2006-7-31 17:51 發(fā)表
[code] awk 'BEGIN{srand()}{for(i=1;i<=NF;i++)a[rand(),i]=$i;for(i in a)c=c" "a;sub(/^./,"",c);b[rand(),NR]=c;delete a;c=""}END{for(x in b)print b[x]}' urfile
[/ ...

人笨了一點，但一定會好好學習，多謝老大指點，但運行結果是這樣的：
awk: Syntax error
at line 1 of program << BEGIN{srand()}{for(i ... >>
context is
        BEGIN{srand()}{for(i=1;i<=NF;i++)a[rand(),i]=$i;for(i in a)c=c" "a;su
b(/^./,"",c);b[rand(),NR]=c;delete >>>  a; <<<
awk: illegal statement
at line 1 of program << BEGIN{srand()}{for(i ... >>

環(huán)境是sco5.0.5 ksh

寂寞烈火

原帖由 sxqsir 于 2006-7-31 18:24 發(fā)表

人笨了一點，但一定會好好學習，多謝老大指點，但運行結果是這樣的：
awk: Syntax error
at line 1 of program << BEGIN{srand()}{for(i ... >>
context is
        BEGIN{srand()}{for(i=1; ...

用nwak/gwak
waker老大常怎么說

$CO是僅次于M$的bugware生產大戶

sxqsir

os是死的，程序是活的

waker

仔細man一下你$co中awk怎么用吧，看看它的delete怎么用，唾沫不是天天都有