免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
论坛 程序设计 Shell shell
最近访问板块 发新帖
查看: 2750 | 回复: 8
打印 上一主题 下一主题

[文本处理] shell [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2015-05-26 20:14 |只看该作者 |倒序浏览
chr1    11947   12223   TC01000001.hg.1 +
chr1    12613   12646   TC01000001.hg.1 +
chr1    12646   12697   TC01000001.hg.1 +
chr1    13228   13392   TC01000001.hg.1 +
chr1    13492   14387   TC01000001.hg.1 +
chr1    29555   30037   TC01000002.hg.1 +
chr1    30273   30366   TC01000002.hg.1 +
chr1    30367   30497   TC01000002.hg.1 +
chr1    30506   30563   TC01000002.hg.1 +
大家好,我有一个如上的文件,第二三列分别是起始和终止位置,可以看到第四列有重复的,现在我想按如下要求输出:

第1,4,5列可正常输出,对于同一个TC(第四列)输出其最小第二列最大第三列。意思就是比如TC01000001.hg.1    输出成:
chr1    11947   14387   TC01000001.hg.1 +

不知道有没有表达清楚。
谢谢

论坛徽章:
30
申猴
日期:2014-04-10 09:43:532015年亚洲杯纪念徽章
日期:2015-03-20 14:40:232015亚冠之阿尔纳斯尔
日期:2015-06-02 18:59:042015亚冠之阿尔希拉尔
日期:2015-06-30 15:22:572015亚冠之大阪钢巴
日期:2015-07-20 10:44:332015亚冠之阿尔纳斯尔
日期:2015-10-28 14:57:5215-16赛季CBA联赛之新疆
日期:2015-12-25 10:18:45黑曼巴
日期:2016-06-26 21:39:5315-16赛季CBA联赛之山西
日期:2016-07-25 21:54:2715-16赛季CBA联赛之北京
日期:2016-10-27 12:07:2315-16赛季CBA联赛之八一
日期:2017-07-07 16:39:0915-16赛季CBA联赛之吉林
日期:2017-09-04 12:14:43
2 [报告]
发表于 2015-05-26 20:47 |只看该作者
  1. awk '{ if(NR==1) {a=$2;b=$3;c=$4} if($4==c) {b=$3}  else  {print $1,a,b,c,$5;a=$2;b=$3;c=$4}}END{print $1,a,b,c,$5}' file
  2. chr1 11947 14387 TC01000001.hg.1 +
  3. chr1 29555 30563 TC01000002.hg.1 +
复制代码
回复 1# biobaby



   

求职 : 机器学习
论坛徽章:
79
2015年亚洲杯纪念徽章
日期:2015-05-06 19:18:572015七夕节徽章
日期:2015-08-21 11:06:172015亚冠之阿尔纳斯尔
日期:2015-09-07 09:30:232015亚冠之萨济拖拉机
日期:2015-10-21 08:26:3915-16赛季CBA联赛之浙江
日期:2015-12-30 09:59:1815-16赛季CBA联赛之浙江
日期:2016-01-10 12:35:21技术图书徽章
日期:2016-01-15 11:07:2015-16赛季CBA联赛之新疆
日期:2016-02-24 13:46:0215-16赛季CBA联赛之吉林
日期:2016-06-26 01:07:172015-2016NBA季后赛纪念章
日期:2016-06-28 17:44:45黑曼巴
日期:2016-06-28 17:44:4515-16赛季CBA联赛之浙江
日期:2017-07-18 13:41:54
3 [报告]
发表于 2015-05-26 21:39 |只看该作者
  1. awk '{if(str!=$4){str=$4;min[$4]=$2;max[$4]=0;};a[$4]++;if($2<min[$4])min[$4]=$2;if($3>max[$4])max[$4]=$3}END{for( i in a)print i,max[i],min[i]}' file  
复制代码

论坛徽章:
20
卯兔
日期:2015-01-26 22:05:142015亚冠之萨济拖拉机
日期:2015-09-10 15:15:282015亚冠之阿尔希拉尔
日期:2015-09-25 17:37:53程序设计版块每日发帖之星
日期:2015-10-03 06:20:00程序设计版块每日发帖之星
日期:2015-12-09 06:20:00CU十四周年纪念徽章
日期:2015-12-17 09:07:15程序设计版块每日发帖之星
日期:2015-12-25 06:20:34程序设计版块每日发帖之星
日期:2015-12-25 06:20:34程序设计版块每日发帖之星
日期:2015-12-25 06:20:342015亚冠之广州富力
日期:2015-08-27 19:29:56每日论坛发贴之星
日期:2015-08-26 06:20:002015亚冠之阿尔希拉尔
日期:2015-05-18 17:26:27
4 [报告]
发表于 2015-05-26 22:00 |只看该作者
本帖最后由 songyc_2015 于 2015-05-26 22:17 编辑

回复 1# biobaby
  1. awk '{a[$1,$4]=length(a[$1,$4])?a[$1,$4]:$2;a[$1,$4]=a[$1,$4]<=$2?a[$1,$4]:$2;b[$1,$4]=b[$1,$4]>=$3?b[$1,$4]:$3;c[$1,$4]=$NF}END{for(s in a){split(s,d,SUBSEP);print d[1],a[s],b[s],d[2],c[s]}}' file
  2. awk 'FNR!=1&&(a!=$1||d!=$4){print a,b,c,d,e;a=$1;d=$4;b=$2;c=$3}{a=$1;b=b==0?$2:b;b=b<=$2?b:$2;c=c>=$3?c:$3;d=$4;e=$NF}END{print a,b,c,d,e}' file
复制代码

论坛徽章:
60
20周年集字徽章-20	
日期:2020-10-28 14:04:3015-16赛季CBA联赛之北京
日期:2016-07-06 15:42:0715-16赛季CBA联赛之同曦
日期:2016-06-12 10:38:0915-16赛季CBA联赛之佛山
日期:2016-05-27 11:54:56黄金圣斗士
日期:2015-12-02 11:44:35白银圣斗士
日期:2015-11-25 14:32:43白银圣斗士
日期:2015-11-23 12:53:352015亚冠之布里斯班狮吼
日期:2015-10-21 16:55:482015亚冠之首尔
日期:2015-09-01 16:46:052015亚冠之德黑兰石油
日期:2015-08-31 11:39:192015亚冠之萨济拖拉机
日期:2015-08-28 21:06:5315-16赛季CBA联赛之广东
日期:2016-07-12 14:58:53
5 [报告]
发表于 2015-05-27 11:55 |只看该作者

gawk 4.0+
  1. awk '{a[$4][NR]=$2;b[$4][NR]=$3}END{for(i in a){asort(a[i],min);m=asort(b[i],max);print $1,min[1],max[m],i,$NF}}' file
复制代码

论坛徽章:
0
6 [报告]
发表于 2015-05-27 13:34 |只看该作者
问题已解决,非常感谢大家!!!
回复 1# biobaby


   

论坛徽章:
9
寅虎
日期:2013-12-02 12:49:22巨蟹座
日期:2014-07-18 18:13:34卯兔
日期:2014-07-25 14:43:08子鼠
日期:2014-07-26 10:10:51酉鸡
日期:2014-07-31 15:09:562015亚冠之本尤德科
日期:2015-05-19 09:27:382015亚冠之卡尔希纳萨夫
日期:2015-06-20 10:30:212015亚冠之阿尔纳斯尔
日期:2015-07-01 20:46:062015亚冠之城南
日期:2015-07-15 21:12:00
7 [报告]
发表于 2015-05-27 16:13 |只看该作者
  1. awk '{if(a[$4]==0){a[$4]=$2}else{a[$4]=a[$4]<$2?a[$4]:$2};b[$4]=b[$4]>$3?b[$4]:$3}END{for(i in a)printf "chr1\t%d\t%d\t%s\t+\n",a[i],b[i],i}' test.txt
复制代码

论坛徽章:
9
射手座
日期:2014-07-29 13:05:07双子座
日期:2015-01-11 17:01:522015年亚洲杯之朝鲜
日期:2015-02-01 16:14:282015亚冠之阿尔艾因
日期:2015-06-04 17:54:40数据库技术版块每日发帖之星
日期:2015-08-02 06:20:00数据库技术版块每日发帖之星
日期:2015-10-28 06:20:00数据库技术版块每日发帖之星
日期:2015-11-26 06:20:0015-16赛季CBA联赛之天津
日期:2016-06-20 17:09:2015-16赛季CBA联赛之青岛
日期:2017-02-26 15:54:19
8 [报告]
发表于 2015-05-27 17:15 |只看该作者
  1. awk '{a[$4]=$4;b[a[$4]]=b[a[$4]]?b[a[$4]]:$2;b[a[$4]]=b[a[$4]]<$2?b[a[$4]]:$2;c[a[$4]]=c[a[$4]]<$3?$3:c[a[$4]];d[a[$4]]=$1;e[a[$4]]=$5}END{for(i in a)print d[a[i]],b[a[i]],c[a[i]],i,e[a[i]]}'
复制代码

论坛徽章:
0
9 [报告]
发表于 2015-06-09 10:56 |只看该作者
谢谢 非常感谢
回复 8# stupid_lee


   
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP