2013年 12月 18日
#同じ値に複数の化合物が含まれているデータのモデルデータ $ more test2 C00001 ID_1 ID_2 ID_3 2.1E-04 10.1E-04 0.4E-04 N.D. N.D. 1.2E-04 C011010 ID_1 ID_2 ID_3 1.11 6.4E-04 6.3E-04 N.D. N.D. N.D. C001983,C03231,C04213 ID_1 ID_2 ID_3 N.D. 2.1E-05 1.1E-02 0.9E-02 1.1E-02 1.1E-02 C034143 ID_1 ID_2 ID_3 6.8E-10 8.1E-99 N.D. N.D. N.D. N.D. C044555,C022233 ID_1 ID_2 ID_3 4.8 2.1E-04 4.8E-04 1.3E-04 N.D. N.D. #ひとまずいらないIDを消して化合物毎にわけます。 $ more test2 | awk '{print $1"\t"$5"\t"$6"\t"$7"\t"$8"\t"$9"\t"$10}' | tr "," "\n" | awk '{print NR"\t"$1"\t"$2"\t"$3"\t"$4"\t"$5"\t"$6"\t"$7}' | sort -nr 8 C022233 4.8 2.1E-04 4.8E-04 1.3E-04 N.D. N.D. 7 C044555 6 C034143 6.8E-10 8.1E-99 N.D. N.D. N.D. N.D. 5 C04213 N.D. 2.1E-05 1.1E-02 0.9E-02 1.1E-02 1.1E-02 4 C03231 3 C001983 2 C011010 1.11 6.4E-04 6.3E-04 N.D. N.D. N.D. 1 C00001 2.1E-04 10.1E-04 0.4E-04 N.D. N.D. 1.2E-04 #データが空になっちゃった化合物のところにデータを戻します。 $ more test2 | awk '{print $1"\t"$5"\t"$6"\t"$7"\t"$8"\t"$9"\t"$10}' | tr "," "\n" | awk '{print NR"\t"$1"\t"$2"\t"$3"\t"$4"\t"$5"\t"$6"\t"$7}' | sort -nr | awk '(NR==1){a=$3"\t"$4"\t"$5"\t"$6"\t"$7"\t"$8; print; next}{if($3<0){print $1"\t"$2"\t"a} if($3>0){print; a=$3"\t"$4"\t"$5"\t"$6"\t"$7"\t"$8} }' | more 8 C022233 4.8 2.1E-04 4.8E-04 1.3E-04 N.D. N.D. 7 C044555 4.8 2.1E-04 4.8E-04 1.3E-04 N.D. N.D. 6 C034143 6.8E-10 8.1E-99 N.D. N.D. N.D. N.D. 5 C04213 N.D. 2.1E-05 1.1E-02 0.9E-02 1.1E-02 1.1E-02 4 C03231 N.D. 2.1E-05 1.1E-02 0.9E-02 1.1E-02 1.1E-02 3 C001983 N.D. 2.1E-05 1.1E-02 0.9E-02 1.1E-02 1.1E-02 2 C011010 1.11 6.4E-04 6.3E-04 N.D. N.D. N.D. 1 C00001 2.1E-04 10.1E-04 0.4E-04 N.D. N.D. 1.2E-04 #前の行を参照する方法 awk ' (NR==1){a=$3"\t"$4"\t"$5"\t"$6"\t"$7"\t"$8; print; next} #1行目は絶対入ってるのでaに値を代入してそのまま吐いて次の行にいく { if($3<0){print $1"\t"$2"\t"a} #行のデータが空だったらaを吐く if($3>0){print; a=$3"\t"$4"\t"$5"\t"$6"\t"$7"\t"$8} #行のデータが空じゃなかったらそのまま吐いて自分の行の値をa に代入する }' | more セル内改行は手と目で殺した
by koretoki
| 2013-12-18 13:31
|
アバウト
以前の記事
2021年 02月 2018年 02月 2017年 12月 2016年 12月 2016年 06月 2014年 09月 2014年 05月 2014年 01月 2013年 12月 2013年 06月 2013年 02月 2012年 11月 2011年 07月 2011年 05月 2010年 11月 2010年 05月 2010年 04月 2009年 12月 2009年 09月 2009年 08月 2009年 07月 2009年 06月 2009年 04月 2009年 03月 2009年 02月 2009年 01月 2008年 12月 2008年 11月 カテゴリ
最新のトラックバック
タグ
その他のジャンル
ブログパーツ
ファン
記事ランキング
ブログジャンル
画像一覧
|
ファン申請 |
||